vfp畢業(yè)論文說明書---超市管理系統(tǒng)

上傳人：奔*** IP屬地：河北更新時(shí)間：2024-03-01 格式：doc 頁(yè)數(shù)：46 大?。?.52MB 人氣指數(shù)：12 舉報(bào) 版權(quán)申訴

2023年全國(guó)碩士研究生考試考研英語(yǔ)一試題真題（含答案詳解+作文范文）_第1頁(yè)

已閱讀1頁(yè)，還剩45頁(yè)未讀，繼續(xù)免費(fèi)閱讀

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

1、　　畢業(yè) 論文　　題目：超市管理系統(tǒng)　　學(xué) 院：計(jì)算機(jī)科學(xué)系　　專業(yè)：計(jì)算機(jī)應(yīng)用技術(shù)　　目錄　　摘要2</b&

2、gt;　　引言3　　1本課題的研究意義和目的4　　1.1開發(fā)背景4　　1.2研究超市進(jìn)銷存管理系統(tǒng)的意義4　　2系統(tǒng)設(shè)計(jì)6&l

3、t;/b>　　2.1系統(tǒng)目標(biāo)設(shè)計(jì)6　　2.2開發(fā)設(shè)計(jì)思想6　　2.3開發(fā)和運(yùn)行環(huán)境選擇6　　2.4系統(tǒng)功能分析7　　2.5系統(tǒng)功能模塊設(shè)計(jì)7　　3數(shù)據(jù)庫(kù)設(shè)

4、計(jì)8　　3.1數(shù)據(jù)庫(kù)需求分析8　　3.2數(shù)據(jù)庫(kù)概念結(jié)構(gòu)設(shè)計(jì)9　　3.3數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì)9　　3.4數(shù)據(jù)庫(kù)結(jié)構(gòu)的實(shí)現(xiàn)11　　4各個(gè)功能模塊的創(chuàng)建14　　4.

5、1系統(tǒng)菜單的設(shè)計(jì)14　　4.3身份驗(yàn)證界面的設(shè)計(jì)16　　4.3.1用戶身份驗(yàn)證界面16　　4.3.2創(chuàng)建“修改密碼”表單18　　4.4信息管理模塊設(shè)計(jì)20　　4.4.1“商品信息管理”表單20&

6、lt;p>　　4.4.2“輸入查詢條件”表單27　　5系統(tǒng)的編譯和發(fā)行40　　結(jié)束語(yǔ)41　　致謝42　　參考文獻(xiàn)43&

7、lt;p>　　摘要　　超市管理系統(tǒng)是目前應(yīng)用于中型或是大型超市商品進(jìn)、銷、存、管理等系統(tǒng)中的典型代表，涉及到了商品或貨物管理中的以下4個(gè)方面，即進(jìn)貨、銷售、庫(kù)存及盤點(diǎn)。通過一個(gè)超市管理系統(tǒng)的例子，介紹了超市進(jìn)、銷、存、管理信息化的一般解決方案，其重要性不言而喻。但是，目前超市在具體的業(yè)務(wù)流程處理過程中仍然使用手工操作的方式來實(shí)施，不僅費(fèi)時(shí)、費(fèi)力，

8、效率低下，而且無(wú)法達(dá)到理想的效果。　　本系統(tǒng)是根據(jù)超市的特點(diǎn)，集進(jìn)、銷、存、分析于一體，為超市量身定做的進(jìn)、銷、存、管理軟件。在設(shè)計(jì)過程中最大限度滿足用戶的要求，因此，該系統(tǒng)具有較強(qiáng)的實(shí)用性和針對(duì)性。本系統(tǒng)界面友好，操作簡(jiǎn)單，可維護(hù)性強(qiáng)，功能完備。本論文介紹了超市管理信息系統(tǒng)開發(fā)的全過程，主要從管理思想、系統(tǒng)分析說明、系統(tǒng)設(shè)計(jì)說明、系統(tǒng)使用說明、技巧與體會(huì)等方面對(duì)本管理系統(tǒng)加以論述。前言部分指明

9、了選題背景和開題意義；而后又詳細(xì)介紹了系統(tǒng)的分析、系統(tǒng)的開發(fā)與設(shè)計(jì)說明等內(nèi)容；最后給出了系統(tǒng)的使用說明和系統(tǒng)設(shè)計(jì)的心得體會(huì)。 　　關(guān)鍵詞：系統(tǒng)設(shè)計(jì)、系統(tǒng)分析、進(jìn)銷存、信息管理系統(tǒng)　　引言　　隨著社會(huì)經(jīng)濟(jì)的發(fā)展，信息化程度的不斷深入，超市的傳統(tǒng)業(yè)務(wù)己愈

10、來愈不能滿足消費(fèi)者的需要。如今，商品進(jìn)、銷、存、管理是大小型超市經(jīng)營(yíng)管理中的核心環(huán)節(jié)，也是一個(gè)超市能夠取得效益的關(guān)鍵，如果能夠做到合理生產(chǎn)，及時(shí)銷售，庫(kù)存量最小，減少積壓，那么超市就能取得最佳的效益。由此可見，進(jìn)、銷、存、管理決策的正確與否直接影響了超市的效益。　　本管理信息系統(tǒng)是針對(duì)超市的實(shí)際需求開發(fā)設(shè)計(jì)的，我組在超市中采集了許多實(shí)際資料。利用計(jì)算機(jī)運(yùn)算速度快、存儲(chǔ)信息容量大、處理邏輯問題強(qiáng)、

11、功能強(qiáng)大的優(yōu)勢(shì)及計(jì)算機(jī)網(wǎng)絡(luò)與通信網(wǎng)的結(jié)合,可以使眾多的個(gè)人計(jì)算機(jī)不僅能夠同時(shí)處理文字、數(shù)據(jù)、圖像、聲音等信息而且方便快捷，特別是局域網(wǎng)的應(yīng)用，它可以通過數(shù)據(jù)通信網(wǎng)或?qū)Ｓ脭?shù)據(jù)電路，與遠(yuǎn)方的局域網(wǎng)、數(shù)據(jù)庫(kù)或處理中心相連接，構(gòu)成一個(gè)大范圍的信息處理系統(tǒng)，從超市管理特別是查詢與決策信息的管理需求出發(fā)，針對(duì)性強(qiáng)，功能齊備，旨在通過幫助超市管理實(shí)現(xiàn)信息化，以提高超市管理的效率。與此同時(shí)，我們所學(xué)到的知識(shí)也得到了理論聯(lián)系實(shí)際的目的。

12、;　　1本課題的研究意義和目的　　1.1開發(fā)背景　　隨著科技發(fā)展和社會(huì)進(jìn)步，尤其是計(jì)算機(jī)大范圍的普及，計(jì)算機(jī)應(yīng)用逐漸由大規(guī)?？茖W(xué)計(jì)算的海量數(shù)據(jù)處理轉(zhuǎn)向大規(guī)模的事務(wù)處理和對(duì)工作流的管理，這就產(chǎn)生了以臺(tái)式計(jì)算機(jī)為核心，以數(shù)據(jù)庫(kù)管理系統(tǒng)為開發(fā)環(huán)境的管理信息系統(tǒng)在大規(guī)模的事務(wù)處理和對(duì)工作流的管理等方面的

13、應(yīng)用，特別是在超市管理之中的應(yīng)用日益收到人們的關(guān)注。　　目前，無(wú)論公司還是企業(yè)對(duì)于貨物都實(shí)行了信息化管理以提高管理水平和工作效率，同時(shí)也可以最大限度地減少手工操作帶來的錯(cuò)誤。于是，進(jìn)銷存管理信息系統(tǒng)便應(yīng)運(yùn)而生。在工廠中，涉及產(chǎn)品原料的采購(gòu)、庫(kù)存，投入生產(chǎn)，報(bào)損，甚至有時(shí)涉及到銷售，同時(shí)，對(duì)于產(chǎn)品也有相同的生產(chǎn)，庫(kù)存，銷售和盤點(diǎn)等類似環(huán)節(jié)。在其他非生產(chǎn)性單位，如超市，商店等，則主要涉及到進(jìn)貨，庫(kù)存

14、，銷售和盤點(diǎn)4方面。　　我們的系統(tǒng)開發(fā)的整體任務(wù)是實(shí)現(xiàn)超市管理的系統(tǒng)化、規(guī)范化、自動(dòng)化和智能化，從而達(dá)到提高企業(yè)管理效率的目的。　　1.2研究超市進(jìn)、銷、存、管理系統(tǒng)的意義　　隨著社會(huì)的進(jìn)步和計(jì)算機(jī)技術(shù)的發(fā)展，尤其是網(wǎng)絡(luò)技術(shù)的飛速進(jìn)步，信息觀念已經(jīng)深入人心。信息科學(xué)作為當(dāng)代社會(huì)中的重要一環(huán)在國(guó)民經(jīng)濟(jì)中起著舉足輕重

15、的作用。從目前看來，依靠電子化手段，加強(qiáng)超市的管理，是各家超市提高其工作效率、增強(qiáng)其業(yè)務(wù)競(jìng)爭(zhēng)力的重要因素。對(duì)超市來說，至少有如下幾點(diǎn)益處:　　1、界面清晰、功能少而實(shí)用、操作簡(jiǎn)單。　　2、開發(fā)周期短、維護(hù)費(fèi)用低、軟件更新速度快。　　3、風(fēng)格友好化，輕松管理，容易上手，達(dá)到一看就懂、一學(xué)即會(huì)。

16、　　4、目標(biāo)系統(tǒng)必須具有可靠性、安全性、可維護(hù)性、可移植性等，對(duì)于不同的管理人員授予不同的操作權(quán)限，具有定期數(shù)據(jù)備份功能。　　5、以表格的形式輸出信息。　　6、增加數(shù)據(jù)有效性驗(yàn)證：即在操作人員因某種原因錯(cuò)誤的輸入了數(shù)據(jù)時(shí)系統(tǒng)會(huì)自動(dòng)提出數(shù)據(jù)錄入有誤并加以提示，這樣方便操作人員輸入的數(shù)據(jù)有效性。

17、　7、系統(tǒng)的通用性：此系統(tǒng)為綜合性工業(yè)企業(yè)庫(kù)存管理系統(tǒng)，里面的數(shù)據(jù)都是從數(shù)據(jù)庫(kù)中提出（包括公司名稱、操作人名稱等），不受固定數(shù)據(jù)限制。增強(qiáng)系統(tǒng)的通用性。　　總之，現(xiàn)代超市的競(jìng)爭(zhēng)和發(fā)展，已突破傳統(tǒng)業(yè)務(wù)的框架，為了提高超市的業(yè)務(wù)競(jìng)爭(zhēng)能力，擴(kuò)大客戶群，培育新的利潤(rùn)增長(zhǎng)點(diǎn)，務(wù)必大力改良其超市的進(jìn)、銷、存、管理系統(tǒng)，因此建立一個(gè)功能齊全、靈活、通用、可靠、安全、統(tǒng)一的超市管理系統(tǒng)成為各超市當(dāng)前業(yè)務(wù)發(fā)展的迫

18、切之需。　　2系統(tǒng)設(shè)計(jì)　　2.1系統(tǒng)目標(biāo)設(shè)計(jì)　　通過該超市管理系統(tǒng)，利于計(jì)算機(jī)的技術(shù)，使得進(jìn)貨，銷售，庫(kù)存能夠有利結(jié)合起來，產(chǎn)銷銜接，提高超市效率和效益從而達(dá)到提高賬戶管理效率的目的。　　系統(tǒng)開發(fā)

19、的總體任務(wù)是使超市人員可以輕松快捷地完成對(duì)賬戶管理的任務(wù)　　2.2開發(fā)設(shè)計(jì)思想　　本系統(tǒng)開發(fā)設(shè)計(jì)思想：　　通過完成這個(gè)超市進(jìn)、銷、存、管理系統(tǒng)，實(shí)現(xiàn)公司企業(yè)貨物管理的穩(wěn)定性，易操作性，可維護(hù)性，安全性等，從而達(dá)到提高貨物管理效率的目的。

20、;　　可行性分析就是對(duì)項(xiàng)目開發(fā)的可能性和必要性進(jìn)行分析，避免盲目投資。主要是必要性分析和效益分析，同時(shí)還要進(jìn)一步進(jìn)行技術(shù)可行性分析，投資效益分析，組織管理可行性分析，建立是否存在否定項(xiàng)目的可能性。　　超市管理系統(tǒng)需要投資費(fèi)用和未來的運(yùn)營(yíng)維護(hù)費(fèi)用，尤其投資費(fèi)用主要包括設(shè)備費(fèi)用，人員費(fèi)用，材料費(fèi)用和其他費(fèi)用，如由于工作方式改變需要增加的其他開支，通常保證新系統(tǒng)運(yùn)行的可靠性，要求手工和計(jì)算機(jī)處理在長(zhǎng)時(shí)

21、間并存。系統(tǒng)的收益主要通過新系統(tǒng)銷售來實(shí)現(xiàn)，但有些指標(biāo)也是難以計(jì)算的，例如如下指標(biāo)：　　●貨物管理中節(jié)省的人力，減輕的勞動(dòng)強(qiáng)度。　　●降低成本幾其他費(fèi)用。　　●改進(jìn)薄弱環(huán)節(jié)，提高工作效率。　　●提高數(shù)據(jù)處理的及時(shí)性和準(zhǔn)確性。　　●

22、其他各種有利方面。　　2.3開發(fā)和運(yùn)行環(huán)境選擇　　開發(fā)工具：VisualFoxPro6．0中文版，　　運(yùn)行環(huán)境：windows9X或windows2000。　　2.4系統(tǒng)功能分析　　系統(tǒng)功能分

23、析是在系統(tǒng)開發(fā)的總體任務(wù)的基礎(chǔ)上完成的。本例　　要完成的功能主要有：　　(1)信息管理，日常操作，信息查詢，系統(tǒng)管理。　　(2)商品信息管理。　　(3)商品進(jìn)貨管理，商品銷售管理。　　(4)進(jìn)貨記錄查詢，商品銷售記錄查詢，庫(kù)存記錄

24、查詢。　　(5)登錄系統(tǒng)，修改密碼，關(guān)于系統(tǒng)，退出系統(tǒng)。　　2.5系統(tǒng)功能模塊設(shè)計(jì)　　在系統(tǒng)功能分析的基礎(chǔ)上，根據(jù)VisualFox程序編制的特點(diǎn)，如圖：　　3數(shù)據(jù)庫(kù)設(shè)計(jì)　　在VisualFo

25、xPro6．0中，數(shù)據(jù)庫(kù)指的是可以存儲(chǔ)一個(gè)或多個(gè)表(．DBF文件)及數(shù)據(jù)的關(guān)系數(shù)據(jù)庫(kù)，所謂的關(guān)系數(shù)據(jù)庫(kù)就是多個(gè)表的集合。每個(gè)表通過形成一定關(guān)系的公共字段與另外的表聯(lián)系。一般來說數(shù)據(jù)庫(kù)可按下列步驟進(jìn)行設(shè)計(jì)：　　(1)確定需要的表。著手把信息分成各個(gè)獨(dú)立的主題，每個(gè)主題對(duì)應(yīng)一個(gè)表。　　(2)確定所需字段。確定每個(gè)表中要保存哪些信息，一個(gè)信息為一個(gè)字段。<

26、;/p>　　(3)確定表之間的聯(lián)系。　　3.1數(shù)據(jù)庫(kù)需求分析　　數(shù)據(jù)庫(kù)需求分析是數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)的第一個(gè)階段，是收集基本數(shù)據(jù)、數(shù)據(jù)結(jié)構(gòu)以及數(shù)據(jù)處理的流程。針對(duì)本實(shí)例，通過對(duì)超市進(jìn)銷存管理的內(nèi)容和數(shù)據(jù)流程分析，總結(jié)如下需求信息：　　(1)進(jìn)貨信息中要包含商品信息。&

27、lt;p>　　(2)銷售信息中要包含商品信息。　　(3)庫(kù)存信息中要包含商品信息。　　經(jīng)過上述系統(tǒng)功能分析和需求總結(jié)，考慮到將來功能上的擴(kuò)展，設(shè)計(jì)如下面所示的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)：　　商品信息，包含商品編號(hào)，商品名稱，商品單位，商品單價(jià)，類別，產(chǎn)地及說明等。　　進(jìn)貨信息

28、，包含進(jìn)貨編號(hào)，商品編號(hào)，進(jìn)貨單價(jià)，進(jìn)貨數(shù)量，進(jìn)貨時(shí)間，經(jīng)手人，供貨單位等。　　銷售信息，包含出貨編號(hào)，商品編號(hào)，出貨單位，出貨數(shù)量，出貨編號(hào)，經(jīng)手人及說明等。　　庫(kù)存信息，包含商品編號(hào)，庫(kù)存說明和說明等。　　系統(tǒng)設(shè)置，包含商品類別等。　　用戶信息，包含用戶，密碼等。&l

29、t;/p>　　有了上面的數(shù)據(jù)結(jié)構(gòu)、數(shù)據(jù)項(xiàng)和數(shù)據(jù)流程，然后進(jìn)行下面的數(shù)據(jù)庫(kù)設(shè)計(jì)。　　3.2數(shù)據(jù)庫(kù)概念結(jié)構(gòu)設(shè)計(jì)　　根據(jù)上面的設(shè)計(jì)規(guī)劃本實(shí)例中的實(shí)體有：商品信息實(shí)體，進(jìn)貨實(shí)體，銷售信息實(shí)體，庫(kù)存信息實(shí)體和用戶信息實(shí)體。　　實(shí)體與實(shí)體之間的關(guān)系E-R圖分別如下：<

30、p>　　3.3數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì)　　我們需要將上面的數(shù)據(jù)庫(kù)概念結(jié)構(gòu)轉(zhuǎn)化為visualForpro數(shù)據(jù)庫(kù)系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)。　　在上面的實(shí)體以及實(shí)體之間關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫(kù)中的表格以及各個(gè)表格之間的關(guān)系。　　超市進(jìn)銷存管理系統(tǒng)數(shù)據(jù)庫(kù)中各個(gè)表格的設(shè)計(jì)結(jié)果幾個(gè)表格每個(gè)表格表示在數(shù)

31、據(jù)庫(kù)中的一個(gè)表。這些表為用戶基本信息表。　　“商品信息”表的字段設(shè)置如下：　　“進(jìn)貨信息”表的字段設(shè)置如下：　　“銷售信息”表的字段設(shè)置如下：　　“庫(kù)存信息”表的字段設(shè)置如下：　　“用戶信息”表的字段設(shè)置如下：

32、　　“系統(tǒng)設(shè)置”表的字段設(shè)置如下：　　3.4數(shù)據(jù)庫(kù)結(jié)構(gòu)的實(shí)現(xiàn)　　在需求分析、概念結(jié)構(gòu)設(shè)計(jì)的繼承上得到數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)之后，我們就可以在visual FoxPro數(shù)據(jù)庫(kù)系統(tǒng)中實(shí)現(xiàn)該邏輯結(jié)構(gòu)。　　實(shí)現(xiàn)數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)的方式是直接使用visual FoxPro的項(xiàng)目管理器來實(shí)現(xiàn)。下面將以本例中Jx

33、cdata數(shù)據(jù)庫(kù)為實(shí)例，來說明.　　在VisualFoxpro主窗口選擇【文件】—【新建】菜單，打開“新建”對(duì)話框。在此對(duì)話框中的“文件類型”選項(xiàng)組中選中“項(xiàng)目”選項(xiàng)后單擊【新建文件】按鈕，打開“創(chuàng)建”對(duì)話框，在此對(duì)話框中選擇項(xiàng)目文件的保存位置并輸入項(xiàng)目名稱，單擊【保存】按鈕可保存項(xiàng)目并完成一個(gè)VisualFoxpro項(xiàng)目的創(chuàng)建。項(xiàng)目創(chuàng)建完成以后即可打開項(xiàng)目管理器，如下圖：

34、　　新建數(shù)據(jù)庫(kù)如圖所示：　　在項(xiàng)目管理器中選擇Data選項(xiàng)卡，在目錄樹中打開Jxcdata數(shù)據(jù)庫(kù)，選中“本地視圖”項(xiàng)，單擊[新建]按鈕，在打開的“新建本地視圖”對(duì)話框中單擊新建視圖按鈕，即可打開視圖設(shè)計(jì)器來設(shè)計(jì)本地視圖。設(shè)置好的視圖Inview，Outview,Storeview輸出結(jié)果分別如下：　　4各個(gè)功能模塊的創(chuàng)建</p

35、>　　建立功能模塊的目的在于：一個(gè)是使用者能簡(jiǎn)單明了地掌握軟件功能，另個(gè)是未開發(fā)的人貝也能輕松地進(jìn)行維護(hù)。根據(jù)本軟件的特點(diǎn)，本系統(tǒng)將分為3個(gè)功能模塊．它們是：信息管理模塊、日常操作模塊、信息查詢模塊。　　在進(jìn)入各個(gè)功能模塊前，應(yīng)該給用戶提供一個(gè)選擇的界面，即系統(tǒng)的主界面。下面按系統(tǒng)計(jì)開發(fā)順序逐一介紹。　　4.1系統(tǒng)菜單的設(shè)計(jì)&

36、lt;/p>　　系統(tǒng)主菜單的功能在于引導(dǎo)用戶進(jìn)入不同的功能模塊。本系統(tǒng)主菜單的界面為簡(jiǎn)單起見，設(shè)計(jì)界面如圖所示。　　界面的系統(tǒng)菜單又包含三個(gè)子菜單，分別為“日常操作”、“信息查詢”、“系統(tǒng)管理”，引導(dǎo)進(jìn)入個(gè)同的功能模塊。　　本例中的系統(tǒng)主菜單的結(jié)構(gòu)如下表所示：　　4.2創(chuàng)建“Splas

37、h”表單　　“Splash”表單是程序中比較常見的一種界面，一般作為程序的第一個(gè)界面顯示給用戶，在該界面中顯示程序的名稱，創(chuàng)建人，版本等信息?！癝plash”表單布局如下所示：　　“Splash”表單中計(jì)時(shí)器控件Time事件代碼為：　　*——移動(dòng)歡迎使用標(biāo)簽　　*——當(dāng)標(biāo)

38、簽移動(dòng)到表單最右側(cè)時(shí)　　IFTHISFORM.lable14.LEFT=THISFORM.WIDTH　　*----移動(dòng)到最左側(cè)　　THISFORM.lable14.LEFT=THISFORM.lable14.LEFT+1　　ENDIF

39、　　*----使“超市進(jìn)銷存管理系統(tǒng)”變色　　*----隨機(jī)生成顏色　　i=tnt(RAND()*255)　　j=tnt(RAND()*255)　　k=tnt(RAND()*255)　　4

40、.3身份驗(yàn)證界面的設(shè)計(jì)　　因?yàn)楸鞠到y(tǒng)的特殊性，本系統(tǒng)各處會(huì)涉及到密碼即身份驗(yàn)證。如用戶身份驗(yàn)證等。　　4.3.1用戶身份驗(yàn)證界面　　設(shè)計(jì)“系統(tǒng)登錄表單”的用戶驗(yàn)證界面如圖所示。　　接下來，我們?yōu)楦骺丶顚懯录憫?yīng)。　　“系統(tǒng)登錄“

41、表單中“確定”按鈕的“Click”事件代碼：　　*---精確比較　　SETEXACTON　　*---判斷是否輸入用戶名　　IFALLTRIM（THISFORM.Textdser.VALUE）--“”<p&

42、gt;　　MESSAGEBOX(“請(qǐng)輸入用戶名”，48，“進(jìn)銷存管理系統(tǒng)”)　　THISFORM.TEXTUser.SetFous　　Return　　ENDIF　　*---獲取輸入的信息</

43、p>　　USER__N=ALLTRIM(THISFORM.TextUser.VALUE)　　USER__P=ALLTRIM(THISFORM.TextUser.VALUE)　　*---定義邏輯變量is_user,用于判斷是否為合法用戶　　LOCALIs-Uuser

44、　　Is-Uuser=.F.　　*---遍歷用表中所有的記錄　　*---判斷輸入的用戶名稱和用戶密碼是否存在　　SELECT用戶信息　　GOTOP　　DOWHILE.NOT

45、.EOF()　　*---尋找與輸入的用戶名和密碼匹配的記錄　　ISUser=(USER_N=用戶信息.用戶名).AND.(USER_P=用戶信息.密碼)　　*---如果找到　　IFIS_USER&

46、lt;/p>　　EXIT　　ELSE　　SKIP　　ENDIF　　ENDD

47、O　　*---如果正確　　IFIS——USER　　*---保存登錄用戶　　cCurUser=ALLTRIM(THISFORM.TextUser.Value)

48、;　　*---調(diào)用主界面　　DOFORMMainForm　　*---推出當(dāng)前表單　　THISFORM.RELEASE　　*---如果登錄不正確　　ELSE

49、;　　MESSAGEBOX(“用戶名或用戶密碼不正確!”,0+16,”進(jìn)銷存管理系統(tǒng)”)　　THISFORM.TextUser.Value=””　　THISFORM.TextPass.Value=””　　THISFORM.TextUser.SetFocus<p&

50、gt;　　ENDIF　　*---模糊比較　　SEREXACTOFF　　“取消”按鈕的”Click”事件代碼如下:　　*---釋放登錄表單　　THISFO

51、RM.RELEASE　　*---清除事件循環(huán)　　ClearEVENTS　　*---退出VisualFoxPro　　QUIT　　至此,”系統(tǒng)登錄”表單創(chuàng)建完成。<p

52、>　　4.3.2創(chuàng)建“修改密碼”表單　　首先要?jiǎng)?chuàng)建表單界面，在表單中添加3個(gè)標(biāo)簽控件，4個(gè)文本框控件，2個(gè)按鈕控件，布局如下：　　然后向“修改密碼”表單中添加“確定”按鈕的“Click”事件代碼如下：　　SETEXACTON　　*---進(jìn)入數(shù)據(jù)檢查

53、;　　*---檢查原密碼　　SELECT用戶信息　　LOCATEFORALLTRIM(用戶名)=ALLTRIM(THISFORM.txt用戶名.Value);　　.AND.ALLTRIM(密碼)=ALLTRIM(THISFORM.txt原密碼.Value

54、)　　IF.NOT.FOUND()　　MESSAGEBOX(“原密碼錯(cuò)誤,請(qǐng)重新輸入”,48”進(jìn)銷存管理系統(tǒng)”)　　THISFORM.txt原密碼.SetFocus　　RETURN<b&

55、gt;　　ENDIF　　*---如果”密碼”欄為空　　IFEMPTY(ALLTRIM(THISFORM.txt新密碼.Value)).AND.EMPTY(ALLTRIM(THISFORM.txt.確認(rèn)密碼.VALRE))　　MESSAGEBOX(“密碼不能為空”,48,”進(jìn)銷存管理系統(tǒng)”)&l

56、t;/p>　　THISFORM.txt新密碼.SetFocus　　RETURN　　ENDIF　　*---如果兩次密碼不一致　　IFALLTRIM(THISFORM.tx

57、t新密碼.Value)<>ALLTRIM(THISFORM.txt確認(rèn)密碼.VALUE)　　MESSAGEBOX(“密碼與確認(rèn)密碼不一致”,48,”進(jìn)銷存管理系統(tǒng)”)　　THISFORM.txt新密碼.Setfocus　　RETURN<

58、;p>　　ENDIF　　*---獲取表單中各數(shù)據(jù)項(xiàng)的值　　sName=ALLTRIM(THISFORM.txt用戶名.Value)　　sPass=ALLTRIM(TIHSFORM.txt新密碼.Value)

59、*---確定對(duì)話框　　YN=MESSAGEBOX(“確定保存”,4+32,”進(jìn)銷存管理系統(tǒng)”)　　*---如果確認(rèn)　　IFYN=6　　*---修改密碼<

60、/b>　　UPDATE用戶信息SET密碼=sPassWHERE用戶名=sName　　MESSAGEBOX(“密碼修改成功”,64,”進(jìn)銷存管理系統(tǒng)”)　　THISFORM.RELEASE　　ENDIF&l

61、t;p>　　STEEXACTOFF　　“修改密碼”表單中”取消”按鈕的功能設(shè)計(jì)是被單擊退出當(dāng)前表單,該按鈕的”Click”時(shí)間代碼如下:　　THISFORM.Rrlrase　　4.4信息管理模塊設(shè)計(jì)　　本模塊由“商品信息管理”功組成，該功能由“商品信息管理”和“輸入

62、查詢條件”表單完成。　　4.4.1“商品信息管理”表單　　“商品信息管理”表單界面如下圖：　　“商品信息管理”表單中的“CheckEmpty”方法代碼如下：　　*----如果商品信息為空　　IFEOF().AND.BOF().OR

63、RECCOUNT()=0　　THISFORM.MyGroup.CmdTop.Enabled=.F.　　THISFORM.MyGroup.CmdPre.Enabled=.F.　　THISFORM.MyGroup.CmdNext.Enabled=.F.　　THISFORM.M

64、yGroup.CmdBtm.Enabled=.F.　　THISFORM.MyGroup.CmdAdd.Enabled=.F.　　THISFORM.MyGroup.CmdEdit.Enabled=.F.　　THISFORM.MyGroup.CmdDel.Enabled=.F.

65、;　　THISFORM.MyGroup.CmdExit.Enabled=.F.　　Return　　ENDIF　　*—如果“商品消息”表只有一條記錄　　IFRECCOUNT（）=1

66、;　　THISFORM.MyGroup.CmdTop.Enabled=.F.　　THISFORM.MyGroup.CmdPre.Enabled=.F.　　THISFORM.MyGroup.CmdNext.Enabled=.F.　　THISFORM.MyGroup.CmdBtm.Enabled

67、=.F.　　Return　　ENDIF　　*—如果記錄指針位于第1條記錄并且處于“瀏覽”狀態(tài)　　IFBOF（）.OR.RECNO()<=1.AND.THISFORM.FormMode=.F.

68、　　THISFORM.MyGroup.CmdTop.Enabled=.F.　　THISFORM.MyGroup.CmdPre.Enabled=.F.　　THISFORM.MyGroup.CmdNext.Enabled=.T.　　THISFORM.MyGroup.CmdBt

69、m.Enabled=.T.　　Rerurn　　ENDIF　　*—如果記錄指針位于最后1條并且處于“瀏覽”狀態(tài)　　IFBOF（）.OR.RECNO()<=1.AND.THISFORM.Form

70、Mode=.F.　　THISFORM.MyGroup.CmdTop.Enabled=.T.　　THISFORM.MyGroup.CmdPre.Enabled=.T.　　THISFORM.MyGroup.CmdNext.Enabled=.F.　　THISFORM.MyGro

71、up.CmdBtm.Enabled=.F.　　Rerurn　　ENDIF　　*—如果處于“瀏覽”狀態(tài)并且記錄指針位于表中部　　IFTHISFORM.FormMode=.F..AND.RECNO()

72、>1.AND.RECNO()<RECCUNT()　　THISFORM.MyGroup.CmdTop.Enabled=.T.　　THISFORM.MyGroup.CmdPre.Enabled=.T.　　THISFORM.MyGroup.CmdNext.Enabled=.T.<

73、;p>　　THISFORM.MyGroup.CmdBtm.Enabled=.T.　　Rerurn　　ENDIF　　“商品信息管理”表單中的“SetMode”方法代碼如下　　*FormMode

74、為.F.表示為瀏覽狀態(tài)　　*FormMode為.T.表示為修改狀態(tài)　　*—控制表單中文本框　　THISFORM.SETALL(“Readonly”,!FormMode,“textbox”)　　*—控制編輯框&l

75、t;p>　　THISFORM.edt說明.readonly=!formMode　　*—控制組合框　　THISFORM.cmp商品類別.enabled=formMode　　*—控制命令組中的命令按扭　　THISFORM.Mygro

76、p.cmdsearch,Enabled=!formmode　　THISFORM.Mygrop.cmdAdd,Enabled=!formmode　　THISFORM.Mygrop.cmdExit,Enabled=!formmode　　*—移動(dòng)記錄按扭&l

77、t;p>　　THISFORM.Mygrop.cmdTop,Enabled=!formmode　　THISFORM.Mygrop.cmdpre,Enabled=!formmode　　THISFORM.Mygrop.cmdNext,Enabled=!formmode　　THISFORM.Mygrop.cmdBt

78、m,Enabled=!formmode　　*—修改狀態(tài)時(shí)　　Ifformmode=.t.　　THISFORM.mygroup.cmdedit.caption=”保存”　　THISFORM.mygroup.cmdDel.caption=

79、”恢復(fù)”　　THISFORM.mygroup.cmdEdit.Tooltiotext=”保存對(duì)記錄的修改”　　THISFORM.mygroup.cmdDel.Tooltiptext=”s刪除當(dāng)前記錄”　　Endif　　因此，如果要使

80、表的單進(jìn)入“瀏覽”狀態(tài)，則只需要使用如下代碼即可。　　Thisform.formmode=.f.　　Thisform.sermode　　Thisform.refresh　　相應(yīng)地，如果要使表單進(jìn)入“修改”狀態(tài)，則只需要使用如下代碼即可。<p&

81、gt;　　Thisform.formmode=.Ｔ.　　Thisform.sermode　　Thisform.refresh　　“MyGroup”命令組中的“編輯“按鈕”的“Click”事件代碼：　　*—如果是作為“編輯”按扭時(shí)

82、　Ifthis.caption=”編輯”　　*—保存記錄指針位置　　Select商品信息　　Thisform.oldrecord=recno()　　*—使表單進(jìn)入“瀏覽”狀態(tài)　　Thisform.formmode=.t.</

83、p>　　Thisform.setmode　　Thisform.refresh　　Return　　Endif　　*—如果是作為“保存”按扭時(shí)<

84、;p>　　Ifthis.caption=”保存”　　*—如果商品標(biāo)號(hào)為空　　Ifempry(alltrm(thisform.txt商品編號(hào).value))　　Messagebox(“商品編號(hào)不能為空”，48，“進(jìn)銷存管理系統(tǒng)”)　　Thisform.txt商品編號(hào).

85、setfocus　　Rerurn　　endif　　*—如果商品名稱為空　　Ifempty(alltrim(thimform.txt商品名稱.value))

86、　　Messagebox(“商品名稱不能為空”，48，“進(jìn)銷存管理系統(tǒng)”)　　Thisform.txt商品名稱.serfocus　　Return　　Endif　　*—如果商品單位為空</p&

87、gt;　　Ifempty(alltrim(thimform.txt商品單位.value))　　Messagebox(“商品單位不能為空”，48，“進(jìn)銷存管理系統(tǒng)”)　　Thisform.txt商品單位.serfocus　　Return

88、　　Endif　　*—如果商品單位小于或者等于0　　Ifthisform.txt商品單價(jià).value<=0　　messagebox(“商品單位錯(cuò)誤”，48，“進(jìn)銷存管理系統(tǒng)”)　　Thisform.txt商

89、品單位.serfocus　　Return　　Endif　　*—確認(rèn)對(duì)話框　　Yn=messagebox(“確認(rèn)保存”，4+32，“進(jìn)銷存管理系統(tǒng)”)</

90、p>　　*—如果確認(rèn)　　Ifyn=6　　*—試圖保存　　Iftableupdate(.f.)=.f.　　*—如果

91、保存失敗　　messsagebox(“商品編號(hào)錯(cuò)誤”，48，“進(jìn)銷存管理系統(tǒng)”)　　Thisform.txt商品單位.serfocus　　Return　　Endif</p

92、>　　*—表單進(jìn)入“瀏覽”狀態(tài)　　Thisform.frmmode=.f.　　Thisform.setmode　　Thisform.refresh　　Endif&l

93、t;b>　　Endif　　“MyGroup”命令組中的“刪除”按鈕的“Click”事件代碼：　　*—如果按扭標(biāo)題為“恢復(fù)”　　Ifthisform.caption=”恢復(fù)”　　*—確認(rèn)對(duì)話框

94、;　　Yn=messagebox(“確認(rèn)取消對(duì)記錄的修改”，4+32，“進(jìn)銷存管理系統(tǒng)”)　　如果確認(rèn)　　Ifyn=6　　*—恢復(fù)記錄

95、　Tablerevert(.f.)　　Select商品信息　　*—移動(dòng)記錄指針　　Ifthisform.oldrecord>0　　Gothisform.oldrecord

96、;　　Endif　　*—回到“瀏覽”狀態(tài)　　Thisform.formmode=.f.　　Thisform.setmode　　Thisform.refresh　　Endif

97、　　return　　Endif　　*—如果按扭標(biāo)題為“刪除”　　Ifthisform.caption=”刪除”　　*—確認(rèn)對(duì)話框<

98、/b>　　Yn=messagebox(“確認(rèn)刪除”，4+32，“進(jìn)銷存管理系統(tǒng)”)　　如果確認(rèn)　　Ifyn=6　　*—?jiǎng)h除記錄&

99、lt;p>　　Select商品信息　　Delef　　pack　　Thisform.checkempty　　Endif<p&

100、gt;　　Endif　　“退出”按鈕的“Click”事件代碼如下：　　THISFORM.Release　　至此，“商品信息管理”表單創(chuàng)建完成。　　4.4.2“輸入查詢條件”表單　　在項(xiàng)目管理器

101、中新建一個(gè)表單作為“輸入查詢條件”表單，保存為“Searchkey”,在表單中添加一個(gè)文本框控件，一個(gè)組合框控件，兩個(gè)標(biāo)簽控件和兩個(gè)按鈕控件。向頁(yè)面中添加控件，如圖：　　輸入查詢條件”表單中的“確定”按鈕的“Click”事件代碼：　　*—聲明變量　　LOCALFindStr,

102、oldRecord,STable　　*—如果沒有選擇查詢字段　　IFTHISFORM.FindLX.Value==””　　MESSAGEBOX(“沒有選擇查詢字段”,48,”進(jìn)銷存管理系統(tǒng)”)　　*—如果選擇了字段

103、　　*—模糊比較　　SETEXACTOFF　　SELECT商品信息　　*—根據(jù)選項(xiàng)指定查詢條件　　DOCASE　　CASETHISF

104、ORM.FindLX.Value=”商品編號(hào)”　　FindStr=”’”+ALLTRIM(THISFORM.FindKey.value)=”’$”+”商品編號(hào)”　　CASETHISFORM.FindLX.Value=”商品名稱”　　FindStr=”’”+ALLTRIM(THISFORM.FindKey.valu

105、e)=”’$”+”商品名稱”　　CASETHISFORM.FindLX.Value=”商品產(chǎn)地”　　FindStr=”’”+ALLTRIM(THISFORM.FindKey.value)=”’$”+”商品產(chǎn)地”　　CASETHISFORM.FindLX.Value=”商品類別”<p&

106、gt;　　FindStr=”’”+ALLTRIM(THISFORM.FindKey.value)=”’$”+”商品類別”　　ENDCASE　　*—保存記錄指針位置　　oldRecord=RECNO()　　*—設(shè)置過濾

107、條件　　SETFILTERTO&FindStr　　GOTOP　　*—循環(huán)　　DOWHILE.NOT.EOF()　　*—刷新“商

108、品信息管理”表單　　PreAdmin.Refresh　　*—將表單最小化　　THISFORM.WindowState=1　　IFMESSAGEBOX(“是本筆記錄嗎？”，4+32,“進(jìn)銷存管理系統(tǒng)”）=6<

109、;p>　　*—已找到指定的記錄　　EXIT　　ELSE　　*—未找到指定的記錄　　SKIP　　*—刷新“商品信

110、息管理”表單　　ProAdmin.Refesh　　ENDIF　　*—將表單還原　　THISFORM.WindowState=0　　END

111、DO　　*—如果到了表的末尾　　IFEOF()　　MESSAGEBOX（“未找到指定的記錄”，48，“進(jìn)銷存管理系統(tǒng)”）　　*—回到原紀(jì)錄<p&g

112、t;　　GOoldRecord　　ENDIF　　*—清楚過濾條件　　SETFILTERTO　　*—刷新“商品信息管理”表單　　ProAdmin.Refre

113、sh　　*—退出當(dāng)前表單　　THISFORM.RELEASE　　ENDIF　　“輸入查詢條件”表單中的“取消”按鈕的“Click”事件代碼：　　THISF

114、ORM.RELEASE　　至此，“輸入查詢條件”表單創(chuàng)建完成。　　4.5日常操作模塊設(shè)計(jì)　　“超市進(jìn)銷存管理系統(tǒng)“中的日常操作模塊包括“商品進(jìn)貨操作”和“商品出貨”操作功能，分別由“商品進(jìn)貨操作”表單和“商品出貨”表單來完成。　　4.5.1“商品進(jìn)貨操作”表單</p

115、>　　創(chuàng)建表單界面：添加一個(gè)復(fù)選框和兩個(gè)按鈕控件，將“進(jìn)貨信息”表，“商品信息”表和“庫(kù)存信息表”添加到表單的數(shù)據(jù)環(huán)境中?？丶季秩缦拢?lt;/p>　　添加“AUTOADD’函數(shù)代碼：　　*—作用：使“000000XX”形式的編號(hào)自動(dòng)加1　　FUNCTIONAUTOADD(nCode)</p

116、>　　*---獲取字符串長(zhǎng)度　　nLen=Len(nCode)　　*---將字符型轉(zhuǎn)換為數(shù)值型，即獲取非0部分的數(shù)值　　nCode=VAL(nCode)　　*---非0部分?jǐn)?shù)字加1　　nCode=nCo

117、de+1　　*—轉(zhuǎn)換為字符型　　nCode=ALLTRIM(STR(nCode))　　*—獲取轉(zhuǎn)換后的字符長(zhǎng)度　　nLength=LEN(nCode)　　*—在數(shù)字之前加上前置“0”</

118、p>　　nZero=”0000000000”　　nCode=SUBSTR(nZero,1,nLen-nLength)+nCode　　*—返回結(jié)果　　RETURNnCode　　ENDFUNC

119、　　4.5.2“商品出貨操作”表單　　創(chuàng)建表單界面：在項(xiàng)目管理器中新建一個(gè)表單為“商品出貨表單”,命名為：”“OutAct”，將將“進(jìn)貨信息”表，“商品信息”表和“庫(kù)存信息表”添加到表單的數(shù)據(jù)環(huán)境中，從數(shù)據(jù)環(huán)境中將要在表單中顯示的字段拖到表單中，并做適當(dāng)調(diào)整，然后添加一個(gè)復(fù)選框控件，兩個(gè)按鈕控件，創(chuàng)建好的表單布局如下圖：</p&

120、gt;　　添加“商品出貨操作”表單的“INIIT”事件代碼：　　*—使用當(dāng)前日期生成進(jìn)貨編號(hào)前6位　　LeftNo=SUBSTR(ALLTRIM(STR(YEAR(date())))、3)；　　+ALLTRIM（STR（MONTH（date()）））;

121、;　　+ALLTRIM(STR(DAY(date())));　　*__從“出貨信息”中生成進(jìn)貨編號(hào)后4位　　SELECT出貨信息　　SETORDERTO出貨編號(hào)　　SETFRLTERTO　　SETFRLTERTOTTOD（出貨信息

122、.出貨時(shí)間）==DATE()　　GOBOTTOM　　IF出貨信息.出貨編號(hào)==””　　RighNo=“0000”　　ELSE　　RighNo=Substr

123、(出貨信息.出貨編號(hào)、7）　　ENDIF　　*-----對(duì)后4位增1　　RighNo=AutoAdd(RightNo)　　*--完整編號(hào)　　FullNo=

124、LeftNo+RightNo　　*----在表單中顯示　　THISFORM.txt出貨編號(hào).Value=FullNo　　THISFORM.txt出貨時(shí)間.Value=datetime()　　THISFORM.txt出貨數(shù)量.Value=0<p

125、>　　THISFORM.txt出貨單價(jià).Value=0　　THISFORM.txt經(jīng)手人.Value=””　　THISFORM.txt接收人.Value=””　　THISFORM.cmb商品編號(hào).Value=””　　*---刷新表單</b&g

126、t;　　THISFORM.Refresh　　添加“商品出貨操作”表單的“確定”按鈕的事件代碼：　　*---獲取表單中的數(shù)據(jù)　　OutNo=ALLTRIM(THISFORM.txt出貨編號(hào).Value　　PNo=THISFORM.c

127、mb商品編號(hào).Value　　OutCount=THISFORM.txt出貨數(shù)量.Value　　OutPrice=THISFORM.txt出貨單價(jià).Value　　OutTime=THISFORM.txt出貨時(shí)間.Value　　OutPerson=ALLTRIM(THISFO

128、RM.txt經(jīng)手人.Value.　　OutDanwei=ALLTRIM(THISFORM.txt接收人.Value.　　OutNote=THISFORM.edt說明.Value　　*---如果商品編號(hào)為空　　IFPNo==””<

129、/p>　　MESSAGEBOX(“商品編號(hào)為空或錯(cuò)誤”,48,”進(jìn)銷存管理系統(tǒng)”)　　THISFORM.cmb商品編號(hào).SetFocus　　Return　　ENDIF

130、　*---檢查商品編號(hào)合法性　　DIMENSIONRecNum(1)　　RecNum=2　　SELECTCOUNT(*)FROM商品信息WHERE商品編號(hào)=PNoINTOARRAYRecNum　　IFRecNum<1</p

眾賞文庫(kù)> 全部分類> 畢業(yè)設(shè)計(jì)

溫馨提示

1. 本站所有資源如無(wú)特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
5. 眾賞文庫(kù)僅提供信息存儲(chǔ)空間，僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請(qǐng)與我們聯(lián)系，我們立即糾正。
7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

評(píng)論

0/150

提交評(píng)論

 聯(lián)系客服

本站為文檔C2C交易模式，即用戶上傳的文檔直接被用戶下載，本站只是中間服務(wù)平臺(tái)，本站所有文檔下載所得的收益歸上傳人(含作者)所有。眾賞文庫(kù)僅提供信息存儲(chǔ)空間，僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對(duì)上載內(nèi)容本身不做任何修改或編輯。若文檔所含內(nèi)容侵犯了您的版權(quán)或隱私，請(qǐng)立即通知眾賞文庫(kù)，我們立即給予刪除！

備案號(hào): 經(jīng)營(yíng)許可證編號(hào):浙ICP備20018660號(hào)

/ 46

  0
 分享

復(fù)制分享文檔地址

http://m.facezit.com/shtml/view-3375517.html

復(fù)制

下載本文檔

vfp畢業(yè)論文說明書---超市管理系統(tǒng)

文檔簡(jiǎn)介

溫馨提示

最新文檔

評(píng)論

免費(fèi)下載