藥店管理系統(tǒng)-查詢及報表處理

1、藥店管理系統(tǒng)摘 要：長期以來,各個藥店的管理工作一直由人工整理和統(tǒng)計，這樣在庫存等方面都存在著很大的管理難度,而且還容易出現(xiàn)沖突。這樣就需要建立一個完善的管理系統(tǒng)，來全面、具體的處理這些工作。設(shè)計數(shù)據(jù)庫管理系統(tǒng)面臨的最重要的一個問題就是：數(shù)據(jù)庫中信息的安全性無法保證，當有人不小心改變數(shù)據(jù)庫中的信息時，就會給工作人員造成很大的麻煩;更嚴重的是當有人惡意的對數(shù)據(jù)進行破壞時，就會造成很大的損失。因此，在數(shù)據(jù)安全方面加入了數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)的功能模塊。在管理方面還能針對一些特殊的業(yè)務(wù)做出相應(yīng)的管理模式,如:可以利用軟件進行庫存分析等功能,本軟件利用了功能強大的開發(fā)軟件Visual Basic6.0進行

2、編譯,在后臺數(shù)據(jù)庫上則運用了Microsoft Access數(shù)據(jù)庫,雖然在大型企業(yè)當中對數(shù)據(jù)訪問的要求量比較大,但在一般的藥店管理中Access數(shù)據(jù)庫完全能實現(xiàn)快速的數(shù)據(jù)訪問功能, 該系統(tǒng)采用管理模型，將仿真、優(yōu)化等現(xiàn)代決策手段結(jié)合起來，為企業(yè)管理層的決策提供有效信息。 關(guān)鍵詞：庫存查詢，藥店管理，數(shù)據(jù)庫Abstract :For long time, It has been being tidy up by the artificial and statistics in various management work of the each medicine store, the dema

3、nd throws in a great deal of manpower and energies in past management, and still appear the conflict easily.Need to build up a perfect management system thus, come overall, handle these works in a specific way.The most important a problem that the design database management system face be:The safety

4、 of information can't guarantee in the database, it is a logarithms that is someone's malice more seriously according to carry on break, will result in very great damage.Therefore, in the data the safe aspect joined the function mold piece of the data backup and data instauration.Can still d

5、o to some special business in the aspects of manage a correspond of management mode, made use of the database of Microsoft Access if: can make use of the software to carry on the stock analysis etc. function, this software makes use of the function strong development software Visual Basic6.0 to carr

6、y on edit and translate, however in the general medicine store manage the database of Access can carry out the fast data interview function completely, that system adoption management model. the modern decision means knot put together, providing the valid information for the decision that the busine

7、ss enterprise manages the layer.Keywords: The stock search, Medicine store management, Database.1序言隨著我國市場經(jīng)濟的蓬勃發(fā)展和人們對醫(yī)藥產(chǎn)品需求的迅速增加,醫(yī)藥行業(yè)正處于一個高速發(fā)展的時期。行業(yè)的快速發(fā)展必然導(dǎo)致競爭的加劇,要想在激烈的市場競爭中的謀求發(fā)展,客觀上要求企業(yè)必須加強內(nèi)部管理,提高運營效率。目前我國醫(yī)藥經(jīng)營形式正在向集團化,連鎖化發(fā)展。如何利用現(xiàn)代信息技術(shù)使企業(yè)擁有快速、高效的市場反映能力和高度的效率,已經(jīng)是醫(yī)藥經(jīng)營企業(yè),特別是醫(yī)藥連鎖經(jīng)營企業(yè)特別關(guān)心的問題。由于醫(yī)藥產(chǎn)品種類繁多、銷

8、售模式特殊、業(yè)務(wù)量大,單憑手工記帳已很難適應(yīng)工作的需要。如何盡快建立和完善現(xiàn)代企業(yè)的信息化管理機制問題,已成為醫(yī)藥企業(yè)發(fā)展的關(guān)鍵所在。在本系統(tǒng)的設(shè)計的過程中，我們做了大量的市場調(diào)查，爭取系統(tǒng)的功能能夠滿足用戶需求，實用性較強。本系統(tǒng)主要是通過對Access 2000數(shù)據(jù)庫的使用和實際當中的應(yīng)用結(jié)合起來最后實現(xiàn)數(shù)據(jù)的提交、數(shù)據(jù)的運算、數(shù)據(jù)的存儲、數(shù)據(jù)的輸出等功能。由于Access 2000數(shù)據(jù)庫的簡單實用性，所以決定了本系統(tǒng)具有很大的再開發(fā)潛力，通過SQL與前臺的Visual Basic 6.0進行連接。在整個系統(tǒng)的開發(fā)和設(shè)計的過程中，我們也遇到了許多困難，但都隨著我們學(xué)習(xí)的深入被一一解決了,

9、當然，此系統(tǒng)中還存在許多缺點和不足，將會在以后給與更新和完善。2系統(tǒng)設(shè)計2.1 開發(fā)方法2.1.1 數(shù)據(jù)庫的開發(fā)工具簡介Access2000以其簡單易用的特點，逐漸成為辦公領(lǐng)域流行的數(shù)據(jù)庫軟件。使用Access2000，用戶不需要進行專業(yè)程序設(shè)計能力培養(yǎng)，就可在較短的時間內(nèi)通過簡單直觀的可視化操作（操作向?qū)В┩瓿纱蟛糠值臄?shù)據(jù)管理任務(wù)，設(shè)計出功能強大的數(shù)據(jù)庫管理程序。即使要開發(fā)復(fù)雜或?qū)I(yè)的數(shù)據(jù)庫管理程序，也只需編寫少量的程序代碼。2.1.2 Visual Basic 6.0的開發(fā)環(huán)境本系統(tǒng)編程采用的語言是VB6.0,該語言是Windows編程語言,可以實現(xiàn)其它任何Windows編程語言的功能,所

10、設(shè)計的程序具有Windows環(huán)境的五大優(yōu)點,即標準的圖形用戶界面、動態(tài)鏈接(DLL)、多任務(wù)、設(shè)備獨立性及直接操作特性。VB6.0具有快速的程序開發(fā)環(huán)境,能迅速有效地編制程序界面、功能強大。2.1.3 SQL語言介紹 SQL(Structured Query Language，結(jié)構(gòu)查詢語言)是一個功能強大的數(shù)據(jù)庫語言。SQL通常使用于數(shù)據(jù)庫的通訊。SQL語句通常用于完成一些數(shù)據(jù)庫的操作任務(wù)，使用SQL的常見關(guān)系數(shù)據(jù)庫管理系統(tǒng)有：Oracle、Microsoft SQL Server、Access等。SQL語言有著非常突出的優(yōu)點，主要是統(tǒng)一的和非過程化語言、是所有關(guān)系數(shù)據(jù)庫的公共語言。2.2 系

11、統(tǒng)功能分析通過和用戶的交流詳細了解客戶的需求，細化功能要求，準確地回答系統(tǒng)必須做什么。完成功能要求包括有：（1）對現(xiàn)有的庫存情況進行庫存分析,預(yù)算出所需的數(shù)據(jù),提供給管理者一個擬定方案,達到實時的庫存管理,進銷存管理；（2）對數(shù)據(jù)的維護管理,實現(xiàn)實時的維護管理,保證數(shù)據(jù),防止了意外的數(shù)據(jù)流失；（3）根據(jù)銷售情況分析得出某種藥品的銷售情況,并能做出相應(yīng)的圖例,給用戶一個直觀的表示；（4）系統(tǒng)管理模塊的設(shè)計,本模塊主要完成對用戶的管理與維護；（5）通過庫存管理與銷售的結(jié)合,實現(xiàn)庫存分析,并提出相應(yīng)的計劃；（6）對銷售情況的報表顯示模塊；（7）MDI窗體的整合,界面美觀。2.3 系統(tǒng)功能模塊設(shè)計系統(tǒng)

12、功能模塊設(shè)計如圖2-1所示。藥店管理系統(tǒng)系統(tǒng)管理庫存查詢圖形顯示數(shù)據(jù)維護添加用戶修改密碼重新登陸系統(tǒng)鎖定退出系統(tǒng)批號查詢總量查詢數(shù)據(jù)恢復(fù)數(shù)據(jù)備份庫存分析查詢返貨差額查詢銷售合計查詢GSP管理銷售毛利報表圖2-1系統(tǒng)功能模塊3數(shù)據(jù)庫設(shè)計3.1 數(shù)據(jù)庫需求分析調(diào)查藥店管理過程的基礎(chǔ)上，得到本系統(tǒng)所處理的數(shù)據(jù),通過這些數(shù)據(jù)來進行數(shù)據(jù)庫的建立本人在此系統(tǒng)中的數(shù)據(jù)庫的需求有, 庫存、銷售、柜組、藥品基本信息等。3.2 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計本系統(tǒng)在設(shè)計的初級階段要對數(shù)據(jù)庫進行設(shè)計，所以針對前面分析建立初步的數(shù)據(jù)庫。需要的各表內(nèi)容及字段名稱如下：藥品基本表：記錄藥品的基本信息，包括柜組、編碼、拼音編碼、品名、

13、規(guī)格、產(chǎn)地等。銷售：根據(jù)入庫按帳記錄銷售的信息，包括柜組、編碼、品名、規(guī)格、產(chǎn)地、單位等。藥店管理數(shù)據(jù)類別如圖3-1所示。庫存查詢總量查詢批號查詢查詢分析 圖 3-1 藥店庫存查詢管理系統(tǒng)管理如圖3-2所示。退出系統(tǒng)系統(tǒng)管理添加用戶重新登陸編輯用戶鎖定系統(tǒng)圖3-2 系統(tǒng)管理用戶信息E-R圖如3-3所示。用戶權(quán)限密碼用戶名用戶ID圖3-3 用戶信息E-R圖藥店管理系統(tǒng)數(shù)據(jù)庫中我所用到的各個表格的設(shè)計結(jié)果如下面的幾個表格所示。每個表格表示在數(shù)據(jù)庫中的一個表。4菜單及窗口的設(shè)計4.1 MDI窗體設(shè)計 在這里設(shè)置了5個主菜單，12個子菜單項目。對于一些經(jīng)常使用的菜單功能，在工具中設(shè)置相應(yīng)的快捷圖標來實

14、現(xiàn)。在創(chuàng)建MDI窗體上用了一級二級菜單,并為快捷欄也創(chuàng)建了菜單,這樣做即能方便用戶的操作,還能使界面更加美觀。4.2 用戶登陸窗體的建立 該窗體是程序運行時給用戶的第一窗體,通過該窗體的用戶登陸情況,決定了用戶登陸的權(quán)限,從剛開始進入就判斷所輸入用戶在數(shù)據(jù)庫里是否存在,并賦予相應(yīng)的管理權(quán)限。登陸界面如圖4-1所示。 圖41 系統(tǒng)登陸界面第一個為窗體的啟動界面,上面加了一個timer控件,當時間到時就進入到登陸界面,登陸界面也用到了幾個timer控件,這樣使整體效果具有動感。 4.3 系統(tǒng)主界面窗體該窗體是系統(tǒng)所在的主窗體,屬于MDI窗體,在該窗體上創(chuàng)建了下拉菜單、快捷欄和狀態(tài)欄，在系統(tǒng)登陸到主

15、界面的同時還顯示出一個窗體。這個提示窗體是隨系統(tǒng)主窗體一起顯示出來,作為系統(tǒng)提示,它不僅能初步的給用戶介紹系統(tǒng)的功能,更能在界面美觀方面起到很大的作用。如圖4-2所示。 圖42 系統(tǒng)主界面這個就是系統(tǒng)主窗體顯示效果圖,其上面包括菜單欄、狀態(tài)欄和快捷菜單欄。包括在快捷菜單欄的下拉列表框。菜單欄包括5列,用來分別顯示不同的項目,快捷菜單欄的創(chuàng)建就是為了方便用戶的操作,也給不同權(quán)限的用戶的操作帶來了方便,狀態(tài)欄主要來顯示當前系統(tǒng)信息.4.4 添加用戶窗體 該窗體所實現(xiàn)的功能是管理員對新增用戶的添加操作,并給予相應(yīng)的權(quán)限。因為用戶的名稱可能有重復(fù),而用戶的ID不能有重復(fù)的,所以將ID設(shè)為主鍵,這樣即使

16、有名稱相同的人但他們的用戶ID也不相同。作為管理員在對員工的添加后,需要重新登陸才可識別新增用戶。4.5 修改密碼窗體該窗體能實現(xiàn)對用戶的密碼修改,同時在該窗體上也能實現(xiàn)對用戶的刪除, 如圖4-3所示。圖4-3 修改密碼窗體5系統(tǒng)測試5.1 待解決的問題對數(shù)據(jù)維護上沒有得到很好的解決,我所能實現(xiàn)的數(shù)據(jù)維護功能是在用戶指定的驅(qū)動器上建立一個文件夾用來存放當前的數(shù)據(jù)庫文件,但多次存放存在著一個覆蓋的問題,并且數(shù)據(jù)的恢復(fù)也是一個覆蓋的過程,假如說在備份了一個數(shù)據(jù)庫文件,可以實現(xiàn)下次備份不覆蓋,也就是說在數(shù)據(jù)庫名前加入當前的時間,但是在相反的恢復(fù)問題上只能恢復(fù)最后一次備份的數(shù)據(jù),這個問題還在解決之中。

17、5.2 測試小結(jié)由于不可能進行窮盡測試，所以軟件的測試不可能發(fā)現(xiàn)程序中所有的錯誤。因此，在整個測試過程中，我力爭用盡可能少的測試發(fā)現(xiàn)盡可能多的錯誤。在編碼過程中，每完成一個模塊我即刻進行測試，看其作為一個單元能否正確運行。而后，我把經(jīng)過單元測試的模塊放在一起形成一個子系統(tǒng)來測試，著重測試模塊接口。確認無誤后，我才把經(jīng)過單元測試的子系統(tǒng)裝配成一個完整的系統(tǒng)，并對照任務(wù)說明書中指定的功能進行測試。在調(diào)試過程中還請其他同學(xué)扮演“用戶”角色，對其進行測試。在測試的時候發(fā)現(xiàn)并解決了一些問題，同時也發(fā)現(xiàn)了一些暫時無法解決的問題，只能在以后的開發(fā)過程中逐步找到解決的辦法，最終完成系統(tǒng)中本人負責(zé)的功能模塊。6

18、小結(jié) 本系統(tǒng)經(jīng)過運行調(diào)試初步完成了藥店對藥品管理的基本功能。系統(tǒng)實現(xiàn)了身份驗證的大模塊,庫存查詢和庫存分析,以及數(shù)據(jù)維護和打印報表等功能。通過這一次的畢業(yè)設(shè)計,本人對所學(xué)知識有了更深一步的理解,理論與實踐得到了統(tǒng)一。在設(shè)計過程中認識了自己在學(xué)習(xí)中的不足,明白了理論要想和實際結(jié)合在一起的困難,但這更使我覺得其中的樂趣,和那種戰(zhàn)勝困難后的成就感。在即將離校之際,能有這次實踐的機會,深感難得,同時感覺到學(xué)無止境,在今后的學(xué)習(xí)和工作中,一定要不斷充實自己。7謝辭本畢業(yè)設(shè)計是在馬春華，孫珊珊，李欣老師的悉心指導(dǎo)下完成的，在課題的選擇和設(shè)計開發(fā)過程中他們給予了我熱心的幫助和大力支持，同時我要感謝我的合作伙

19、伴黃冬、徐存芳同學(xué)，課題的完成需要合作，通過這次合作我更了解了團結(jié)合作的作用。另外在設(shè)計過程中還得到了其他同學(xué)的幫助，從他們的設(shè)計中我得到很多啟發(fā)，所以應(yīng)該感謝他們提供的無私幫助。最后要感謝四年來所有在大學(xué)期間指導(dǎo)、關(guān)心、幫助和支持過我的老師和同學(xué)，沒有平時的課業(yè)基礎(chǔ)也不會有現(xiàn)在的系統(tǒng)，對所有幫助過我的人，致以最崇高的敬意和最真誠的謝意。參考文獻： 1. 薩師煊,數(shù)據(jù)庫系統(tǒng)概論,第三版,北京,高等教育出版社,2005,3-7頁2. 齊峰,Visual basic 6.x程序設(shè)計,第二版,大連,中國鐵道出版社,2003,21-24頁3. 魏江江,Visual basic控件編程百例通,第一版,北

20、京,科學(xué)出版社,2001,24-34頁4. 伍俊良,Visual basic課程設(shè)計與系統(tǒng)開發(fā)案例,第二版,北京,清華出版社,2002,31-34頁5. 黃梯云,管理信息系統(tǒng),第三版,北京,高等教育出版社,2003,81-83頁6. 高江,Visual basic控件100例,第二版,北京,中國人民出版社,2003,34-34頁7. Microsoft Visual Basic 6.0 中文版控件大全,第二版,北京,高等教育出版社,2004,2527頁8. Bobman Richard Pessley Wayne Pruchniak,Visual Basic 6.0 Use the Guide

21、book,Electronics industry publisher,2002,25-26頁 9. Craig Eddy Timothy Buchanan,Access 2000 24hour Learn,Machine industry publisher,2004, 24-34頁 附錄（源程序代碼）系統(tǒng)登陸：Option ExplicitPrivate Counts As BytePrivate Sub cmdcancel_Click()'/結(jié)束EndEnd SubPrivate Sub CmdLogin_Click()Dim sql As StringDim rs As ADO

22、DB.RecordsetIf Text1.text = "" Or text3.text = "" Then MsgBox "用戶ID或密碼不能為空!", , "警告!"Else sql = "select * from 用戶表 where 編號='" & Text1.text & "'" Set rs = transactsql(sql) If Counts < 3 Then If text3.text <> rs(3) T

23、hen Counts = Counts + 1 text3.text = "" MsgBox "密碼錯誤!", , "警告" Else id = rs(0) UserName = rs(1) password = Trim(text3.text) quanx = rs(2) CheckLogin (quanx) Unload Me MDIForm1.Show '/顯示主窗 FrmDay.Show vbModal End If Else MsgBox "密碼錯誤超過三次！", vbCritical, &quo

24、t;警告" Unload Me End IfEnd If添加用戶窗體：Private Sub cmdcancel_Click()Unload MeEnd SubPrivate Sub cmdOK_Click()Dim rs As ADODB.RecordsetDim i As IntegerSet rs = transactsql("select * from 用戶表") If Trim(Text1.text) <> Empty And Trim(TxtUserName.text) <> Empty And Trim(TxtPassWord

25、.text) <> Empty And Trim(TxtOkPwd.text) <> Empty Then Else MsgBox "用戶ID,用戶名,密碼不能為空! ", vbInformation + vbOKOnly, "提示信息" Exit Sub End If For i = 1 To rs.RecordCount If Trim(Text1.text) = rs.Fields(0) Then MsgBox "用戶ID重復(fù),請重新輸入! ", vbInformation + vbOKOnly, "提示信