庫(kù)存管理系統(tǒng)課程設(shè)計(jì) (2)

1、<p>　　數(shù)據(jù)庫(kù)原理及應(yīng)用 課程設(shè)計(jì)（論文）</p><p>　　題目： 庫(kù)存管理系統(tǒng) </p><p><b>　　目 錄</b></p><p>　　第1章 課程設(shè)計(jì)目的與要求1</p><p>　　1.1 課程設(shè)計(jì)目的1</p><p>　　1.2 課程設(shè)計(jì)的實(shí)

2、驗(yàn)環(huán)境1</p><p>　　1.3 課程設(shè)計(jì)的預(yù)備知識(shí)1</p><p>　　1.4 課程設(shè)計(jì)要求1</p><p>　　第2章 課程設(shè)計(jì)內(nèi)容2</p><p>　　2.1 系統(tǒng)功能分析2</p><p>　　2.2 數(shù)據(jù)庫(kù)模型3</p><p>　　2.3 設(shè)計(jì)窗體和報(bào)表7&l

3、t;/p><p>　　2.4 窗體和報(bào)表模塊主要代碼7</p><p>　　第3章 課程設(shè)計(jì)總結(jié)12</p><p><b>　　參考文獻(xiàn)13</b></p><p>　　數(shù)據(jù)庫(kù)應(yīng)用技術(shù)大作業(yè)的基本要求</p><p><b>　　總體要求</b></p>&

4、lt;p>　　運(yùn)用Access所學(xué)功能，完成一份具有一定實(shí)際意義，且能解決一個(gè)具體問(wèn)題的綜合實(shí)驗(yàn)。要求在Windows平臺(tái)上完成Access數(shù)據(jù)庫(kù)的表、查詢、窗體、報(bào)表及宏的建立，形成一個(gè)數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)（如：藏書(shū)管理系統(tǒng)，人員管理系統(tǒng)，酒店管理系統(tǒng)等）。</p><p><b>　　基本要求</b></p><p>　　(1) 作業(yè)量的基本指標(biāo)</p>

5、;<p>　　數(shù)據(jù)庫(kù)至少包含3個(gè)表 ，每個(gè)表中的記錄數(shù)不能少于10條（所設(shè)計(jì)的數(shù)據(jù)庫(kù)中應(yīng)包含求解該問(wèn)題的相關(guān)數(shù)據(jù)）。</p><p>　　至少包含兩個(gè)功能模塊，并且數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)要具有數(shù)據(jù)的增、刪、查、改功能。</p><p>　　(2) 作業(yè)中涵蓋的知識(shí)點(diǎn)</p><p>　　建立數(shù)據(jù)庫(kù)及庫(kù)中的數(shù)據(jù)表；</p><p>　　設(shè)

6、置表中的字段屬性（定義主鍵、字段大小、有效性規(guī)則、默認(rèn)值等）；</p><p>　　表間關(guān)系的建立與修改：一對(duì)一關(guān)系或一對(duì)多關(guān)系，至少要有一個(gè)一對(duì)多關(guān)系；</p><p>　　表對(duì)象的維護(hù)（增加、刪除、編輯記錄等基本操作）；</p><p>　　創(chuàng)建多種不同類型的查詢（選擇查詢，交叉表查詢，參數(shù)查詢，操作查詢，SQL查詢）；</p><p>

7、　　建立某種形式的窗體（要包含主子窗體），創(chuàng)建與用戶進(jìn)行交互操作的友好界面；建立某種形式的窗體，實(shí)現(xiàn)窗體數(shù)據(jù)與查詢條件的傳遞；</p><p>　　建立某種形式的報(bào)表（要包含分組計(jì)算），實(shí)現(xiàn)對(duì)數(shù)據(jù)的統(tǒng)計(jì)與輸出；</p><p>　　創(chuàng)建并運(yùn)行宏，使用宏可以將數(shù)據(jù)庫(kù)對(duì)象聯(lián)系在一起；</p><p>　　創(chuàng)建一個(gè)主界面窗體，能夠通過(guò)該窗體訪問(wèn)數(shù)據(jù)庫(kù)中的所有對(duì)象。<

8、/p><p><b>　　作業(yè)設(shè)計(jì)提交形式</b></p><p>　　將數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)（*.mdb）和相應(yīng)的大作業(yè)設(shè)計(jì)任務(wù)說(shuō)明書(shū)（*.doc）放置以“學(xué)號(hào)+姓名”（如2011010112王五）命名的文件夾中。同時(shí)上交設(shè)計(jì)說(shuō)明書(shū)的打印稿。</p><p>　　大作業(yè)設(shè)計(jì)任務(wù)說(shuō)明書(shū)撰寫(xiě)框架</p><p><b>　

9、　（1）總體功能</b></p><p>　?。?）各功能模塊聯(lián)系圖</p><p>　?。?）表的結(jié)構(gòu)和表間關(guān)系</p><p>　?。?）窗體、查詢和報(bào)表的設(shè)計(jì)和功能</p><p><b>　?。?）系統(tǒng)開(kāi)發(fā)體會(huì)</b></p><p><b>　　課程設(shè)計(jì)目的與要求&

10、lt;/b></p><p>　　1.1 課程設(shè)計(jì)目的</p><p>　　本課程的課程設(shè)計(jì)實(shí)際是計(jì)算機(jī)信息管理專業(yè)學(xué)生學(xué)習(xí)完《數(shù)據(jù)庫(kù)原理及應(yīng)用（ACCESS 2000）》課程后，進(jìn)行的一次全面的綜合訓(xùn)練，其目的在于加深對(duì)數(shù)據(jù)庫(kù)基礎(chǔ)理論和基本知識(shí)的理解，掌握運(yùn)用數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)開(kāi)發(fā)軟件的基本方法。</p><p>　　1.2 課程設(shè)計(jì)的實(shí)驗(yàn)環(huán)境</p>

11、;<p>　　硬件要求能運(yùn)行Windows 9.X操作系統(tǒng)的微機(jī)系統(tǒng)。數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)開(kāi)發(fā)軟件可以選用Microsoft Access，或其他數(shù)據(jù)庫(kù)管理系統(tǒng)。</p><p>　　1.3 課程設(shè)計(jì)的預(yù)備知識(shí)</p><p>　　熟悉數(shù)據(jù)庫(kù)的基本知識(shí)及一種以上數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)軟件。</p><p>　　1.4 課程設(shè)計(jì)要求</p><p&

12、gt;　　按課程設(shè)計(jì)指導(dǎo)書(shū)提供的課題，應(yīng)根據(jù)下一節(jié)給出的基本需求獨(dú)立完成八個(gè)方面的設(shè)計(jì)，標(biāo)有“可選”的部分可根據(jù)設(shè)計(jì)時(shí)間的安排及工作量的大小適當(dāng)選擇。選用其他課題或不同的數(shù)據(jù)庫(kù)管理系統(tǒng)，可以組成設(shè)計(jì)小組，分模塊進(jìn)行,共同協(xié)作完成一個(gè)應(yīng)用系統(tǒng)的開(kāi)發(fā)任務(wù)。要求書(shū)寫(xiě)詳細(xì)的設(shè)計(jì)說(shuō)明書(shū)，對(duì)復(fù)雜的代碼段和程序段，應(yīng)畫(huà)出程序流程圖。在界面設(shè)計(jì)中，畫(huà)出每個(gè)窗口的布局，有多個(gè)窗口時(shí)，按模塊調(diào)用的方式畫(huà)出窗口調(diào)用圖，用手工畫(huà)好報(bào)表和標(biāo)簽樣式，嚴(yán)禁相互抄襲。

13、</p><p><b>　　課程設(shè)計(jì)內(nèi)容</b></p><p><b>　　2.1系統(tǒng)功能分析</b></p><p>　　2.1.1 系統(tǒng)功能分析</p><p>　　庫(kù)存管理系統(tǒng)實(shí)現(xiàn)以下幾項(xiàng)功能：</p><p>　?。?）系統(tǒng)模塊：包括報(bào)表的打印及設(shè)置，操作日志的管

14、理。</p><p>　?。?）入庫(kù)模塊：包括填寫(xiě)入庫(kù)單，更新，刪除入庫(kù)記錄，查看現(xiàn)有庫(kù)存信息，入庫(kù)記錄的查詢及打印</p><p>　　（3）出庫(kù)模塊 ：包括填寫(xiě)出庫(kù)單，更新，刪除出庫(kù)記錄，查看現(xiàn)有庫(kù)存信息，出庫(kù)記錄的查詢及打印</p><p>　?。?）還庫(kù)模塊 ：包括填寫(xiě)還庫(kù)單，更新，刪除還庫(kù)記錄，還庫(kù)記錄的查詢及打印</p><p>

15、　　（5）需求模塊：包括填寫(xiě)需求計(jì)劃表，更新，刪除采購(gòu)計(jì)劃信息，查看現(xiàn)有采購(gòu)信息，采購(gòu)信息的查詢及打印，以及預(yù)測(cè)短期內(nèi)的需求計(jì)劃。</p><p>　　2.1.2 系統(tǒng)功能模塊設(shè)計(jì)</p><p><b>　　2.2數(shù)據(jù)庫(kù)模型</b></p><p>　　2.2.1 數(shù)據(jù)庫(kù)需求分析</p><p>　　數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)如

16、下</p><p>　　設(shè)備代碼表：設(shè)備號(hào)（主鍵），設(shè)備名稱。</p><p>　　設(shè)備入庫(kù)表：設(shè)備號(hào)，入庫(kù)時(shí)間（主鍵），供應(yīng)商，供應(yīng)商電話，入庫(kù)數(shù)量，價(jià)格，采購(gòu)員。</p><p>　　設(shè)備出庫(kù)表：設(shè)備號(hào)，出庫(kù)時(shí)間（主鍵），使用部門(mén)，出庫(kù)情況，經(jīng)手人，出庫(kù)數(shù)量，領(lǐng)取人，用途。</p><p>　　現(xiàn)有庫(kù)存表：設(shè)備號(hào)，現(xiàn)有庫(kù)存，最小庫(kù)存，最大

17、庫(kù)存，總數(shù)。</p><p>　　部門(mén)需求表：設(shè)備號(hào)，部門(mén)名稱，需求數(shù)量，需求開(kāi)始時(shí)間，需求結(jié)束時(shí)間。</p><p>　　設(shè)備還庫(kù)表：設(shè)備號(hào)，還庫(kù)時(shí)間，倉(cāng)庫(kù)管理員，歸還數(shù)量，歸還人。</p><p>　　操作日志表：操作員，操作內(nèi)容，操作時(shí)間。</p><p>　　設(shè)備采購(gòu)計(jì)劃表：設(shè)備號(hào)，現(xiàn)有庫(kù)存，總庫(kù)存，最大庫(kù)存，購(gòu)買(mǎi)數(shù)量，供應(yīng)商，價(jià)格，

18、計(jì)劃采購(gòu)時(shí)間（主鍵）。</p><p>　　2.2.2 數(shù)據(jù)庫(kù)概念結(jié)構(gòu)設(shè)計(jì)</p><p>　　根據(jù)以上分析，規(guī)劃出的實(shí)體有：現(xiàn)有庫(kù)存實(shí)體、出庫(kù)實(shí)體、設(shè)備采購(gòu)實(shí)體、設(shè)備還庫(kù)實(shí)體、部門(mén)需求實(shí)體。</p><p><b>　　以下為E-R圖</b></p><p>　　2.2.3 數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì)</p>

19、<p>　　2.2.4 數(shù)據(jù)庫(kù)連接說(shuō)明</p><p>　　2.2.5 查詢?cè)O(shè)計(jì)</p><p><b>　　庫(kù)存不足查詢</b></p><p>　　SELECT 現(xiàn)有庫(kù)存表.設(shè)備號(hào), 現(xiàn)有庫(kù)存表.現(xiàn)有庫(kù)存, 現(xiàn)有庫(kù)存表.最小庫(kù)存</p><p>　　FROM 現(xiàn)有庫(kù)存表</p><p&g

20、t;　　WHERE (((現(xiàn)有庫(kù)存表.現(xiàn)有庫(kù)存)<[最小庫(kù)存]));</p><p><b>　　庫(kù)存過(guò)多查詢</b></p><p>　　SELECT 現(xiàn)有庫(kù)存表.設(shè)備號(hào), 現(xiàn)有庫(kù)存表.現(xiàn)有庫(kù)存, 現(xiàn)有庫(kù)存表.最大庫(kù)存</p><p>　　FROM 現(xiàn)有庫(kù)存表</p><p>　　WHERE (((現(xiàn)有庫(kù)存表.現(xiàn)

21、有庫(kù)存)>[最大庫(kù)存]));</p><p><b>　　使用SUM函數(shù)查詢</b></p><p>　　SELECT Sum(現(xiàn)有庫(kù)存表!總數(shù)) AS 所有庫(kù)存數(shù)量</p><p>　　FROM 現(xiàn)有庫(kù)存表</p><p>　　設(shè)備號(hào)總類COUNT函數(shù)查詢</p><p>　　SELECT

22、 Count(設(shè)備代碼表!設(shè)備號(hào)) AS 設(shè)備總類數(shù)</p><p>　　FROM 現(xiàn)有庫(kù)存表;</p><p>　　2.3 設(shè)計(jì)窗體和報(bào)表</p><p>　　2.4 設(shè)計(jì)窗體和報(bào)表模塊主要代碼</p><p>　　窗體 報(bào)表</p><p>　　切換面板

23、（用戶主界面）</p><p><b>　　入庫(kù)窗體</b></p><p>　　其他窗體與入庫(kù)窗體界面一致，只是內(nèi)容功能不同。</p><p><b>　　操作日志報(bào)表</b></p><p><b>　　主要代碼：</b></p><p><b

24、>　　入庫(kù)窗體代碼如下：</b></p><p>　　Option Compare Database</p><p>　　Option Explicit</p><p>　　Private Sub cmdadd_Click()</p><p>　　On Error GoTo Err_cmdadd_Click</p>

25、;<p>　　DoCmd.GoToRecord , , acNewRec</p><p>　　Exit_cmdadd_Click:</p><p><b>　　Exit Sub</b></p><p>　　Err_cmdadd_Click:</p><p>　　MsgBox Err.Description&

26、lt;/p><p>　　Resume Exit_cmdadd_Click</p><p><b>　　End Sub</b></p><p>　　Private Sub cmdmod_Click()</p><p>　　Dim curdb As Database</p><p>　　Dim currs

27、 As Recordset</p><p>　　Dim devicecnt As Integer</p><p>　　Set curdb = CurrentDb</p><p>　　Set currs = curdb.OpenRecordset("selece * from device where 設(shè)備號(hào)='" & 設(shè)備號(hào).Va

28、lue & "'")</p><p>　　If Not currs.EOF Then</p><p>　　devivecnt = currs.Fields("現(xiàn)有庫(kù)存")</p><p>　　devivecnt = devivecnt + CInt(入庫(kù)數(shù)量.Value)</p><p>

29、;　　curdv.Execute "update device set 現(xiàn)有庫(kù)存=" & devicecnt & ",總數(shù)=" & currs.Fields("總數(shù)").Value + CInt(入庫(kù)數(shù)量.Value) & " where 設(shè)備號(hào)='" & 設(shè)備號(hào).Value & "'

30、"</p><p><b>　　Else</b></p><p>　　With currs</p><p><b>　　.AddNew</b></p><p>　　.Fields("設(shè)備號(hào)") = 設(shè)備號(hào).Value</p><p>　　.Fie

31、lds("現(xiàn)有庫(kù)存") = CInt(入庫(kù)數(shù)量.Value)</p><p>　　.Fields("最大庫(kù)存") = CInt(入庫(kù)數(shù)量.Value) + 10</p><p>　　.Fields("最小庫(kù)存") = CInt(入庫(kù)數(shù)量.Value) - 10</p><p>　　.Fields("

32、;總數(shù)") = CInt(入庫(kù)數(shù)量.Value)</p><p>　　.Updatable</p><p><b>　　End With</b></p><p><b>　　End If</b></p><p>　　curdb.Execute "insert into howdo

33、(操作員,操作內(nèi)容,操作時(shí)間)values ('管理員','設(shè)備入庫(kù)'," & CDate(入庫(kù)時(shí)間.Value) & ")"</p><p>　　cmdadd.Enabled = ture</p><p>　　cmdadd.SetFocus</p><p>　　cmdmod.Enable

34、d = False</p><p><b>　　End Sub</b></p><p>　　Private Sub cmdsearch_Click()</p><p>　　On Error GoTo Err_cmdsearch_Click</p><p>　　Screen.PreviousControl.SetFocus

35、</p><p>　　DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70</p><p>　　Exit_cmdsearch_Click:</p><p><b>　　Exit Sub</b></p><p>　　Err_cmdsearch_Click:<

36、;/p><p>　　MsgBox Err.Description</p><p>　　Resume Exit_cmdsearch_Click</p><p><b>　　End Sub</b></p><p>　　其他窗體代碼略有修改。</p><p><b>　　以下為報(bào)表代碼：</

37、b></p><p>　　Option Compare Database</p><p>　　Private Sub cmdcancel_Click()</p><p>　　DoCmd.Close acForm, "報(bào)表顯示"</p><p><b>　　End Sub</b></p>

38、;<p>　　Private Sub cmdshow_Click()</p><p>　　If chkqd.Value = -1 Then</p><p>　　DoCmd.OpenReport "庫(kù)存清單", acViewPreview</p><p><b>　　End If</b></p>&

39、lt;p>　　If chkbz.Value = -1 Then</p><p>　　DoCmd.OpenReport "庫(kù)存不足", acViewPreview</p><p><b>　　End If</b></p><p>　　If chkgd.Value = -1 Then</p><p>

40、;　　DoCmd.OpenReport "庫(kù)存過(guò)多", acViewPreview</p><p><b>　　End If</b></p><p>　　If chkcz.Value = -1 Then</p><p>　　DoCmd.OpenReport "操作日志", acViewPreview<

41、;/p><p><b>　　End If</b></p><p>　　DoCmd.Close acForm, "報(bào)表顯示"</p><p><b>　　End Sub </b></p><p>　　在工具-啟動(dòng)中設(shè)置自動(dòng)啟動(dòng)切換面板，可以在打開(kāi)時(shí)按住Shift進(jìn)入設(shè)計(jì)界面。點(diǎn)擊主窗口

42、的庫(kù)存管理系統(tǒng)可啟動(dòng)宏，提示版權(quán)信息：版權(quán)所有：李智勇2006-11-30</p><p>　　第3章 課程設(shè)計(jì)總結(jié)</p><p>　　通過(guò)這次的課程設(shè)計(jì)，使我增加了對(duì)數(shù)據(jù)庫(kù)基本概念的理解，提高對(duì)知識(shí)的理解和應(yīng)用能力，并且對(duì)數(shù)據(jù)庫(kù)的應(yīng)用都有了更深的了解，使我的數(shù)據(jù)庫(kù)編寫(xiě)水平又有了明顯的提高。在WINDOWS的環(huán)境中，用ACCESS和VBA代碼構(gòu)建一個(gè)庫(kù)存管理系統(tǒng)。讓我了解到了在實(shí)際的環(huán)境

43、下編寫(xiě)數(shù)據(jù)庫(kù)的應(yīng)用。</p><p>　　在這次的課程設(shè)計(jì)中，使我對(duì)數(shù)據(jù)庫(kù)的知識(shí)有了更深刻了解，增加可我對(duì)數(shù)據(jù)庫(kù)這門(mén)課興趣，強(qiáng)化了我的實(shí)際動(dòng)手能力。同時(shí)也找到自己的不足。我一定會(huì)繼續(xù)學(xué)習(xí)增加自己的數(shù)據(jù)庫(kù)知識(shí)，在今后的學(xué)習(xí)中我會(huì)更加的努力，增加自己的知識(shí)儲(chǔ)備。對(duì)倉(cāng)庫(kù)管理系統(tǒng)的開(kāi)發(fā),我付出了大量的時(shí)間,但是,我得到的收獲遠(yuǎn)遠(yuǎn)不是這些時(shí)間可以衡量的,它將是我終生的財(cái)富,必將給我今后的學(xué)習(xí)和工作帶來(lái)更多的收益.通過(guò)對(duì)此管

44、理系統(tǒng)的開(kāi)發(fā),使我對(duì)軟件開(kāi)發(fā)有了一個(gè)比較清楚的認(rèn)識(shí),體會(huì)到理論和實(shí)踐的重要性.由于自己的分析設(shè)計(jì)和程序經(jīng)驗(yàn)不足,該系統(tǒng)設(shè)計(jì)和實(shí)現(xiàn)過(guò)程中,還有許多沒(méi)有完善的地方,比如,用戶界面設(shè)計(jì)不夠美觀,異常出錯(cuò)處理比較差等多方面問(wèn)題,這些都有待進(jìn)一步完善和提高。</p><p><b>　　參考文獻(xiàn)</b></p><p>　　[1] 葉杰宏 等編著.《Access2003經(jīng)典案

45、例》.冶金工業(yè)出版.出版日期 2006年2月第二版</p><p>　　[2] 黃剴濤 等編著.《Access 2000學(xué)習(xí)教程》.北京大學(xué)出版社.出版日期 2003年9月第一版</p><p>　　[3] 劉勝雷 編著.《新概念A(yù)ccess 2002》教程，北京科海集團(tuán)公司.出版日期 2003年4月第一版</p><p>　　[4] 李愛(ài)茜 編著.《Acce