畢業(yè)設(shè)計(jì)論文---企業(yè)生產(chǎn)管理系統(tǒng)

1、<p><b>　　圖書(shū)館收藏</b></p><p>　　中圖分類(lèi)號(hào)： 密級(jí)：</p><p>　　UDC： 編號(hào)：</p&

2、gt;<p>　　畢業(yè)設(shè)計(jì)成績(jī)?cè)u(píng)定書(shū) </p><p>　　專(zhuān)業(yè)、班級(jí) 姓名 日期 </p><p>　　1、設(shè)計(jì)題目 企業(yè)生產(chǎn)管理系統(tǒng) </p><p>　　2、設(shè)計(jì)指導(dǎo)教師（簽名）

3、 </p><p>　　3、設(shè)計(jì)評(píng)閱人（簽名） 評(píng)閱日期 </p><p>　　4、評(píng)定意見(jiàn)及成績(jī) </p><p><b>　　年 月 日</b>&l

4、t;/p><p><b>　　中文摘要</b></p><p>　　企業(yè)生產(chǎn)管理系統(tǒng)是根據(jù)企業(yè)生產(chǎn)過(guò)程中的實(shí)際需求開(kāi)發(fā)的一套管理軟件對(duì)于生，產(chǎn)過(guò)程中的產(chǎn)品、物料及設(shè)備進(jìn)行系統(tǒng)化的管理，將產(chǎn)品的生產(chǎn)及物料的需求生成計(jì)劃單的同時(shí)，配備了全方位的查詢(xún)功能。對(duì)于物料及完工的產(chǎn)品進(jìn)行入庫(kù)集中管理，在確保企業(yè)正常生產(chǎn)的同時(shí)，降低了庫(kù)存成本，提高了生產(chǎn)效率。</p>&l

5、t;p>　　本文設(shè)計(jì)的生產(chǎn)管理系統(tǒng)具有以下功能：</p><p>　　(1) 能夠控制產(chǎn)品的基本信息、物料的基本信息、設(shè)備狀態(tài)設(shè)置、設(shè)備類(lèi)型設(shè)置、設(shè)備攤銷(xiāo)時(shí)間設(shè)置以及車(chē)間部門(mén)設(shè)置，能隨時(shí)了解生產(chǎn)設(shè)置的情況。</p><p>　　(2) 生產(chǎn)過(guò)程中能夠?qū)Ξa(chǎn)品庫(kù)存進(jìn)行管理，隨時(shí)掌握產(chǎn)品完工入庫(kù)的進(jìn)度情況，物料入庫(kù)情況，生產(chǎn)領(lǐng)料情況，同時(shí)能夠完成對(duì)產(chǎn)品庫(kù)存、物料入庫(kù)、生產(chǎn)領(lǐng)料及物料庫(kù)存信息

6、的查詢(xún)，隨時(shí)掌握庫(kù)存信息，便于產(chǎn)品的營(yíng)銷(xiāo)調(diào)配。</p><p>　　(3) 可以完成用戶(hù)權(quán)限的設(shè)置和校驗(yàn)，及其他常用信息的設(shè)置。</p><p>　　系統(tǒng)的運(yùn)行對(duì)運(yùn)行環(huán)境有如下一些要求：使用 Microsoft公司的 SQL Server作為后臺(tái)數(shù)據(jù)庫(kù)，設(shè)計(jì)數(shù)據(jù)庫(kù)，使用 Microsoft公司的 Visual Basic開(kāi)發(fā)工具，利用其提供的各種面向?qū)ο蟮拈_(kāi)發(fā)工具，使用ADO控件連接數(shù)據(jù)庫(kù)

7、，開(kāi)發(fā)出產(chǎn)品。</p><p>　　關(guān)鍵字：ADO，窗體，數(shù)據(jù)庫(kù)。</p><p><b>　　Abstract</b></p><p>　　The administration of office system is the informationmanagement system,Its development function mainl

8、y includes:Through the computermanagement dossier, the daily work, the realization work with no paper at all,the analysis unit present situation and staff's work performance,examines the highly effective rope through

9、 the formidable inquiry and the rope to pick out the data, enhances the management efficiency.</p><p>　　Uses Microsoft Corporation SQL Server to take the backstage database,The design database, uses Microsof

10、t Corporation Visual the Basic development kit, uses each kind of object-oriented development kit which it provides, Uses ADO to control the connection database, develops the product.</p><p>　　Key words: ADO

11、;windows;databas</p><p><b>　　目 錄</b></p><p><b>　　1 緒論1</b></p><p>　　1.1 企業(yè)生產(chǎn)管理系統(tǒng)的發(fā)展1</p><p>　　1.2 設(shè)計(jì)系統(tǒng)的必要性與可行性2</p><p>　　1.3

12、項(xiàng)目開(kāi)發(fā)背景及意義3</p><p>　　2 開(kāi)發(fā)企業(yè)生產(chǎn)管理系統(tǒng)4</p><p>　　2.1 編程環(huán)境的選擇4</p><p>　　2.2 關(guān)系型數(shù)據(jù)庫(kù)的實(shí)現(xiàn)4</p><p>　　2.3 二者的結(jié)合（ADO）4</p><p><b>　　3 系統(tǒng)分析6</b></p>

13、;<p>　　3.1 開(kāi)發(fā)背景6</p><p>　　3.2 系統(tǒng)需求分析6</p><p><b>　　4 需求分析7</b></p><p>　　4.1 軟件功能需求分析7</p><p>　　4.2 數(shù)據(jù)庫(kù)設(shè)計(jì)8</p><p>　　4.3 設(shè)計(jì)原則8</p&

14、gt;<p>　　5 系統(tǒng)概要設(shè)計(jì)10</p><p>　　5.1 系統(tǒng)的前期設(shè)計(jì)10</p><p>　　5.1.1 應(yīng)用程序設(shè)計(jì)結(jié)構(gòu)10</p><p>　　5.1.2 多用戶(hù)登陸問(wèn)題10</p><p>　　5.1.3 多文檔界面10</p><p>　　5.2 數(shù)據(jù)庫(kù)設(shè)計(jì)10</

15、p><p>　　5.3 系統(tǒng)主要實(shí)現(xiàn)的功能14</p><p>　　6 系統(tǒng)詳細(xì)設(shè)計(jì)17</p><p>　　6.1 用戶(hù)界面的實(shí)現(xiàn)17</p><p>　　6.2 其他功能的實(shí)現(xiàn)18</p><p><b>　　7 系統(tǒng)測(cè)試32</b></p><p><b&

16、gt;　　8 運(yùn)行維護(hù)34</b></p><p>　　8.1 系統(tǒng)運(yùn)行維護(hù)34</p><p>　　8.2 系統(tǒng)的改進(jìn)與提高34</p><p><b>　　9 關(guān)鍵技術(shù)35</b></p><p><b>　　10 結(jié)束語(yǔ)36</b></p><p>

17、;<b>　　致 謝37</b></p><p><b>　　附 錄38</b></p><p><b>　　參考文獻(xiàn)40</b></p><p><b>　　1 緒 論</b></p><p>　　1.1 企業(yè)生產(chǎn)管理系統(tǒng)的發(fā)展<

18、/p><p>　　企業(yè)生產(chǎn)在不同的領(lǐng)域里有著不同的概念，在管理科學(xué)領(lǐng)域中，通常認(rèn)為企業(yè)生產(chǎn)是經(jīng)過(guò)加工處理后的一種數(shù)據(jù)形式，是一種有次序的符號(hào)排列，它是系統(tǒng)傳輸和處理的對(duì)象。處在企業(yè)生產(chǎn)時(shí)代的今天，企業(yè)生產(chǎn)的作用越來(lái)越為人們所重視。制定工作計(jì)劃，研究投資策略，都離不開(kāi)對(duì)企業(yè)生產(chǎn)的充分利用。企業(yè)生產(chǎn)管理系統(tǒng)（Management Information System,縮寫(xiě)MIS）是一種“人機(jī)系統(tǒng)”，它以特定的模式支持

19、一個(gè)組織內(nèi)各級(jí)組織機(jī)構(gòu)之間的通訊，對(duì)企業(yè)生產(chǎn)資源進(jìn)行綜合開(kāi)發(fā)，管理和利用，實(shí)現(xiàn)對(duì)該組織的有效管理。它通過(guò)對(duì)數(shù)據(jù)的加工處理，及時(shí)為管理與決策分析提供企業(yè)生產(chǎn)。其特點(diǎn)有：</p><p>　　（1）數(shù)據(jù)全部存儲(chǔ)于計(jì)算機(jī)系統(tǒng)中；</p><p>　?。?）用戶(hù)使用簡(jiǎn)單、操作方便、查詢(xún)速度快；</p><p>　?。?）有極強(qiáng)的人-機(jī)對(duì)話功能；</p><

20、;p>　　（4）能直接從計(jì)算機(jī)系統(tǒng)中提供決策所需的參考企業(yè)生產(chǎn)。</p><p>　　從企業(yè)生產(chǎn)管理的角度來(lái)講，人們已經(jīng)產(chǎn)生一種共識(shí)，那就是“企業(yè)生產(chǎn)管理是企業(yè)最珍貴的資產(chǎn)”?，F(xiàn)在，企業(yè)生產(chǎn)管理不僅是企業(yè)最珍貴的資產(chǎn)，而且應(yīng)該是唯一“動(dòng)態(tài)的資產(chǎn)”。</p><p>　　一個(gè)企業(yè)，無(wú)論是土地，還是設(shè)備，還是流動(dòng)資金，他們的實(shí)質(zhì)都是靜態(tài)資產(chǎn)。人們認(rèn)為財(cái)務(wù)管理首要的是講“管好錢(qián)”。其實(shí)錢(qián)是

21、屬于靜態(tài)資產(chǎn)，錢(qián)是不會(huì)跑的，它又沒(méi)有長(zhǎng)腳。如果說(shuō)錢(qián)會(huì)跑，是因?yàn)橛腥巳?dòng)他，所以不是錢(qián)的問(wèn)題，仍然是人的問(wèn)題。錢(qián)是不能主動(dòng)創(chuàng)造價(jià)值的，即使是被投資于很好的項(xiàng)目，也是人做的決定，也是由人在那里管理。所以，唯有人的行為才是動(dòng)態(tài)的，只有人的行為才能創(chuàng)造價(jià)值。</p><p>　　因此，開(kāi)發(fā)這樣一套管理軟件成為很有必要的事情，在下面的各章中我們將開(kāi)發(fā)一套企業(yè)生產(chǎn)管理系統(tǒng)，談?wù)勂溟_(kāi)發(fā)過(guò)程和所涉及到的問(wèn)題及解決方法。</

22、p><p>　　1.2 設(shè)計(jì)系統(tǒng)的必要性與可行性</p><p>　　可行性分析（可行性分析）也稱(chēng)為可行性研究，是在系統(tǒng)調(diào)查的基礎(chǔ)上，針對(duì)新系統(tǒng)的開(kāi)發(fā)是否具備必要性和可能性，對(duì)新系統(tǒng)的開(kāi)發(fā)從技術(shù)、經(jīng)濟(jì)、社會(huì)的方面進(jìn)行分析和研究，以避免投資失誤，保證新系統(tǒng)的開(kāi)發(fā)成功?？尚行匝芯康哪康木褪怯米钚〉拇鷥r(jià)在盡可能短的時(shí)間內(nèi)確定問(wèn)題是否能夠解決。一般而言，良好的企業(yè)生產(chǎn)管理，有助于為企業(yè)達(dá)到以下的目標(biāo)：

23、</p><p>　　（1）協(xié)助組織達(dá)成發(fā)展目標(biāo)與遠(yuǎn)景；</p><p>　?。?）有效地運(yùn)用人員的能力與技術(shù)專(zhuān)才；</p><p>　?。?）滿(mǎn)足組織成員的自我實(shí)現(xiàn)感與增加成員的工作成就感；</p><p>　?。?）發(fā)起且落實(shí)組織變革；</p><p>　?。?）提高組織成員的工作生活品質(zhì)；</p>

24、<p>　　（7）協(xié)助企業(yè)負(fù)責(zé)人做出正確決策。</p><p>　　根據(jù)實(shí)際情況，我們使用ADO控件少量代價(jià)快速地構(gòu)造一個(gè)可執(zhí)行的軟件系統(tǒng)模型。使用戶(hù)和開(kāi)發(fā)人員可以較快地確定需求，然后采用循環(huán)進(jìn)化的開(kāi)發(fā)方式，對(duì)系統(tǒng)模型作連續(xù)的精化，將系統(tǒng)需具備的性質(zhì)逐漸增加上去，直到所有的性質(zhì)全部滿(mǎn)足。</p><p>　　現(xiàn)代計(jì)算機(jī)軟硬件的發(fā)展使得本系統(tǒng)具有良好的操作界面，簡(jiǎn)單直接的操作界面，

25、具有較強(qiáng)的人機(jī)對(duì)話能力，支持多種漢字輸入方式，其適應(yīng)性強(qiáng)，顯示內(nèi)容簡(jiǎn)單明了，使操作者不必具有較高的計(jì)算機(jī)專(zhuān)業(yè)知識(shí)，也不必進(jìn)行專(zhuān)門(mén)培訓(xùn)，稍一接觸就可以上手進(jìn)行所有操作。</p><p>　　企業(yè)生產(chǎn)管理系統(tǒng)基本框架如圖1-1所示：</p><p>　　1.3 項(xiàng)目開(kāi)發(fā)背景及意義</p><p>　　傳統(tǒng)的企業(yè)生產(chǎn)管理，主要靠人工管理，每天要處理的數(shù)據(jù)很大，而且不利于企

26、業(yè)生產(chǎn)管理人員把握每種產(chǎn)品，原料以及生產(chǎn)規(guī)劃，統(tǒng)計(jì)報(bào)表繁瑣，而且時(shí)間過(guò)久容易出錯(cuò)。對(duì)于一個(gè)企業(yè)，特別是對(duì)于發(fā)展中的，有一定規(guī)模的企業(yè)，如果不能及時(shí)分析企業(yè)的生產(chǎn)狀況，就會(huì)影響整個(gè)企業(yè)的運(yùn)作，所以企業(yè)生產(chǎn)管理系統(tǒng)，可使這些產(chǎn)品管理，生產(chǎn)管理，原料規(guī)劃，統(tǒng)計(jì)等工作通過(guò)自動(dòng)化和規(guī)范化的方式完成。</p><p>　　現(xiàn)在企業(yè)之間競(jìng)爭(zhēng)比較激烈，所以如何規(guī)范生產(chǎn)管理，擴(kuò)大銷(xiāo)售量，提高產(chǎn)品質(zhì)量是首要問(wèn)題。生產(chǎn)管理包括產(chǎn)品信息

27、的管理、原料信息管理，生產(chǎn)規(guī)劃，產(chǎn)品銷(xiāo)售，原料訂購(gòu)等。在一般企業(yè)中，需要能實(shí)時(shí)和正確地控制產(chǎn)品的生產(chǎn)，銷(xiāo)售情況。這樣，一個(gè)能夠?qū)崿F(xiàn)企業(yè)生產(chǎn)管理規(guī)范化、自動(dòng)化的售后管理系統(tǒng)就顯得很必要了。本生產(chǎn)管理系統(tǒng)就是為了適應(yīng)這種需求而設(shè)計(jì)的。生產(chǎn)管理直接影響到一個(gè)企業(yè)的形象和銷(xiāo)售，而且要很大的投入，即要好的服務(wù)，又要節(jié)約投資，這是一個(gè)矛盾，要想很好地解決，要有正確及時(shí)的數(shù)據(jù)作為保證。</p><p>　　企業(yè)生產(chǎn)管理系統(tǒng)的開(kāi)

28、發(fā)，可有效實(shí)現(xiàn)對(duì)公司售后管理的系統(tǒng)化、規(guī)范化和自動(dòng)化，提高售后管理水平。</p><p>　　2 開(kāi)發(fā)企業(yè)生產(chǎn)管理系統(tǒng)</p><p>　　2.1 編程環(huán)境的選擇</p><p>　　微軟公司的Visual Basic 6.0是Windows應(yīng)用程序開(kāi)發(fā)工具，是目前最為廣泛的，易學(xué)易用的面向?qū)ο蟮拈_(kāi)發(fā)工具。Visual Basic提供了大量的控件，這些控件可用于設(shè)計(jì)

29、界面和實(shí)現(xiàn)各種功能，減少了編程人員的工作量，也簡(jiǎn)化了界面設(shè)計(jì)過(guò)程，從而有效的提高了應(yīng)用程序的運(yùn)行效率和可靠性。故而，實(shí)現(xiàn)本系統(tǒng)VB是一個(gè)相對(duì)較好的選擇。</p><p>　　Visual Basic 6.0是一個(gè)非常優(yōu)秀的數(shù)據(jù)庫(kù)應(yīng)用工具完全支持面向?qū)ο蟮拈_(kāi)發(fā)。它擁有多種數(shù)據(jù)庫(kù)接口，可以非常方便地連接到各種數(shù)據(jù)源再加之其專(zhuān)利產(chǎn)品，程序員不需編寫(xiě)任何SQL語(yǔ)句即可輕松地查詢(xún)和更新后數(shù)據(jù)庫(kù)中的數(shù)據(jù)，這使當(dāng)時(shí)的同類(lèi)開(kāi)發(fā)工

30、具望塵莫及。Visual Basic 6.0的主要特點(diǎn)有以下幾個(gè)方面：</p><p>　?。?）開(kāi)發(fā)效率高，成本低；</p><p>　?。?）它是面向?qū)ο蟮拈_(kāi)發(fā)工具，代碼的可重用好，用它開(kāi)發(fā)的數(shù)據(jù)庫(kù)應(yīng)用程序易于維護(hù)；</p><p>　　（3）對(duì)數(shù)據(jù)庫(kù)的應(yīng)用開(kāi)發(fā)有著特殊的支持，特別適合做企業(yè)生產(chǎn)系統(tǒng)的開(kāi)發(fā)；</p><p>　?。?）提供

31、了豐富的對(duì)象、控件函數(shù)，為開(kāi)發(fā)人員提供良好的用戶(hù)界面和編制功能的應(yīng)用軟件提供了便利的條件。</p><p>　　2.2 關(guān)系型數(shù)據(jù)庫(kù)的實(shí)現(xiàn)</p><p>　　SQL Server2000 就是關(guān)系數(shù)據(jù)庫(kù)開(kāi)發(fā)工具，數(shù)據(jù)庫(kù)能匯集各種企業(yè)生產(chǎn)以供查詢(xún)、存儲(chǔ)和檢索。SQL Server 的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定義窗體收集企業(yè)生產(chǎn)。數(shù)據(jù)表示圖提供了一種類(lèi)似于 Excel 的電子表格，可以

32、使數(shù)據(jù)庫(kù)一目了然。另外，SQL Server 允許創(chuàng)建自定義報(bào)表用于打印或輸出數(shù)據(jù)庫(kù)中的企業(yè)生產(chǎn)。SQL Server也提供了數(shù)據(jù)存儲(chǔ)庫(kù)，可以使用桌面數(shù)據(jù)庫(kù)企業(yè)生產(chǎn)把數(shù)據(jù)庫(kù)企業(yè)生產(chǎn)置于網(wǎng)絡(luò)企業(yè)生產(chǎn)服務(wù)器，與其他網(wǎng)絡(luò)用戶(hù)共享數(shù)據(jù)庫(kù)。SQL Server 是一種關(guān)系數(shù)據(jù)庫(kù)工具，關(guān)系數(shù)據(jù)庫(kù)是已開(kāi)發(fā)的最通用的數(shù)據(jù)庫(kù)之一。如上所述，SQL Server 作為關(guān)系數(shù)據(jù)庫(kù)開(kāi)發(fā)具備了許多優(yōu)點(diǎn)，可以在一個(gè)數(shù)據(jù)包中同時(shí)擁有桌面數(shù)據(jù)庫(kù)的便利和關(guān)系數(shù)據(jù)庫(kù)的強(qiáng)大

33、功能。</p><p>　　2.3 二者的結(jié)合（ADO）</p><p>　　微軟的JET數(shù)據(jù)庫(kù)引擎提供了與數(shù)據(jù)庫(kù)打交道的途徑，我們是通過(guò)它以及Visual Basic 來(lái)訪問(wèn)數(shù)據(jù)庫(kù)并對(duì)其進(jìn)行各種操作。Visual Basic、SQL Server以及其他微軟的軟件產(chǎn)品都是通過(guò)共用JET數(shù)據(jù)庫(kù)引擎，從而給用戶(hù)提供了豐富的數(shù)據(jù)類(lèi)型。</p><p>　　企業(yè)生產(chǎn)管理系

34、統(tǒng)開(kāi)發(fā)大概可以分成五個(gè)階段，各階段工作如下：</p><p>　?。?）系統(tǒng)調(diào)查分析階段。密切與用戶(hù)聯(lián)系，通過(guò)走訪、詢(xún)問(wèn)、查閱原始的圖標(biāo)和數(shù)據(jù)，獲得原始資料，了解企業(yè)生產(chǎn)管理系統(tǒng)功能、作用、用戶(hù)的需求以及企業(yè)生產(chǎn)管理系統(tǒng)應(yīng)該包括的服務(wù)內(nèi)容等。</p><p>　?。?）數(shù)據(jù)庫(kù)與表的建立階段。此階段主要任務(wù)是根據(jù)企業(yè)生產(chǎn)管理系統(tǒng)調(diào)查分析階段的結(jié)果建立與企業(yè)生產(chǎn)管理系統(tǒng)相關(guān)的數(shù)據(jù)庫(kù)和表，并且進(jìn)

35、行數(shù)據(jù)規(guī)范化。</p><p>　?。?）表單生成階段。這一階段主要任務(wù)是在用戶(hù)參與的情況下創(chuàng)建企業(yè)生產(chǎn)管理系統(tǒng)用戶(hù)界面。主要使用Visual Basic作為開(kāi)發(fā)工具，選用有關(guān)控件、設(shè)置控件屬性、設(shè)計(jì)程序窗口布局、初始化界面等，其結(jié)果是建立一套友好的企業(yè)生產(chǎn)管理系統(tǒng)用戶(hù)界面，方便使用者操作企業(yè)生產(chǎn)管理系統(tǒng)。</p><p>　　（4）代碼生成和文檔生成。這一階段要根據(jù)企業(yè)生產(chǎn)管理系統(tǒng)具體的

36、需要編寫(xiě)軟件程序代碼，同時(shí)同步生成企業(yè)生產(chǎn)管理系統(tǒng)文檔。</p><p>　?。?）調(diào)試和發(fā)布。通過(guò)調(diào)試找到企業(yè)生產(chǎn)管理系統(tǒng)程序中不合理的操作和錯(cuò)誤，并且改正。根據(jù)時(shí)間進(jìn)度，安排企業(yè)生產(chǎn)管理人員試用企業(yè)生產(chǎn)管理系統(tǒng)軟件，由使用者提出企業(yè)生產(chǎn)管理系統(tǒng)中存在的問(wèn)題與修改意見(jiàn)，根據(jù)用戶(hù)要求修訂企業(yè)生產(chǎn)管理系統(tǒng)軟件功能，重新調(diào)試企業(yè)生產(chǎn)管理系統(tǒng)。調(diào)試完畢系統(tǒng)正?？捎茫纯砂l(fā)布。</p><p>　

37、　從技術(shù)角度上來(lái)說(shuō)，Visual Basic已經(jīng)對(duì)上面的各個(gè)階段的設(shè)計(jì)工作提供了非常完善的支持，所以使用Visual Basic輔助開(kāi)發(fā)企業(yè)生產(chǎn)管理系統(tǒng)是可行的。同時(shí)，軟件開(kāi)發(fā)人員的專(zhuān)業(yè)知識(shí)也完全可以勝任，不需太大的投資。</p><p><b>　　3 系統(tǒng)分析</b></p><p><b>　　3.1 開(kāi)發(fā)背景</b></p>

38、<p>　　隨著我國(guó)市場(chǎng)經(jīng)濟(jì)的快速發(fā)展和信息化水平的不斷提高，如何利用先進(jìn)的管理手段，提高企業(yè)生產(chǎn)管理的水平，是當(dāng)今社會(huì)所面臨的一個(gè)課題。要想提高企業(yè)的管理水平，必須全方位地提高企業(yè)的管理意識(shí)。只有高標(biāo)準(zhǔn)、高質(zhì)量的管理才能滿(mǎn)足企業(yè)的發(fā)展需求。面對(duì)信息時(shí)代的挑戰(zhàn)，利用高科技手段來(lái)提高企業(yè)的生產(chǎn)管理無(wú)疑是一條行之有效的途徑。在某種意義上，信息與科技在企業(yè)管理與現(xiàn)代化建設(shè)中顯現(xiàn)出越來(lái)越重要的地位。企業(yè)生產(chǎn)管理方面的信息化與科學(xué)化，

39、已成為現(xiàn)代化生活水平步入高臺(tái)階的重要標(biāo)志。</p><p>　　3.2 系統(tǒng)需求分析</p><p>　　利用計(jì)算機(jī)實(shí)現(xiàn)企業(yè)的生產(chǎn)管理勢(shì)在必行。對(duì)于大中型企業(yè)來(lái)說(shuō)，利用計(jì)算機(jī)支持企業(yè)高效率完成采購(gòu)管理的日常事務(wù)，是適應(yīng)現(xiàn)代企業(yè)制度要求、推動(dòng)企業(yè)勞動(dòng)型管理走向科學(xué)化、規(guī)范化的必要條件；而生產(chǎn)管理是一項(xiàng)瑣碎、復(fù)雜而又十分細(xì)致的工作，其產(chǎn)品管理，原料管理，生產(chǎn)規(guī)劃，統(tǒng)計(jì)報(bào)表等，一般不允許出錯(cuò)，如

40、果實(shí)行手工操作，須手工填制大量的表格，這就會(huì)耗費(fèi)工作人員大量的時(shí)間和精力，計(jì)算機(jī)進(jìn)行生產(chǎn)工作的管理，不僅能夠保證各項(xiàng)信息準(zhǔn)確無(wú)誤、快速輸出，同時(shí)具有手工管理所無(wú)法比擬的優(yōu)點(diǎn)。例如：檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等。這些優(yōu)點(diǎn)能夠極大地提高企業(yè)管理的效率，也是企業(yè)的科學(xué)化、正規(guī)化管理，與世界接軌的重要條件。</p><p><b>　　4 需求分析</b><

41、;/p><p>　　4.1 軟件功能需求分析</p><p>　?。?）系統(tǒng)完整性要求</p><p>　　本軟件系統(tǒng)要為中小型企業(yè)提供一套比較完整的服務(wù)。這使企業(yè)便于管理，在各個(gè)環(huán)節(jié)發(fā)揮作用，方便溝通。</p><p>　?。?）系統(tǒng)安全性要求</p><p>　　系統(tǒng)不僅是方便操作人員，也是出于安全策略。在各個(gè)子系統(tǒng)中

42、，用戶(hù)管理只有相關(guān)管理人員被允許進(jìn)行操作。各子系統(tǒng)完成相應(yīng)功能外，不應(yīng)有其他特權(quán)，使系統(tǒng)穩(wěn)定安全。</p><p><b>　　（3）數(shù)據(jù)庫(kù)為核心</b></p><p>　　各子系統(tǒng)可錄入，查詢(xún)，更改相應(yīng)數(shù)據(jù)庫(kù)企業(yè)生產(chǎn)，以及對(duì)其他子系統(tǒng)數(shù)據(jù)企業(yè)生產(chǎn)的調(diào)用查詢(xún)。數(shù)據(jù)庫(kù)起到了各方面數(shù)據(jù)以及查詢(xún)各方面企業(yè)生產(chǎn)的重大作用。因而構(gòu)建數(shù)據(jù)庫(kù)以及如何合理有效的對(duì)數(shù)據(jù)庫(kù)進(jìn)行操作乃是

43、本系統(tǒng)的核心工作。</p><p>　　（4）對(duì)良好的交互性要求</p><p>　　為了便于各部門(mén)操作人員使用本系統(tǒng)，以及更容易掌握本系統(tǒng)的各項(xiàng)功能，使人善于并樂(lè)于使用本系統(tǒng)，應(yīng)使系統(tǒng)界面設(shè)計(jì)友好，各個(gè)功能設(shè)計(jì)合理并人性化。</p><p>　　模塊是數(shù)據(jù)說(shuō)明、可執(zhí)行語(yǔ)句等程序?qū)ο蟮募?，它是單?dú)命名的而且可通過(guò)名字來(lái)訪問(wèn)。模塊化就是把程序劃分成若干個(gè)模塊，每個(gè)模

44、塊完成一個(gè)子功能，把這些模塊集合起來(lái)組成一個(gè)整體，可以完成指定的功能滿(mǎn)足問(wèn)題的要求。</p><p>　　采用模塊化原理可以使軟件結(jié)構(gòu)清晰，不僅容易設(shè)計(jì)也容易閱讀和理解。因?yàn)槌绦蝈e(cuò)誤通常局限在有關(guān)的模塊及它們的接口中，所以模塊化使軟件容易測(cè)試和調(diào)試，因而有助于提高軟件的可靠性。因?yàn)樽儎?dòng)往往只涉及少數(shù)幾個(gè)模塊，所以模塊化能夠提高軟件的可修改性。模塊化也有助于軟件開(kāi)發(fā)工程的組織管理，一個(gè)復(fù)雜的大型程序可以由許多程序員

45、分工編寫(xiě)不同的模塊，并且可以進(jìn)一步分配技術(shù)熟練的程序員編寫(xiě)困難的模塊。</p><p>　　E-R 圖如圖4-1所示:</p><p><b>　　4.2 數(shù)據(jù)庫(kù)設(shè)計(jì)</b></p><p>　　數(shù)據(jù)庫(kù)是指描述完整記錄的集合。數(shù)據(jù)庫(kù)技術(shù)在20世紀(jì)60年代中期產(chǎn)生，它的出現(xiàn)使企業(yè)生產(chǎn)系統(tǒng)的研制從以加工數(shù)據(jù)的程序?yàn)橹行霓D(zhuǎn)變?yōu)橐怨蚕頂?shù)據(jù)庫(kù)為中心來(lái)進(jìn)行

46、。數(shù)據(jù)庫(kù)開(kāi)始是在大公司或機(jī)構(gòu)中進(jìn)行大規(guī)模數(shù)據(jù)處理，后來(lái)隨著計(jì)算機(jī)的逐漸普及，數(shù)據(jù)庫(kù)才應(yīng)用到計(jì)算機(jī)上。數(shù)據(jù)庫(kù)發(fā)展到今天，已經(jīng)是相當(dāng)成熟的階段，它對(duì)大量數(shù)據(jù)處理能力的不斷提高，發(fā)展和完善。</p><p><b>　?。?）用戶(hù)表</b></p><p>　　系統(tǒng)為了區(qū)分普通員工和管理員兩種身份，因此由用戶(hù)和密碼，級(jí)別構(gòu)成，這樣系統(tǒng)在系統(tǒng)登陸界面進(jìn)行身份驗(yàn)證，將輸入的企

47、業(yè)生產(chǎn)和用戶(hù)表進(jìn)行比較，讓符合身份的用戶(hù)通過(guò)驗(yàn)證。</p><p><b>　　（2）企業(yè)生產(chǎn)表</b></p><p>　　讓各部門(mén)及時(shí)了解企業(yè)生產(chǎn)的狀態(tài)，體現(xiàn)本次設(shè)計(jì)的主要目的，標(biāo)題和內(nèi)容字段構(gòu)成了企業(yè)生產(chǎn)的主體。</p><p><b>　　4.3 設(shè)計(jì)原則</b></p><p>　　數(shù)據(jù)庫(kù)

48、的安全性是指保護(hù)數(shù)據(jù)庫(kù)以防止不合法的使用所造成的數(shù)據(jù)泄漏、更改或破壞。在數(shù)據(jù)庫(kù)系統(tǒng)中，大量的數(shù)據(jù)集中存放，而且為許多用戶(hù)直接共享，是寶貴的企業(yè)生產(chǎn)資源，系統(tǒng)的安全保護(hù)措施就顯得更為重要，它保護(hù)數(shù)據(jù)庫(kù)防止惡意的破壞和非法的存取。尤其是這種大型的數(shù)據(jù)庫(kù)存放著十分重要的企業(yè)生產(chǎn)，不允許出現(xiàn)任何差錯(cuò)。</p><p>　　在登錄數(shù)據(jù)庫(kù)時(shí)，系統(tǒng)讓用戶(hù)表示自己的身份，系統(tǒng)進(jìn)行核實(shí)，鑒別此用戶(hù)是否為合法用戶(hù)，若是，系統(tǒng)進(jìn)一步核

49、實(shí)用戶(hù)，通常要求用戶(hù)輸入口令，系統(tǒng)核對(duì)用戶(hù)口令以鑒別用戶(hù)身份。這是一種簡(jiǎn)單可行的方法，實(shí)現(xiàn)起來(lái)比較方便，用戶(hù)還可以隨時(shí)更改自己的口令密碼。</p><p>　　創(chuàng)建任何一個(gè)數(shù)據(jù)庫(kù)的第一步是仔細(xì)的規(guī)劃數(shù)據(jù)庫(kù)，設(shè)計(jì)必須是靈活的、有邏輯的。創(chuàng)建一個(gè)數(shù)據(jù)庫(kù)結(jié)構(gòu)的過(guò)程被認(rèn)為是數(shù)據(jù)模型設(shè)計(jì)。</p><p>　?。?）標(biāo)識(shí)需要的數(shù)據(jù)；</p><p>　?。?）收集被子標(biāo)識(shí)的字

50、段到表中；</p><p>　　（3）標(biāo)識(shí)主關(guān)鍵字字段；</p><p><b>　　（4）規(guī)范數(shù)據(jù)；</b></p><p>　　（5）標(biāo)識(shí)指定字段的信息。</p><p><b>　　數(shù)據(jù)庫(kù)的特點(diǎn)有：</b></p><p>　?。?）數(shù)據(jù)錄入和處理的準(zhǔn)確性和實(shí)時(shí)性<

51、;/p><p>　　數(shù)據(jù)的輸入是否準(zhǔn)確是數(shù)據(jù)處理的前提，錯(cuò)誤的輸入會(huì)導(dǎo)致系統(tǒng)輸出的不正確和不可用，從而使系統(tǒng)的工作失去意義。數(shù)據(jù)的輸入來(lái)源是手工輸入，手工輸入要通過(guò)系統(tǒng)界面上的安排，系統(tǒng)具有容錯(cuò)性，并且對(duì)操作人員要進(jìn)行系統(tǒng)的培訓(xùn)。在系統(tǒng)中，數(shù)據(jù)的輸入往往是大量的，因此系統(tǒng)要有一定的處理能力，以保證迅速的處理數(shù)據(jù)。</p><p>　?。?）數(shù)據(jù)的一致性與完整性</p><p

52、>　　由于系統(tǒng)的數(shù)據(jù)是共享的，在不同的設(shè)備類(lèi)別中，設(shè)備是共享數(shù)據(jù)，所以如何保證這些數(shù)據(jù)的一致性，是系統(tǒng)必須解決的問(wèn)題。要解決這一問(wèn)題，要有一定的人員維護(hù)數(shù)據(jù)的一致性，在數(shù)據(jù)錄入處控制數(shù)據(jù)的去向，并且要求對(duì)數(shù)據(jù)庫(kù)的數(shù)據(jù)完整性進(jìn)行嚴(yán)格的約束。</p><p>　　對(duì)于輸入的數(shù)據(jù)，要為其定義完整性規(guī)則，如果不能符合完整性約束，系統(tǒng)應(yīng)該拒絕該數(shù)據(jù)。</p><p>　?。?）數(shù)據(jù)的共享與獨(dú)立

53、性</p><p>　　整個(gè)設(shè)備發(fā)布系統(tǒng)的數(shù)據(jù)是共享的。然而，從系統(tǒng)開(kāi)發(fā)的角度上看，共享會(huì)給設(shè)計(jì)和調(diào)試帶來(lái)困難。因此，應(yīng)該提供靈活的配置，使各個(gè)分系統(tǒng)能夠獨(dú)立運(yùn)行，而通過(guò)人工干預(yù)的手段進(jìn)行系統(tǒng)數(shù)據(jù)的交換。這樣，也能提供系統(tǒng)的強(qiáng)壯性。</p><p>　?。?）數(shù)據(jù)庫(kù)中的冗余數(shù)據(jù)少。</p><p><b>　　5 系統(tǒng)概要設(shè)計(jì)</b></

54、p><p>　　5.1 系統(tǒng)的前期設(shè)計(jì)</p><p>　　5.1.1 應(yīng)用程序設(shè)計(jì)結(jié)構(gòu)</p><p>　?。?）建立數(shù)據(jù)庫(kù)，基本資料就存放在其中，通過(guò)SQL Server建立數(shù)據(jù)庫(kù)；</p><p>　　（2）用VB開(kāi)發(fā)出界面，使用ADO控件連接數(shù)據(jù)庫(kù)，通過(guò) DATAGRID 和 TEXT顯示出來(lái)；</p><p>　

55、　（3）在應(yīng)用程序中用查詢(xún)和統(tǒng)計(jì)等手段對(duì)數(shù)據(jù)庫(kù)的資料進(jìn)行處理，得到有效的數(shù)據(jù)，分析管理情況，得出結(jié)論和措施，然后就可以通過(guò)措施，達(dá)到管理提高效率的目的。</p><p>　　5.1.2 多用戶(hù)登陸問(wèn)題</p><p>　?。?）建立模塊，Module1；</p><p>　　（2）在模塊中申明變量 Public jibie；</p><p>

56、　?。?）在數(shù)據(jù)庫(kù)建立用戶(hù)表，存放用戶(hù)名和密碼，然后輸入多個(gè)用戶(hù)；</p><p>　?。?）通過(guò)ADO代碼連接到數(shù)據(jù)庫(kù)。；</p><p>　　（5）通過(guò)SQL語(yǔ)句判斷是否用戶(hù)數(shù)據(jù)庫(kù)有；</p><p>　?。?）如果沒(méi)有則退出；</p><p>　　（7）如果有通過(guò)SQL語(yǔ)句判斷是否密碼正確；</p><p>　　

57、（8）如果正確則發(fā)送數(shù)據(jù)庫(kù)的該用戶(hù)名到公共變量 jibie = myrs("jibie")；</p><p>　　（9）通過(guò)變量決定各個(gè)用戶(hù)的權(quán)限。</p><p>　　5.1.3 多文檔界面</p><p>　　多文檔界面（MDI）不同于單文檔界面,下面介紹其設(shè)計(jì)方法:</p><p>　　（1）新建一個(gè)工程企業(yè)生產(chǎn)；

58、</p><p>　　（2）將其中的Form1的MDIChild屬性設(shè)為T(mén)rue。；</p><p>　?。?）從菜單中選擇“工程>添加MDI窗體”；</p><p>　?。?）給Form1的Load事件添加如下代碼： </p><p>　　Private Sub Form_Load()</p><p>　　MD

59、IForm1.Show</p><p><b>　　End Sub</b></p><p><b>　　5.2 數(shù)據(jù)庫(kù)設(shè)計(jì)</b></p><p>　?。?）企業(yè)生產(chǎn)表（見(jiàn)表5-1）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_qysc</p><p>　　表5-1 企業(yè)

60、生產(chǎn)表</p><p>　　（2）車(chē)間部門(mén)設(shè)置表（見(jiàn)表5-2）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_cjsz</p><p>　　表5-2 車(chē)間部門(mén)設(shè)置表</p><p>　?。?）產(chǎn)品入庫(kù)信息表（見(jiàn)表5-3）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_cprk</p><p>

61、;　　表5-3 產(chǎn)品入庫(kù)信息表</p><p>　　（4）產(chǎn)品信息設(shè)置表（見(jiàn)表5-4）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_cpxx</p><p>　　表5-4 產(chǎn)品信息設(shè)置表</p><p>　?。?）設(shè)備報(bào)廢信息表（見(jiàn)表5-5）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_sbbf</p&g

62、t;<p>　　表5-5 設(shè)備報(bào)廢信息表</p><p>　?。?）設(shè)備類(lèi)型設(shè)置表（見(jiàn)表5-6）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_sblx</p><p>　　表5-6 設(shè)備類(lèi)型設(shè)置表</p><p>　　（7）設(shè)備攤銷(xiāo)時(shí)間設(shè)置表（見(jiàn)表5-7）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCG

63、L_sbtx</p><p>　　表5-7 設(shè)備攤銷(xiāo)時(shí)間設(shè)置表</p><p>　　（8）設(shè)備維修信息表（見(jiàn)表5-8）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_sbwx</p><p>　　表5-8 設(shè)備維修信息表</p><p>　?。?）設(shè)備狀態(tài)設(shè)置表（見(jiàn)表5-9）</p><p>

64、　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_sbzt</p><p>　　表5-9 設(shè)備狀態(tài)設(shè)置表</p><p>　?。?0）生產(chǎn)計(jì)劃單表（見(jiàn)表5-10）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_scjhd</p><p>　　表5-10 生產(chǎn)計(jì)劃單表</p><p>　　（11）生產(chǎn)領(lǐng)料表（見(jiàn)表5-11）</p&

65、gt;<p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_scll</p><p>　　表5-11 生產(chǎn)領(lǐng)料表</p><p>　?。?2）生產(chǎn)設(shè)備查詢(xún)表（見(jiàn)表5-12）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_scsb</p><p>　　表5-12 生產(chǎn)設(shè)備查詢(xún)表</p><p>　　（13）物料庫(kù)存表（

66、見(jiàn)表5-13）</p><p>　　表名稱(chēng)標(biāo)識(shí)：tb_SCGL_wlkc </p><p>　　表5-13 物料庫(kù)存表</p><p>　　5.3 系統(tǒng)主要實(shí)現(xiàn)的功能</p><p>　　生產(chǎn)管理系統(tǒng)是根據(jù)企業(yè)生產(chǎn)過(guò)程中的實(shí)際需求開(kāi)發(fā)的一套數(shù)據(jù)庫(kù)管理軟件，對(duì)于生產(chǎn)過(guò)程中的產(chǎn)品、物料及設(shè)備進(jìn)行系統(tǒng)化的管理，將產(chǎn)品的生產(chǎn)及物料的需求生成計(jì)劃單的同

67、時(shí)，配備了全方位的查詢(xún)功能。對(duì)于物料及完工的產(chǎn)品進(jìn)行入庫(kù)集中管理，在確保企業(yè)正常生產(chǎn)的同時(shí)，降低了庫(kù)存成本，提高了生產(chǎn)效率。</p><p>　　用戶(hù)在使用本系統(tǒng)時(shí)，請(qǐng)注意以下兩點(diǎn)：</p><p>　?。?）系統(tǒng)自動(dòng)生成單據(jù)編號(hào)，不可以更改；</p><p>　　（2）系統(tǒng)支持按〈Enter〉鍵跳到下一文本框的功能，用戶(hù)無(wú)需通過(guò)鼠標(biāo)定位光標(biāo)位。</p>

68、<p>　　系統(tǒng)的主要功能模塊有：</p><p>　　（1）基本信息管理包括：產(chǎn)品基礎(chǔ)信息、物料基本信息、設(shè)備狀態(tài)設(shè)置、設(shè)備類(lèi)型設(shè)置、設(shè)備攤銷(xiāo)時(shí)間設(shè)置和車(chē)間部門(mén)設(shè)置。通過(guò)基本信息的設(shè)置可以對(duì)企業(yè)的產(chǎn)品、物料及設(shè)備進(jìn)行集中的規(guī)范化管理。</p><p>　?。?）計(jì)劃信息管理菜單主要包括：生產(chǎn)計(jì)劃單管理、生產(chǎn)計(jì)劃單查詢(xún)、物料需求計(jì)劃、物料需求查詢(xún)。通過(guò)這四個(gè)模塊的設(shè)置可以將企

69、業(yè)的生產(chǎn)及物料的需求作成計(jì)劃單，并配以查功能，提高企業(yè)的生產(chǎn)效率。</p><p>　　（3）生產(chǎn)設(shè)備管理主要包括：生產(chǎn)設(shè)備檔案、生產(chǎn)設(shè)備查詢(xún)、生產(chǎn)設(shè)備報(bào)廢、生產(chǎn)設(shè)備報(bào)廢查詢(xún)、生產(chǎn)設(shè)備維修和生產(chǎn)設(shè)備維修查詢(xún)。通過(guò)這幾個(gè)模塊的設(shè)置可以將生產(chǎn)設(shè)備存檔，進(jìn)行系統(tǒng)管理，以確保企業(yè)生產(chǎn)的正常運(yùn)行。</p><p>　　（4）產(chǎn)品庫(kù)存管理菜單主要包括：產(chǎn)品完工入庫(kù)、產(chǎn)品入庫(kù)查詢(xún)、物料入庫(kù)、物料入庫(kù)查詢(xún)

70、、生產(chǎn)領(lǐng)料、生產(chǎn)領(lǐng)料查詢(xún)和物料庫(kù)存信息查詢(xún)。通過(guò)產(chǎn)品庫(kù)存管理各模塊的設(shè)置可以將產(chǎn)品、物料和生產(chǎn)領(lǐng)料的數(shù)據(jù)系統(tǒng)管理，配以查詢(xún)功能，同時(shí)生成查詢(xún)報(bào)表。</p><p>　?。?）系統(tǒng)維護(hù)包括：操作員設(shè)置、密碼修改、操作權(quán)限設(shè)置、數(shù)據(jù)清理、調(diào)用主窗口圖片。系統(tǒng)維護(hù)中各模塊的設(shè)置可以確保系統(tǒng)數(shù)據(jù)的安全性。</p><p>　　系統(tǒng)模塊結(jié)構(gòu)圖如圖5-1所示：</p><p>

71、　　圖5-1 系統(tǒng)模塊結(jié)構(gòu)圖</p><p>　　各子模塊功能圖如下：</p><p>　?。?）基礎(chǔ)信息管理模塊功能圖如圖5-2所示：</p><p>　　圖5-2 基礎(chǔ)信息管理模塊功能圖</p><p>　?。?）產(chǎn)品庫(kù)存管理模塊功能圖如圖5-3所示：</p><p>　　圖5-3 產(chǎn)品庫(kù)存管理模塊功能圖</

72、p><p><b>　　6 系統(tǒng)詳細(xì)設(shè)計(jì)</b></p><p>　　6.1 用戶(hù)界面的實(shí)現(xiàn)</p><p>　　根據(jù)已有的需求分析和系統(tǒng)的概要設(shè)計(jì)，在此基礎(chǔ)上進(jìn)行系統(tǒng)的詳細(xì)設(shè)計(jì)和實(shí)現(xiàn)。為此，建立了一個(gè)工程，系統(tǒng)的設(shè)計(jì)和實(shí)現(xiàn)如下。</p><p><b>　?。?）登錄界面</b></p>

73、<p>　　登錄界面的設(shè)計(jì)實(shí)現(xiàn)如圖6-1所示：</p><p>　　圖6-1 用戶(hù)登錄界面</p><p>　　在工程引用ADO2.0。</p><p>　　在命令按鈕單擊寫(xiě)下連接數(shù)據(jù)庫(kù)USER表的判斷語(yǔ)句：</p><p>　　Private Sub Command1_Click()</p><p>　

74、　denlu_name = Text1.Text 定義登陸名變量</p><p>　　denlu_pass = Text2.Text 定義登陸密碼變量</p><p>　　Dim mycn As New ADODB.Connection 定義ADO連接</p><p>　　Dim myrs As New AD

75、ODB.Recordset 定義ADO記錄集</p><p>　　Set myrs = New ADODB.Recordset </p><p>　　mycn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=rsgl.mdb;"</p><p>　　myrs.Op

76、en "SELECT * FROM [user] where (user.user)='" + mname + "'and jibie='" + jibie + "';", mycn, adOpenKeyset, adLockOptimistic</p><p>　　設(shè)置ADO記錄集的路徑并打開(kāi)數(shù)據(jù)庫(kù)，用SQL 打開(kāi)表&l

77、t;/p><p>　　If myrs.BOF = True And myrs.EOF = True Then 如果沒(méi)找到</p><p>　　MsgBox "查無(wú)此人", , "登陸企業(yè)生產(chǎn)" 彈出企業(yè)生產(chǎn)"查無(wú)此人</p><p><b>　　Else</b&

78、gt;</p><p>　　If myrs("pass") = denlu_pass Then 如果找到</p><p>　　''''''''''''''''''''''

79、''''''''''''''''''''</p><p>　　MsgBox "ok", , "登陸企業(yè)生產(chǎn)" 彈出企業(yè)生產(chǎn)"OK</p><p&

80、gt;　　jibie = myrs("jibie")</p><p>　　MDIForm1.Show</p><p>　　Unload Me 關(guān)閉</p><p>　　目的是USER表沒(méi)有該用戶(hù)，將無(wú)法使用本程序</p><p>　　jibie = myrs(&q

81、uot;jibie")</p><p>　　將公共變量jibie設(shè)為用戶(hù)的身份</p><p><b>　?。?）主界面</b></p><p>　　主模塊負(fù)責(zé)應(yīng)用程序的主界面，由它調(diào)用其他模塊。因此，主模塊應(yīng)該具有操作性好、界面清晰、使用戶(hù)能夠方便地找到所需功能的物點(diǎn)。</p><p>　　根據(jù)功能需求的結(jié)

82、果，其系統(tǒng)主界面如圖6-2所示。用戶(hù)可以單擊相應(yīng)的菜單進(jìn)入相應(yīng)的功能模塊。</p><p>　　其中有各個(gè)子系統(tǒng)的菜單項(xiàng)，在主界面上有工具欄按鈕，集成了用戶(hù)常用的功能，為了方便用戶(hù)操作。</p><p>　　圖6-2 系統(tǒng)主界面</p><p>　　6.2 其他功能的實(shí)現(xiàn)</p><p><b>　　（1）基本信息管理</b&

83、gt;</p><p>　　基本信息管理包括：產(chǎn)品基礎(chǔ)信息、物料基本信息、設(shè)備狀態(tài)設(shè)置、設(shè)備類(lèi)型設(shè)置、設(shè)備攤銷(xiāo)時(shí)間設(shè)置和車(chē)間部門(mén)設(shè)置。通過(guò)基本信息的設(shè)置可以對(duì)企業(yè)的產(chǎn)品、物料及設(shè)備進(jìn)行集中的規(guī)范化管理。</p><p><b>　?。?）產(chǎn)品基礎(chǔ)信息</b></p><p>　　單擊菜單中“基本信息管理”/“產(chǎn)品基礎(chǔ)信息”選項(xiàng)，進(jìn)入如圖6-3所

84、示的界面。</p><p>　　圖6-3 產(chǎn)品信息設(shè)置</p><p>　　添加：?jiǎn)螕簟咎砑印堪粹o，系統(tǒng)自動(dòng)生成產(chǎn)品編號(hào)，單擊“產(chǎn)品名稱(chēng)”、“產(chǎn)品規(guī)格”、“計(jì)量單位”及“備注信息”文本框，輸入相關(guān)內(nèi)容，最后單擊【保存】按鈕即完成產(chǎn)品的添加操作。</p><p>　　修改：?jiǎn)螕袅斜碇幸薷牡漠a(chǎn)品信息，然后單擊【修改】按鈕即可在各文本框內(nèi)進(jìn)行修改，最后單擊【保存】按鈕即

85、完成修改操作。</p><p>　　刪除：?jiǎn)螕粢獎(jiǎng)h除的產(chǎn)品信息，單擊【刪除】按鈕，系統(tǒng)彈出的提示框進(jìn)行確認(rèn)后即完成刪除操作。</p><p>　　查找：?jiǎn)螕簟静檎摇堪粹o，系統(tǒng)彈出圖6-4所示的模塊，單擊文本框，輸入要查詢(xún)的產(chǎn)品編號(hào)，然后單擊【確定】按鈕，圖6-3的列表中會(huì)自動(dòng)顯示相應(yīng)的查詢(xún)結(jié)果。</p><p>　　圖6-4 產(chǎn)品信息查詢(xún)</p>&l

86、t;p><b>　　功能實(shí)現(xiàn)代碼如下：</b></p><p>　　Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)</p><p>　　Select Case Button.Key</p><p>　　Case "add" &

87、#39;添加</p><p>　　blnAdd = True</p><p>　　tlbState Toolbar1, True</p><p>　　rs1.Open "select * from tb_SCGL_cpxx order by cpxx_id", cnn, adOpenStatic</p><p>　　If

88、rs1.RecordCount > 0 Then</p><p>　　rs1.MoveLast</p><p>　　Text1(0) = "CP" + Format(Val(Right(Trim(rs1.Fields("cpxx_id")), 3)) + 1, "###000") '編號(hào)自動(dòng)加1</p>

89、;<p><b>　　Else</b></p><p>　　Text1(0) = "CP001"</p><p><b>　　End If</b></p><p><b>　　rs1.Close</b></p><p>　　For i = 1

90、To Text1.UBound</p><p>　　Text1(i) = ""</p><p>　　Text1(i).Locked = False</p><p><b>　　Next i</b></p><p>　　For i = 1 To Text1.UBound</p><p

91、>　　Text1(i).Enabled = True</p><p><b>　　Next i</b></p><p>　　Text1(1).SetFocus</p><p>　　Case "save" '保存</p><p>　　On Error GoTo SaveErr</

92、p><p>　　If Text1(1).Text = "" Then</p><p>　　MsgBox "系統(tǒng)不允許" & Label2 & "為空！", , "提示窗口"</p><p><b>　　Exit Sub</b></p>&l

93、t;p><b>　　End If</b></p><p>　　If blnAdd = True Then '添加新記錄</p><p>　　cnn.Execute ("insert into tb_SCGL_cpxx(cpxx_id,cpxx_cpmc,cpxx_cpgg,cpxx_jldw,cpxx_bz) values('&q

94、uot; + Text1(0) + "','" + Text1(1) + "','" + Text1(2) + "','" + Text1(3) + "','" + Text1(4) + "')")</p><p>　　Adodc1.Refre

95、sh</p><p>　　Set Dgr_Cpxx.DataSource = Adodc1</p><p>　　Call Dgr_Title</p><p>　　tlbState Toolbar1, False</p><p>　　For i = 1 To Text1.UBound</p><p>　　Text1(i)

96、.Locked = True</p><p><b>　　Next i</b></p><p>　　Else '修改原有記錄</p><p>　　cnn.Execute ("update tb_SCGL_cpxx set cpxx_cpmc ='" + Text1(1) + "',cp

97、xx_cpgg='" + Text1(2) + "',cpxx_jldw='" + Text1(3) + "',cpxx_bz='" + Text1(4) + "' where cpxx_id='" + Text1(0).Text + "'")</p><p>

98、　　Adodc1.Refresh</p><p>　　Set Dgr_Cpxx.DataSource = Adodc1</p><p>　　Call Dgr_Title</p><p>　　Dgr_Cpxx.Bookmark = mybookmark</p><p>　　tlbState Toolbar1, False</p>

99、<p>　　For i = 1 To Text1.UBound</p><p>　　Text1(i).Locked = True</p><p><b>　　Next i</b></p><p><b>　　End If</b></p><p><b>　　Exit Sub<

100、;/b></p><p>　　SaveErr: '出錯(cuò)處理</p><p>　　MsgBox Err.Description, , "信息提示"</p><p><b>　?。?）物料信息設(shè)置</b></p><p>　　單擊菜單中“基本信息管理”/“物料信息設(shè)置”選項(xiàng)，進(jìn)入如圖6-

101、5所示的界面。</p><p>　　圖6-5 物料信息設(shè)置</p><p>　　添加：?jiǎn)螕簟咎砑印堪粹o，系統(tǒng)自動(dòng)生成物料編號(hào)，單擊“物料名稱(chēng)”、“物料規(guī)格”、“計(jì)量單位”文本框，輸入相應(yīng)的內(nèi)容，單擊“產(chǎn)品編號(hào)”的下拉按鈕，選擇與產(chǎn)品信息相匹配的物料編號(hào)，系統(tǒng)自動(dòng)隨之產(chǎn)生產(chǎn)品名稱(chēng)及產(chǎn)品規(guī)格，單擊“備注信息”及“物料數(shù)量”/“單位產(chǎn)品”文本框，輸入相應(yīng)的內(nèi)容，最后單擊【保存】按鈕即完成物料的添

102、加操作。</p><p>　　“物料信息設(shè)置”的修改、刪除和查找操作同產(chǎn)品基礎(chǔ)信息的操作方法相同，這里不作重復(fù)講解。請(qǐng)參照6-3產(chǎn)品基礎(chǔ)信息。</p><p><b>　?。?）設(shè)備狀態(tài)設(shè)置</b></p><p>　　單擊菜單中“基本信息管理”/“設(shè)備狀態(tài)設(shè)置”選項(xiàng)，系統(tǒng)彈出如圖6-6所示的界面。</p><p>　　

103、圖6-6 設(shè)備狀態(tài)設(shè)置</p><p>　　“設(shè)備狀態(tài)設(shè)置” 的修改、刪除和查找操作同產(chǎn)品基礎(chǔ)信息的操作方法相同，這里不作重復(fù)講解。請(qǐng)參照6-3產(chǎn)品基礎(chǔ)信息。</p><p><b>　　（5）設(shè)備類(lèi)型設(shè)置</b></p><p>　　單擊菜單中“基本信息管理”/“設(shè)備類(lèi)型設(shè)置”選項(xiàng)，系統(tǒng)彈出如圖6-7所示的界面。</p><

104、;p>　　圖6-7 設(shè)備類(lèi)型設(shè)置</p><p>　　“設(shè)備類(lèi)型設(shè)置” 的修改、刪除和查找操作同產(chǎn)品基礎(chǔ)信息的操作方法相同，這里不作重復(fù)講解。請(qǐng)參照6-3產(chǎn)品基礎(chǔ)信息。</p><p>　　（6）設(shè)備攤銷(xiāo)時(shí)間設(shè)置</p><p>　　單擊菜單中“基本信息管理”/“設(shè)備攤銷(xiāo)時(shí)間設(shè)置”選項(xiàng)，系統(tǒng)彈出如圖6-8所示的界面。</p><p>　

105、　圖6-8 設(shè)備攤銷(xiāo)時(shí)間設(shè)置</p><p>　　“設(shè)備攤銷(xiāo)時(shí)間設(shè)置”的修改、刪除和查找操作同產(chǎn)品基礎(chǔ)信息的操作方法相同，這里不作重復(fù)講解。請(qǐng)參照6-3產(chǎn)品基礎(chǔ)信息。</p><p><b>　?。?）車(chē)間部門(mén)設(shè)置</b></p><p>　　單擊菜單中“基本信息管理”/“車(chē)間部門(mén)設(shè)置”選項(xiàng)，系統(tǒng)彈出如圖6-9所示的界面。</p>

106、<p>　　圖6-9 間部門(mén)設(shè)置</p><p>　　“車(chē)間部門(mén)設(shè)置” 的修改、刪除和查找操作同產(chǎn)品基礎(chǔ)信息的操作方法相同，這里不作重復(fù)講解。請(qǐng)參照6-3產(chǎn)品基礎(chǔ)信息。</p><p><b>　?。?）產(chǎn)品入庫(kù)</b></p><p>　　單擊菜單中“產(chǎn)品庫(kù)存管理”/“產(chǎn)品完工入庫(kù)”選項(xiàng)，系統(tǒng)彈出如圖6-10所示的界面。</

107、p><p>　　圖6-10 產(chǎn)品入庫(kù)</p><p>　　“產(chǎn)品入庫(kù)” 的修改、刪除和查找操作同產(chǎn)品基礎(chǔ)信息的操作方法相同，這里不作重復(fù)講解。請(qǐng)參照6-3產(chǎn)品基礎(chǔ)信息。</p><p><b>　?。?）產(chǎn)品入庫(kù)查詢(xún)</b></p><p>　　單擊菜單中“產(chǎn)品庫(kù)存管理”/“產(chǎn)品入庫(kù)查詢(xún)”選項(xiàng)，系統(tǒng)彈出如圖6-11所示的界面

108、。</p><p>　　圖6-11 產(chǎn)品入庫(kù)查詢(xún)</p><p><b>　　實(shí)現(xiàn)代碼如下：</b></p><p>　　Private Sub Cmd_DY_Click() '打印</p><p>　　If sql <> "" Then</p><p>

109、　　DataE1.rsCommand8.Open sql</p><p>　　If DataE1.rsCommand8.RecordCount > 0 Then</p><p><b>　　Unload Me</b></p><p>　　DR_Cprk.Show</p><p><b>　　End If&

110、lt;/b></p><p><b>　　Else</b></p><p>　　DataE1.rsCommand8.Open "select * from tb_SCGL_cprk order by cprk_id"</p><p>　　If DataE1.rsCommand8.RecordCount > 0 T

111、hen</p><p><b>　　Unload Me</b></p><p>　　DR_Cprk.Show</p><p><b>　　End If</b></p><p><b>　　End If</b></p><p><b>　　End

112、 Sub</b></p><p>　　Private Sub Cmd_Ok_Click()</p><p>　　Fld1 = Adodc1.Recordset.Fields.Item(Cbx_Field.ListIndex).Name</p><p>　　Select Case Adodc1.Recordset.Fields(Cbx_Field.List

113、Index).Type</p><p>　　Case 200 '字符數(shù)據(jù)</p><p>　　If Cbx_Oper.Text = "like" Then</p><p>　　sql = "select * from tb_SCGL_cprk where " & Fld1 & " like+

114、 '%'+'" + Txt_Key + "'+'%'"</p><p><b>　　Else</b></p><p>　　sql = "select * from tb_SCGL_cprk where " & Fld1 & Cbx_Oper & &

115、quot;'" + Txt_Key + "'"</p><p><b>　　End If</b></p><p>　　Case 5 '日期數(shù)據(jù)</p><p>　　If Cbx_Oper.Text = "like" Then</p><p>

116、　　MsgBox "日期型數(shù)據(jù)不能選用“Like”作為運(yùn)算符！", , "提示窗口"</p><p>　　Cbx_Oper.ListIndex = 1</p><p><b>　　End If</b></p><p>　　If IsDate(Txt_Key) = False Then</p>

117、<p>　　MsgBox "請(qǐng)輸入正確的日期！", , "提示窗口"</p><p><b>　　rs.Close</b></p><p><b>　　Exit Sub</b></p><p><b>　　End If</b></p>

118、<p>　　sql = "select * from tb_SCGL_cprk where " & Fld1 & Cbx_Oper & "'" + Txt_Key + "'"</p><p>　　Case 6 '貨幣數(shù)據(jù)</p><p>　　If IsNumeric

119、(Txt_Key) = False Then</p><p>　　MsgBox "請(qǐng)輸入正確的數(shù)據(jù)！", , "提示窗口"</p><p><b>　　rs.Close</b></p><p><b>　　Exit Sub</b></p><p><b&

120、gt;　　End If</b></p><p>　　If Cbx_Oper.Text = "like" Then</p><p>　　MsgBox "貨幣數(shù)據(jù)不能選用“Like”作為運(yùn)算符！", , "提示窗口"</p><p>　　Cbx_Oper.ListIndex = 1</p>

121、;<p><b>　　End If</b></p><p>　　sql = "select * from tb_SCGL_cprk where " & Fld1 & Txt_Key</p><p><b>　?。?0）物料入庫(kù)</b></p><p>　　單擊菜單中“產(chǎn)品庫(kù)

122、存管理”/“物料入庫(kù)”選項(xiàng)，系統(tǒng)彈出如圖6-12所示的界面。</p><p>　　圖6-12 物料入庫(kù)</p><p>　　“物料入庫(kù)” 的修改、刪除和查找操作同產(chǎn)品基礎(chǔ)信息的操作方法相同，這里不作重復(fù)講解。請(qǐng)參照6-3產(chǎn)品基礎(chǔ)信息。</p><p>　?。?1）物料入庫(kù)查詢(xún)</p><p>　　單擊菜單中“產(chǎn)品庫(kù)存管理”/“物料入庫(kù)查詢(xún)”選

123、項(xiàng)，系統(tǒng)彈出如圖6-13所示的界面。</p><p>　　圖6-13 物料入庫(kù)查詢(xún)</p><p>　　“物料入庫(kù)查詢(xún)” 的實(shí)現(xiàn)代碼與產(chǎn)品入庫(kù)查詢(xún)基本相同，這里不作重復(fù)講解。請(qǐng)參照6-11產(chǎn)品入庫(kù)查詢(xún)。</p><p>　?。?2）庫(kù)存信息查詢(xún)</p><p>　　單擊菜單中“產(chǎn)品庫(kù)存管理”/“物料庫(kù)存信息查詢(xún)”選項(xiàng)，系統(tǒng)彈出如圖6-14所示

124、的界面。</p><p>　　圖6-14 庫(kù)存信息查詢(xún)</p><p>　　“庫(kù)存信息查詢(xún)” 的實(shí)現(xiàn)代碼與產(chǎn)品入庫(kù)查詢(xún)基本相同，這里不作重復(fù)講解。請(qǐng)參照6-11產(chǎn)品入庫(kù)查詢(xún)。</p><p><b>　　（13）生產(chǎn)領(lǐng)料</b></p><p>　　單擊菜單中“產(chǎn)品庫(kù)存管理”/“生產(chǎn)領(lǐng)料”選項(xiàng)，系統(tǒng)彈出如圖6-15所示的