【導讀】需求分析的任務，在于完全志弄清用戶對所開發(fā)的數(shù)據(jù)庫應用系統(tǒng)的確切要求。要向用戶展開調(diào)查研究，開清用戶到底需要應用系統(tǒng)具備哪些功能，需要完成那些任務。工資設定，工資情況、個人工資查詢、打印預覽、打印退出等操作。作都是人工直接來完成的，如果對于一個大型企業(yè)來說工作量就很大，而且很容易出錯。著科技的發(fā)展，實現(xiàn)現(xiàn)代化和自動化管理既可能也很有心要。修改、修改確定、添加、刪除等功能。最后是退出程序。本項目管理器里包括：。后面還有精彩的約。①表格，連接的gongling表。職工的基本情況。cMessageTitle='設備管理系統(tǒng)'cMessageText='密碼錯誤，請重新輸入'按“退出”按鈕就釋放表單。還可以增加刪除員工信。瀏覽掉用的類庫的命令按鈕組。

　　

【正文】 ：可以對員工工資情況進行瀏覽，查詢，增加，刪除，修改。 （ 32） 員工工資設定：包括基本工資，崗位工資，工齡工資分別可以對他們內(nèi)容進行修改、修改確定、添加、刪除等功能。 （ 33） 打印預覽：可以打印預覽。打印出工資單。 （ 34） 個人查詢：輸入個要員工號和密碼。 （ 35） 最后是退出程序。 （ 36） 權限設置：只有管理員才能進行此操作。 三、系統(tǒng)結(jié)構(gòu) 總體介面 四、項目管理器 做 VF 首先建一個項目管理器；它包括許多內(nèi)容，也被稱做后臺數(shù)據(jù)庫，功能也比較強大。本項目管理器里包括： 1 數(shù)據(jù)庫 歡迎界面 退出 退出 打印預覽 工資查詢庫 員工信息 員工工資設定 基本工資 崗位工資 打印預覽 工齡工資 瀏覽 主菜單 個人工資 查詢 個人查詢 所用的表。 1 文檔 制作的表單 接后的就是類庫、代碼、其它，這里就不多說了，想了解就往下看。后面還有精彩的約。 五、具體功能 首先，介紹一下表單 3 gzgl 它包括： 1 個表格， 5 個命令按鈕 ① 表格，連接的 gongling表。 ② 按鈕包括： ⑴修改按鈕。 命令如下： click 事件：=.T. =.T. ⑵ 修改確認按鈕 click 事件： =.F. =.F. ⑶ 添加按鈕： click 事件： append blank go bottom =.T. =.T. ⑷ 刪除按鈕： click 事件： =39。39。 use database\gongling exclusive delete from gongling where gname=getgname pack =39。gongling39。 ⑸退出按鈕： click 事件： 總體介面如下： 3 grcx (工資查詢 ) 這個表單的是實現(xiàn)按工號查詢，沒一個工號有一個固定的密碼查詢的結(jié)果是 職工的基本情況。當然工號和密碼要連接生成器。代碼在“確定”按鈕里具體如下： inname=alltrim() inpswd=alltrim() set order to tms_user seek inname if !found() cMessageTitle=39。設備管理系統(tǒng) 39。 cMessageText=39。用戶名錯誤，請重新輸入 39。 nDialogType=4+32 nAnswer=messagebox(cMessageText,nDialogType,cMessageTitle) do case case nAnswer=6 =39。39。 case nAnswer=7 messagebox(請勿偷窺他人資料 ,48,警告 ) endcase else if tms_pswd!=inpswd cMessageTitle=39。設備管理系統(tǒng) 39。 cMessageText=39。密碼錯 誤，請重新輸入 39。 nDialogType=4+32 nanswer=messagebox(cMessageText,nDialogType,cMessageTitle) do case case nAnswer=6 if flag2 =39。39。 flag=flag+1 else messagebox(請勿偷窺他人資料 ,48,警告 ) endif case nAnswer=7 messagebox(請勿偷窺他人資料 ,48,警告 ) endcase else par1=inname do form salary\form\gresult endif endif 按“退出”按鈕就釋放表單。 3 gresult 主要是被 grcx (工資查詢 )調(diào)用，當然生成器里連接了其它表。 3 gwgz(崗位工資 ) 對崗位工資的管理。同 gzgl 功能一樣。 gcgz(等級 )也同 gzgl 功能一樣 4 jm（密碼表） 代碼在“確定按鈕里” click 事件： sele mab loca for allt( )==allt() and allt( )==allt() if foun() do C:\修改工資管理 3\ read events =.f. = release thisform else = messagebox(你沒有權限，請 輸入正確密碼 ,0+16+0,出錯 ) endi 4 personnel 它包含一個頁框，頁框下有三個選項分別是： ●瀏覽 它可以對員工信息進行瀏覽。還可以增加刪除員工信息 瀏覽掉用的類庫的命令按鈕組。具有瀏覽功能。 格式如下： 按鈕“增加新記錄”命令如下： =.F. =.F. =.F. =.T. if =39。增加新記錄 39。 =.T. =.T. =.T. =.T. =.T. =.T. append blank =39。增加確認 39。 else getid=alltrim() getname=alltrim() getsex=alltrim() getjob=alltrim() getindate=alltrim() getrank=alltrim() if empty(getid) or empty(getname) or empty(getsex) or empty(getjob) or empty(getindate) or empty(getrank) messagebox(資料不足 ,48,錯誤 ) else =39。增加新記錄 39。 tableupdate(.t.) =.F. =.F. =.F. =.F. =.F. =.F. =.T. =.T. =.T. =.F. endif endif 按鈕“修改這條記錄”如下 =.F. =.F. =.T. =.F. if =39。修改這條記錄 39。 =.T. =.T. =.T. =.T. =.T. =.T. =39。修改確認 39。 else =39。修改這條記錄 39。 tableupdate(.t.) =.F. =.F. =.F. =.F. =.F. =.F. =.T. =.T. =.F. =.T. endif 按鈕“刪除這條記錄“如下： getid=alltrim() =39。39。 =39。39。 =39。39。 =39。39。 =39。39。 =39。39。 use personnel exclusive set order to pid seek getid delete pack =39。d39。 =39。personne39。 =39。personnel.psex39。 =39。personnel.pjob39。 =39。personn39。 =39。personnel.prank39。 =.F. =.F. =.F. =.F. =.F. =.F. ● 查詢 （ 6） 可以根據(jù)員工號和員工姓名查詢 ● 查詢結(jié)果 退出查詢 8 類庫 —— fy_____fy 上一個 這個主要用于瀏覽 9|、代碼 有一個程序文件： mainmpr set sysmenu off clear screen clear events do form salary\form\jm open database database\salary read events 其它 1連編生成一個 EXE 文件 (gzgl)_ 五、最終介面 介面 2 本系統(tǒng)實用于小行企業(yè)進行工資管理及查詢。 “ Easy, now,” said Ted Tonks, placing a hand on Harry?s shoulder and pushing him back against the cushions. “That was a nasty crash you just had. What happened, anyway? Something go wrong with the bike? Arthur Weasley overstretch himself again, him and his Muggle contraptions?” “ No,” said Harry, as his scar pulsed like an open wound. “Death Eaters, loads of them – we were chased – ” “ Death Eaters?” said Ted sharply. “What d?you mean, Death Eaters? I thought they didn?t know you were being moved tonight, I thought – ” “ They knew,” said Harry. Ted Tonks looked up at the ceiling as though he could see through it to the sky above. “ Well, we know our protective charms hold, then, don?t we? They shouldn?t be able to get within a hundred yards of the place in any direction.” Now Harry understood why Voldemort had vanished。 it had been at the point when the motorbike crossed the barrier of the Order?s charms. He only hoped they would continue to work: He imagined Voldemort, a hundred yards above them as they spoke, looking for a way to perate what Harry visualized as a great transpar ent bubble. He swung his legs off the sofa。 he needed to see Hagrid with his own eyes before he would believe that he was alive. He had barely stood up, however, when a door opened and Hagrid squeezed through it, his face covered in mud and blood, limping a little but miraculously alive. “ Harry!” Knocking over tw o delicate tables and an aspidistra, he covered the floor between them in two strides and pulled Harry into a hug that nearly cracked his newly repaired ribs. “Blimey, Harry, how did yeh get out o? that? I thought we were both goners.” “ Yeah, me too. I can?t believe – ” Harry broke off. He had just noticed the woman who had entered the ro