【正文】
時則彈出提醒信息框進行提醒。在表單上放置相應(yīng)的控件:1個標簽Label;1個頁框,并把頁框的數(shù)量屬性“Pagecount”設(shè)置為2,一個表格Grid ,2個命令按鈕Command;把表單Form運行時是否居中屬性“Autocenter”設(shè)置為“T”。此表單能夠查詢倉庫中原料庫存過量或不足的信息,運行結(jié)果如圖19所示:圖19 庫存報警信息匯總表(1)“庫存過多”頁框的Init事件代碼=1local Custs1select 貨品號,最大庫存,現(xiàn)有庫存 from 原料庫存表 where (現(xiàn)有庫存最大庫存) into cursor Custs1=Custs1(2)“庫存不足”頁框的Init事件代碼=1local Custs2select 貨品號,最小庫存,現(xiàn)有庫存 from 原料庫存表 where (現(xiàn)有庫存最小庫存) into cursor Custs2=custs2(3)“返回上級”按鈕的Click事件代碼do form 信息查詢(4)“退出”按鈕的Click事件代碼 原料計劃采購表在原料計劃采購模塊中將實現(xiàn)原材料計劃采購數(shù)據(jù)的添加、瀏覽和管理等功能。采用先用向?qū)杀韱芜^程如下:(1)首先在項目管理器—庫存管理信息系統(tǒng)的文檔視圖下表單欄單擊“新建”按鈕,并選擇“表單向?qū)А卑粹o。并將可用字段全部移至選定字段,單擊“下一步”按鈕。(4)向?qū)нM行到“排序次序”,選擇“貨品號”為索引,并選擇升序排列。修改表單:根據(jù)功能需求,在表單中添加 “查看原料計劃采購統(tǒng)計報表”和“返回上級” 兩個命令按鈕。本報表設(shè)計采用先用向?qū)蓤蟊?,然后修改的方法實現(xiàn)。(2)在接下來的向?qū)е校皵?shù)據(jù)庫和表”選擇“庫存管理信息系統(tǒng)”以及“原料計劃采購表”,這是前面定義好的數(shù)據(jù)庫和表。(3)在報表樣式中,選擇“帳務(wù)式”,然后單擊“下一步”按鈕。(5)向?qū)нM行到“排序記錄”,選定字段“貨品號”,按“升序”進行排列, 然后單擊“下一步”按鈕。修改報表:根據(jù)系統(tǒng)整體布局和顯示效果的需求,在報表設(shè)計器中修改報表,合理調(diào)整各個字段間的距離。在“系統(tǒng)維護”表單上放置相應(yīng)的控件,1個標簽Label,4個命令按鈕Command,1個計時器Timer。在主界面中單擊“系統(tǒng)維護”按鈕則進入到信息查詢表單中,運行結(jié)果如圖22所示:(1)“數(shù)據(jù)備份”按鈕的Click事件代碼do form 數(shù)據(jù)備份(2)“添加用戶”按鈕的Click事件代碼do form 添加用戶(3)“密碼修改”按鈕的Click事件代碼do form 密碼修改(4)“返回主菜單”按鈕的Click事件代碼do form 四川奕新集團庫存管理信息系統(tǒng)(5)“Tomer1”計時器的Tomer事件代碼if 1 =else =endif 圖22 系統(tǒng)維護界面 數(shù)據(jù)備份新建一個表單,命名為“數(shù)據(jù)備份”。把表單Form運行時是否居中屬性“Autocenter”設(shè)置為“T”。運行結(jié)果如圖23所示:圖23 數(shù)據(jù)備份運行界面(1)“備份到”按鈕的Click事件代碼****讓用戶選擇一個備份的目錄*****=GETDIR(39。,39。)****確認選擇了目錄*****DO WHILE EMPTY() IF MESSAGEBOX(39。+CHR(13)+39。,4+48+256,39。)=7 =GETDIR(39。,39。) ELSE RETURN ENDIFENDDO =(2)“開始備份”按鈕的Click事件代碼if empty(alltrim()) thenMESSAGEBOX(沒有選擇目標路徑!)elseCLOSE ALL*****自定義系統(tǒng)窗口******DEFINE WINDOWS win1 FROM 1,1 TO 7,50 IN DESKTOP SYSTEM TITLE 39。 COLOR RGB(0,0,0,192,192,192)MOVE WINDOWS win1 CENTERACTIVATE WINDOWS win1 =SET CONSOLE OFF 2,10 SAY 39。COPY FILE TO (+39。)COPY FILE TO (+39。)COPY FILE TO (+39。)COPY FILE TO (+39。)DEACTIVATE WINDOWS win1RELEASE WINDOWS win1MESSAGEBOX(39。39。完成39。39。請輸入備份的文件所在的目錄:39。您沒有選擇目錄39。是否要取消恢復(fù)數(shù)據(jù)?39。對話窗口39。39。請輸入備份的文件所在的目錄:39。數(shù)據(jù)恢復(fù)39。正在恢復(fù)數(shù)據(jù),請稍候39。39。39。39。39。數(shù)據(jù)已恢復(fù)。,64,39。) Endif(5)“退出”按鈕的Click事件代碼do form 系統(tǒng)維護新建一個表單,命名為“添加用戶”。在該表單的數(shù)據(jù)環(huán)境中添加庫存管理信息系統(tǒng)數(shù)據(jù)庫中的 “用戶表”。運行結(jié)果如圖24所示:圖24 添加用戶運行界面(1)“Form1”按鈕的Activate事件代碼set dele onwith .recordsourcetype=1 .recordsource=用戶表 .columncount=3 .= .=用戶名 .=2 .=100 .=.t. .= .=聯(lián)系電話 .=2 .=100 .=.t. .= .=用戶級別 .=2 .=100 .=.t. endwith()(2)“第一條”、“下一條”、“上一條”、“最末條”按鈕的Click事件代碼與入庫管理表單的相關(guān)按鈕類型,此處省略。修改39。保存39。修改39。(5)“刪除”按鈕的Click事件代碼cMessageTitle=39。 cMessageText=39。 nDialogType=4+32 nanswer=messagebox(cMessageText,nDialogType,cMessageTitle)if nanswer=6deleendifdo form 系統(tǒng)維護新建一個表單,命名為“密碼修改”。在該表單的數(shù)據(jù)環(huán)境中添加庫存管理信息系統(tǒng)數(shù)據(jù)庫中的 “用戶表”。運行結(jié)果如圖25所示:圖25 密碼修改運行界面(1)“修改”按鈕的Click事件代碼set talk offset safe offif empty() mess=messagebox(用戶名不能為空!,48,警告)else if empty() mess=messagebox(舊密碼不能為空!,48,警告) else if empty() mess=messagebox(新密碼不能為空!,48,警告) else if empty() mess=messagebox(重復(fù)密碼不能為空!,48,警告) else if alltrim()alltrim() or len(alltrim())len(alltrim()) mess=messagebox(二次密碼不一致!,48,警告) else locate for alltrim(用戶名)==alltrim() and alltrim(密碼)==alltrim() if eof() mess=messagebox(密碼錯誤,系統(tǒng)將取消你的修改權(quán)利!,48,警告) else repl 密碼 with alltrim() mess=messagebox(密碼修改成功!,48,信息提示框) endif endif endif endif endif endifset talk onset safe on(2)“取消”按鈕的Click事件代碼=== 系統(tǒng)集成新建一個菜單,命名為“四川奕新集團庫存管理信息系統(tǒng)”。過程如下:(1)首先在項目管理器—庫存管理信息系統(tǒng)的其他視圖下菜單欄單擊“新建”按鈕,并選擇“菜單”按鈕。主菜單項輸入數(shù)據(jù)如圖26所示,子菜單項輸入數(shù)據(jù)如圖27所示:圖26 系統(tǒng)菜單主菜單信息輸入圖27 信息查詢子菜單信息輸入(3)在表單樣式中,選擇“陰影式”以及“文本按鈕”,單擊“下一步”按鈕。設(shè)計好的菜單運行結(jié)果如圖28所示:圖28 庫存管理信息系統(tǒng)主菜單運行界面新建一個程序,命名為“四川奕新集團庫存管理信息系統(tǒng)”。過程如下[11]:(1)首先在項目管理器—庫存管理信息系統(tǒng)的代碼視圖下程序欄單擊“新建”按鈕。程序如下:set talk offset sysmenu off set cent on =2=icons\ =0=1=.f.modify window screen nocloseMODIFY WINDOW SCREEN TITLE 庫存管理信息系統(tǒng) ZOOM WINDOW SCREEN MAX set default to do form 登陸界面read eventsclearclose allreturnendif(3)指定主程序。(4)連編項目。(5)如果連編項目未顯示錯誤信息,再次單擊 “連編”按鈕,在出現(xiàn)的對話框中選擇“連編應(yīng)用程序或連編可執(zhí)行文件”選項,單擊確定按鈕,連編程序出現(xiàn)“另存為”對話框,在“應(yīng)用程序名”處輸入“庫存管理信息系統(tǒng)”,單擊“保存”按鈕,如圖29所示:圖29 庫存管理信息系統(tǒng)應(yīng)用程序圖標7 結(jié) 論一個完整的庫存管理信息系統(tǒng)到此就制作完成了,本設(shè)計中按照管理信息系統(tǒng)開方法中的生命周期法、以Visual ,詳細的講述了從創(chuàng)建數(shù)據(jù)庫到系統(tǒng)設(shè)計和各模塊的創(chuàng)建、面向?qū)ο蟮谋韱蔚脑O(shè)計、基本功能如查詢的實現(xiàn)、主程序的編寫。此外,我認為自己有很多地方還有所欠缺,這需要我在今后的工作于學習中區(qū)彌補與提高。在本次畢業(yè)設(shè)計的過程中,張老師多次開會查看我的畢業(yè)設(shè)計,為我提供一些設(shè)計和寫作思路,幫助我解決在本次系統(tǒng)開發(fā)中遇到的很多問題。對于張文晰老師給我的幫助,在此,我謹向她表示最衷心的感謝。【參考文獻參考文獻格式、數(shù)量】[1] 曾傳華,黎青松.物流管理與信息系統(tǒng).北京:清華大學出版社,[2] 匡松.Visual FoxPro面向?qū)ο蟪绦蛟O(shè)計(第二版).成都,西南交通大學出版社,-17