商品庫存管理系統(tǒng)培訓(xùn)課程

1、商品庫存管理系統(tǒng)功能：提供倉庫各類信息的瀏覽、添加、刪除、修改等操作。可以進(jìn)行入庫出庫等操作，并保證安全性?？梢赃M(jìn)行日志管理，方便事后查看。系統(tǒng)其他的相關(guān)功能。 首先進(jìn)行系統(tǒng)分析：1.本系統(tǒng)主要模塊有4個：商品管理模塊、商家管理模塊、入庫信息管理模塊、出庫信息管理模塊。下面分別對這四個模塊進(jìn)行介紹:商品管理模塊 倉庫管理員通過此模塊來管理商品信息，主要包括瀏覽、查詢、添加、修改和刪除功能。在進(jìn)行商品信息的添加時系統(tǒng)會自動檢測所添加的商品信息中的商品號在商品表中是否已經(jīng)存在，存在則提示，否則進(jìn)行添加。刪除時要進(jìn)行確認(rèn)方可進(jìn)行信息刪除。修改時，商品的商品號是不可以修改的，因為商品號作為數(shù)據(jù)庫中商品

2、表的主鍵是不同商品的唯一標(biāo)識（可以通過數(shù)據(jù)庫管理員實現(xiàn)修改）。2、商家管理模塊 倉庫管理員通過此模塊來管理商家信息，包括瀏覽、查詢、添加、修改和刪除等。進(jìn)行商家信息添加時系統(tǒng)自動檢測所添加的商家是否已經(jīng)存在，存在則提示，否則繼續(xù)添加。刪除時也需確認(rèn)才可刪除，商家號不準(zhǔn)修改。3、入庫信息管理模塊 倉庫管理員通過此模塊來管理入庫信息，包括瀏覽、查詢、添加、修改和刪除功 能。在進(jìn)行入庫信息添加時，系統(tǒng)自動檢測所添加信息是否在商品表里是否已經(jīng)存在。存在則提示，否則繼續(xù)添加。其他基本功能和前面類似。4、出庫信息管理模塊 倉庫管理員通過此模塊進(jìn)行出庫操作。選擇相應(yīng)的商品，系統(tǒng)自動顯示被選擇的商品的數(shù)量。若

3、出庫量大于當(dāng)前商品數(shù)量，則操作不能完成。下面介紹程序的實現(xiàn) 本例用Visual C+ 6.0創(chuàng)建一個基于對話框的MFC AppWizard(exe)項目。項目名為GMS。 創(chuàng)建項目后， Visual C+ 呈現(xiàn)給使用者的是一個CGMSDlg對話框，本例的登錄界面其實就是在這個對話框的基礎(chǔ)上開始設(shè)計的。登錄對話框 把生成的應(yīng)用系統(tǒng)框架中的基本對話框IDD_GMS_DIALOG作為應(yīng)用系統(tǒng)的登錄界面加以制作。1、刪除無關(guān)控件2、界面設(shè)計如右圖：控件類型ID屬性設(shè)置Picture默認(rèn)BitMapButtonIDC_BUTTON_OKCaption設(shè)為“確定”ButtonIDC_BUTTON_CANC

4、ELCaption設(shè)為“取消”Static Text默認(rèn)Caption設(shè)為“用戶名”Static Text默認(rèn)Caption設(shè)為“密碼”Edit BoxIDC_EDTI_LOGINNAME默認(rèn)Edit BoxIDC_EDIT_PASSWDPassword按上表添加控件，然后雙擊對話框，打開Class Wizard，為IDD_GMS_DIALOG添加CGMSDlg類（系統(tǒng)已添加），然后按照下表添加成員變量：控件ID 變量類 數(shù)據(jù)類型IDC_EDIT_LOGINNAMEm_strLoginNameCStringIDC_EdIT_PASSWDm_strPasswdCString代碼編寫 1.“確定”

5、按鈕單擊“確定”按鈕，驗證用戶名和密碼的有效性，成功則進(jìn)入主界面：void CGMSDlg:OnButtonOk() CString strSql;_variant_t strQuery;UpdateData(TRUE);if (m_strName.IsEmpty() /*判斷用戶名信息是否為空*/AfxMessageBox(請輸入用戶名!);return;strQuery = SELECT * FROM admin WHERE Admin_name=+m_strName+ AND Admin_passwd= + m_strPasswd+ ;theApp.ADOExecute(theApp.m

6、_pRs, strQuery); int iCount = theApp.m_pRs-GetRecordCount();if ( 0=iCount ) AfxMessageBox(用戶名或密碼錯誤!);m_strName=;m_strPasswd=;UpdateData(false);elsestrAdminName=m_strName;:Sleep(300);OnOK();CMainDlg dlg;dlg.DoModal();/ TODO: Add your control notification handler code here2.“取消”按鈕單擊“取消”按鈕則關(guān)閉登錄對話框，不做任何

7、操作： void CGMSDlg:OnButtonCancel() OnCancel();/ TODO: Add your control notification handler code here 主界面的實現(xiàn) 功能：當(dāng)?shù)卿洺晒?，將出現(xiàn)應(yīng)用程序主界面。因為主界面需要集合其他各個模塊，所以一般編程時都是每坐完一個模塊，就連接上一塊。 界面設(shè)計 如下圖：對話框ID屬性設(shè)置為：IDD_DIALOG_MAIN 按照右圖添加控 件添加完控件后，雙擊對話框資源，打開Class Wizard，為IDD_DIALOG_MAIN添加CMainDlg類。 代碼編寫：“庫存商品”按鈕： void CMainD

8、lg:OnButtonGoodsadd() CGoodsDlg dlg;this-ShowWindow(SW_HIDE);dlg.DoModal();this-ShowWindow(SW_SHOW); “供貨商家”按鈕： void CMainDlg:OnButtonProvideradd() CProviderDlg dlg;this-ShowWindow(SW_HIDE);dlg.DoModal();this-ShowWindow(SW_SHOW); “商品入庫”按鈕：void CMainDlg:OnButtonGoodsin() CInDlg dlg;this-ShowWindow(SW_

9、HIDE);dlg.DoModal();this-ShowWindow(SW_SHOW);“商品出庫”按鈕：void CMainDlg:OnButtonGoodsout() COutDlg dlg;this-ShowWindow(SW_HIDE);dlg.DoModal();this-ShowWindow(SW_SHOW);/ TODO: Add your control notification handler code here“商品信息”按鈕：void CMainDlg:OnButtonGoods() CViewDlg dlg;this-ShowWindow(SW_HIDE);dlg.I

10、nit(1);dlg.DoModal();this-ShowWindow(SW_SHOW);“商家信息”按鈕：void CMainDlg:OnButtonProvider() CViewDlg dlg;this-ShowWindow(SW_HIDE);dlg.Init(2);dlg.DoModal();this-ShowWindow(SW_SHOW);/ TODO: Add your control notification handler code here“入庫信息”按鈕：void CMainDlg:OnButtonIn() CViewDlg dlg;this-ShowWindow(SW_

11、HIDE);dlg.Init(3);dlg.DoModal();this-ShowWindow(SW_SHOW);“出庫信息”按鈕：void CMainDlg:OnButtonOut() CViewDlg dlg;this-ShowWindow(SW_HIDE);dlg.Init(3);dlg.DoModal();this-ShowWindow(SW_SHOW);/ TODO: Add your control notification handler code here“庫存報警”按鈕：void CMainDlg:OnButtonAlert() CAlertDlg dlg;dlg.DoMod

12、al();“修改管理員密碼”按鈕：void CMainDlg:OnButtonAdmin() CPasswdDlg dlg;dlg.DoModal();“操作日志”按鈕：void CMainDlg:OnButtonLog() CViewDlg dlg;this-ShowWindow(SW_HIDE);dlg.Init(5);dlg.DoModal();this-ShowWindow(SW_SHOW);/ TODO: Add your control notification handler code here“幫助”按鈕（讀者可以自行添加幫助文檔）：void CMainDlg:OnButton

13、Help() WinExec(notepad.exe GPS.HEP,SW_SHOW);“關(guān)于”按鈕：void CMainDlg:OnButtonAbout() CAboutDlg dlg;dlg.DoModal();“退出”按鈕（可以用OnCancel代替）：void CMainDlg:OnButtonExit() OnOK();/ TODO: Add your control notification handler code here 商品操作對話框 1、功能描述 在主界面上單擊“庫存商品”按鈕，彈出此對話框。該對話框用于商品的注冊登記，同時也可以進(jìn)行相應(yīng)的數(shù)據(jù)庫操作。 對話框ID屬性設(shè)

14、置為：IDD_DIALOG_GOO DS。 按下圖添加控件： 按圖添加完控件后，雙擊對話框資源，打開Class Wizard，為IDD_DIALOG_GOODS添加CGoodsDlg類，并按照下表為該類添加成員變量。控件ID變量名數(shù)據(jù)類型IDC_EDIT_CODEm_strCodeCString IDC_EDIT_NAMEm_strNameCStringIDC_EDIT_MAXNUMm_strMaxNum CStringIDC_EDIT_MINNUMm_strMinNumCStringIDC_LIST_DISPm_listDispCListCtrl代碼編寫：ClearTxt清空編輯框中的內(nèi)容：

15、void CGoodsDlg:ClearTxt()m_strCode=;m_strName=;m_strMaxNum=;m_strMinNum=;UpdateData(false);RefreshData向列表控件填充數(shù)據(jù)：void CGoodsDlg:RefreshData()m_listDisp.DeleteAllItems();m_listDisp.SetRedraw(FALSE);_variant_t Holder, strQuery; strQuery= select * from goods;theApp.ADOExecute(theApp.m_pRs, strQuery); in

16、t iCount = theApp.m_pRs-GetRecordCount();if ( 0=iCount ) return;theApp.m_pRs-MoveFirst();int i=0;while(!theApp.m_pRs-adoEOF)Holder = theApp.m_pRs-GetCollect(G_code);if(Holder.vt!=VT_NULL)m_listDisp.InsertItem(i, (char*)(_bstr_t)Holder);Holder = theApp.m_pRs-GetCollect(G_name);if(Holder.vt!=VT_NULL)m

17、_listDisp.SetItemText(i,1, (char*)(_bstr_t)Holder);Holder = theApp.m_pRs-GetCollect(Current_number);if(Holder.vt!=VT_NULL)m_listDisp.SetItemText(i,2, (char*)(_bstr_t)Holder);Holder = theApp.m_pRs-GetCollect(Max_number);if(Holder.vt!=VT_NULL)m_listDisp.SetItemText(i,3, (char*)(_bstr_t)Holder);Holder

18、= theApp.m_pRs-GetCollect(Min_number);if(Holder.vt!=VT_NULL)m_listDisp.SetItemText(i,4, (char*)(_bstr_t)Holder);theApp.m_pRs-MoveNext();i+;m_listDisp.SetRedraw(TRUE);初始化對話框。（設(shè)置列表控件，裝載數(shù)據(jù)）：BOOL CGoodsDlg:OnInitDialog() CDialog:OnInitDialog(); m_listDisp.InsertColumn(0,商品編號);m_listDisp.InsertColumn(1,商

19、品名稱);m_listDisp.InsertColumn(2,當(dāng)前庫存);m_listDisp.InsertColumn(3,最大庫存);m_listDisp.InsertColumn(4,最小庫存);RECT rect;m_listDisp.GetWindowRect(&rect);int wid = rect.right - rect.left;m_listDisp.SetColumnWidth(0,wid/5);m_listDisp.SetColumnWidth(1,wid/5);m_listDisp.SetColumnWidth(2,wid/5);m_listDisp.SetC

20、olumnWidth(3,wid/5);m_listDisp.SetColumnWidth(4,wid/5);m_listDisp.SetExtendedStyle(LVS_EX_FULLROWSELECT);RefreshData();/ TODO: Add extra initialization herereturn TRUE; / return TRUE unless you set the focus to a control / EXCEPTION: OCX Property Pages should return FALSE按鈕事件：“增加”按鈕：void CGoodsDlg:O

21、nButtonAdd() UpdateData();CString strSql;strSql.Format(INSERT INTO goods (G_code,G_name,Current_number,Max_number,Min_number) VALUES(%s,%s,0,%s,%s),m_strCode, m_strName, m_strMaxNum,m_strMinNum);_variant_t vtQuery(strSql); theApp.ADOExecute(theApp.m_pRs, vtQuery); RefreshData(); ClearTxt();theApp.m_

22、log.AddLog(添加商品); “修改”按鈕：void CGoodsDlg:OnButtonModify() UpdateData();CString strSql;strSql.Format(UPDATE goods SET G_name=%s,Max_number=%s,Min_number=%s WHERE G_code=%s,m_strName, m_strMaxNum,m_strMinNum,m_strCode);/ TODO: Add your control notification handler code here_variant_t vtQuery(strSql); i

23、f(theApp.ADOExecute(theApp.m_pRs, vtQuery)RefreshData(); ClearTxt();theApp.m_log.AddLog(修改商品);elseAfxMessageBox(修改失敗);“刪除”按鈕：void CGoodsDlg:OnButtonDelete() UpdateData();CString strSql;strSql.Format(DELETE FROM goods WHERE G_code=%s,m_strCode);_variant_t vtQuery(strSql); theApp.ADOExecute(theApp.m_p

24、Rs, vtQuery);RefreshData(); ClearTxt();theApp.m_log.AddLog(刪除商品);“退出”按鈕：void CGoodsDlg:OnButtonExit() OnOK();/ TODO: Add your control notification handler code here 列表控件： 當(dāng)選擇左邊列表控件的元素時，將在右邊的編輯框中顯示。代碼如下： void CGoodsDlg:OnClickListDisp(NMHDR* pNMHDR, LRESULT* pResult) / TODO: Add your control notifica

25、tion handler code hereint i = m_listDisp.GetSelectionMark();m_strCode = m_listDisp.GetItemText(i,0);m_strName= m_listDisp.GetItemText(i,1);m_strMaxNum = m_listDisp.GetItemText(i,3);m_strMinNum= m_listDisp.GetItemText(i,4);UpdateData(FALSE);*pResult = 0; 供貨商家對話框 功能描述：在主界面上單擊“供貨商家”按鈕，彈出此對話框。該對話框用于商家的注

26、冊登記，同時也可以進(jìn)行相應(yīng)的數(shù)據(jù)庫操作。 界面設(shè)計： 如右圖： 對話框?qū)傩詾椋?IDD_DIALOG_ PROVIDERCCProvideDlg類成員變量控件ID變量名數(shù)據(jù)類型IDC_EDIT_CODEm_strCodeCString IDC_EDIT_NAMEm_strNameCStringIDC_EDIT_ADDRESSm_strAddressCString IDC_EDIT_PERSONm_strPersonCStringIDC_EDIT_PHONEm_strPhoneCStringIDC_EDIT_EMAILm_strEmailCStringIDC_LIST_DISPm_listDis

27、pCListCtrl代碼編寫：功能函數(shù)。 ClearTxt（清空編輯框中的內(nèi)容）：void CProviderDlg:ClearTxt()m_strAddress=;m_strCode=;m_strName=;m_strEmail=;m_strPerson=;m_strPhone=;UpdateData(false);1.RefreshData（向列表控件填充數(shù)據(jù)）：void CProviderDlg:RefreshData()m_listDisp.DeleteAllItems();m_listDisp.SetRedraw(FALSE);_variant_t Holder, strQuery;

28、 strQuery= select * from provider;theApp.ADOExecute(theApp.m_pRs, strQuery); int iCount = theApp.m_pRs-GetRecordCount();if ( 0=iCount ) return;theApp.m_pRs-MoveFirst();int i=0;while(!theApp.m_pRs-adoEOF)Holder = theApp.m_pRs-GetCollect(Provider_code);if(Holder.vt!=VT_NULL)m_listDisp.InsertItem(i, (c

29、har*)(_bstr_t)Holder);Holder = theApp.m_pRs-GetCollect(Provider_name);if(Holder.vt!=VT_NULL)m_listDisp.SetItemText(i,1, (char*)(_bstr_t)Holder);Holder = theApp.m_pRs-GetCollect(Provider_address);if(Holder.vt!=VT_NULL)m_listDisp.SetItemText(i,2, (char*)(_bstr_t)Holder);Holder = theApp.m_pRs-GetCollec

30、t(Provider_person);if(Holder.vt!=VT_NULL)m_listDisp.SetItemText(i,3, (char*)(_bstr_t)Holder);Holder = theApp.m_pRs-GetCollect(Provider_telphone);if(Holder.vt!=VT_NULL)m_listDisp.SetItemText(i,4, (char*)(_bstr_t)Holder);Holder = theApp.m_pRs-GetCollect(Provider_email);if(Holder.vt!=VT_NULL)m_listDisp

31、.SetItemText(i,5, (char*)(_bstr_t)Holder);theApp.m_pRs-MoveNext();i+;m_listDisp.SetRedraw(TRUE);2.初始化對話框。初始化（設(shè)置列表控件，裝載數(shù)據(jù)）：BOOL CProviderDlg:OnInitDialog() CDialog:OnInitDialog();m_listDisp.InsertColumn(0,編號);m_listDisp.InsertColumn(1,名稱);m_listDisp.InsertColumn(2,地址);m_listDisp.InsertColumn(3,負(fù)責(zé)人);m

32、_listDisp.InsertColumn(4,電話);m_listDisp.InsertColumn(5,Email);RECT rect;m_listDisp.GetWindowRect(&rect);int wid = rect.right - rect.left;m_listDisp.SetColumnWidth(0,wid/6);m_listDisp.SetColumnWidth(1,wid/6);m_listDisp.SetColumnWidth(2,wid/6);m_listDisp.SetColumnWidth(3,wid/6);m_listDisp.SetColum

33、nWidth(4,wid/6);m_listDisp.SetColumnWidth(5,wid/6);m_listDisp.SetExtendedStyle(LVS_EX_FULLROWSELECT);RefreshData();return TRUE; / return TRUE unless you set the focus to a control3.按鈕事件?！霸黾印卑粹o：void CProviderDlg:OnButtonAdd() UpdateData();CString strSql;strSql.Format(INSERT INTO provider(Provider_cod

34、e,Provider_name,Provider_address,Provider_person,Provider_telphone,Provider_email) VALUES(%s,%s,%s,%s,%s,%s),m_strCode, m_strName, m_strAddress,m_strPerson,m_strPhone,m_strEmail);_variant_t vtQuery(strSql); theApp.ADOExecute(theApp.m_pRs, vtQuery); RefreshData(); ClearTxt();theApp.m_log.AddLog(添加商家)

35、;/ TODO: Add your control notification handler code here“修改”按鈕：void CProviderDlg:OnButtonModify() UpdateData();CString strSql;strSql.Format(UPDATE provider SET Provider_name=%s,Provider_address=%s,Provider_person=%s,Provider_telphone=%s,Provider_email=%s WHERE Provider_code=%s, m_strName, m_strAddre

36、ss,m_strPerson,m_strPhone,m_strEmail,m_strCode);/ TODO: Add your control notification handler code here_variant_t vtQuery(strSql); if(theApp.ADOExecute(theApp.m_pRs, vtQuery)RefreshData(); ClearTxt();theApp.m_log.AddLog(修改商家);elseAfxMessageBox(修改失敗);“刪除”按鈕：void CProviderDlg:OnButtonDelete() UpdateDa

37、ta();CString strSql;strSql.Format(DELETE FROM provider WHERE Provider_code=%s,m_strCode);_variant_t vtQuery(strSql); theApp.ADOExecute(theApp.m_pRs, vtQuery);RefreshData(); ClearTxt();theApp.m_log.AddLog(刪除商品);“退出”按鈕：void CProviderDlg:OnButtonExit() OnOK();/ TODO: Add your control notification handl

38、er code here4,。列表控件。當(dāng)選擇左邊列表控件的元素時，將在右邊的編輯框中顯示。代碼如下：void CProviderDlg:OnClickListDisp(NMHDR* pNMHDR, LRESULT* pResult) / TODO: Add your control notification handler code hereint i = m_listDisp.GetSelectionMark();m_strCode = m_listDisp.GetItemText(i,0);m_strName= m_listDisp.GetItemText(i,1);m_strAddre

39、ss = m_listDisp.GetItemText(i,2);m_strPerson = m_listDisp.GetItemText(i,3);m_strPhone = m_listDisp.GetItemText(i,4);m_strEmail = m_listDisp.GetItemText(i,5);UpdateData(FALSE);*pResult = 0;入庫對話框功能描述 在主界面上單擊“商品入庫”按鈕，彈出此對話框。該對話框用于商品的入庫操作，當(dāng)對話框加載時，自 動列出已注冊的入 庫商品和供應(yīng)商以 供選擇。界面設(shè)計 對話框ID屬性：IDD_DIALOG_INCInDlg類

40、的成員變量：控件ID變量名數(shù)據(jù)類型IDC_EDIT_NUMm_strNumCStringIDC_EDIT_PRICEm_strPriceCString IDC_COMBO_GOODSm_cbGoodsCComboBoxIDC_COMBO_PROVIDERm_sbProviderCComboBoxIDC_DATETIMEPICKER_DATAm_DataCTimeIDC_DATETIMEPICKER_TIMEm_TimeCTime3.代碼編寫功能函數(shù)：AddGoods修改商品信息（當(dāng)前存儲數(shù)=原先當(dāng)先存儲數(shù)+入庫的數(shù)目）：void CInDlg:AddGoods(int iNum)int iCu

41、rrentNum=0;_variant_t Holder, strQuery; strQuery= select * from goods where G_name=+m_strGoodsName+;theApp.ADOExecute(theApp.m_pRs, strQuery);theApp.m_pRs-MoveFirst();Holder = theApp.m_pRs-GetCollect(Current_number);if(Holder.vt!=VT_NULL)iCurrentNum=Holder.iVal;iCurrentNum+=iNum;CString strSql;strSq

42、l.Format(UPDATE goods SET Current_number=%d WHERE G_name=%s,iCurrentNum,m_strGoodsName);/ TODO: Add your control notification handler code here_variant_t vtQuery(strSql); if(theApp.ADOExecute(theApp.m_pRs, vtQuery)AfxMessageBox(入庫成功);theApp.m_log.AddLog(商品入庫);AddIng（添加入庫信息）：void CInDlg:AddIn(CString

43、 strGcode,CString strPcode)CString strSql;CString strDate=m_Date.Format(%Y-%m-%d );strDate+=m_Time.Format(%H:%M:%S);strSql.Format(INSERT INTO inlib VALUES(%s,%s,%s,%s,%s),strGcode,strPcode, m_strNum, m_strPrice,strDate);_variant_t vtQuery(strSql); theApp.ADOExecute(theApp.m_pRs, vtQuery); theApp.m_l

44、og.AddLog(添加入庫);GetGoodsCode(根據(jù)給出的商品名，查找獲得對應(yīng)的商品號)：void CInDlg:GetGoodsCode(CString strName, CString &strCode)_variant_t Holder, strQuery; strQuery= select * from goods where G_name=+strName+;theApp.ADOExecute(theApp.m_pRs, strQuery);theApp.m_pRs-MoveFirst();Holder = theApp.m_pRs-GetCollect(G_cod

45、e);if(Holder.vt!=VT_NULL)strCode=Holder.bstrVal;GetProviderCode（根據(jù)所給出的商家名，查找獲得對應(yīng)的商家號）：void CInDlg:GetProviderCode(CString strName, CString &strCode)_variant_t Holder, strQuery; strQuery= select * from provider where Provider_name=+strName+;theApp.ADOExecute(theApp.m_pRs, strQuery);theApp.m_pRs-M

46、oveFirst();Holder = theApp.m_pRs-GetCollect(Provider_code);if(Holder.vt!=VT_NULL)strCode=Holder.bstrVal;初始化對話框：初始化時，應(yīng)將已注冊的商品和商家填入列表框里。代碼如下：BOOL CInDlg:OnInitDialog() CDialog:OnInitDialog();m_Date = CTime:GetCurrentTime();m_Time = m_Date;m_cbGoods.SetRedraw(false);m_cbProvider.SetRedraw(false);_variant_t Holder, strQuery; strQuery=