【正文】 m_pRecordsetMoveNext()。 strSQL=strSQL+str+39。//記錄集指針向后移動(dòng) i++。+((CStoreApp*)AfxGetApp())ToStringCTime(m_formDateEnd)+39。執(zhí)行查詢前要判斷用戶選擇了那些可選項(xiàng)，通過(guò)對(duì)這些可選項(xiàng)的判斷完成相應(yīng)的的數(shù)據(jù)庫(kù)查詢語(yǔ)句的編寫(xiě)，進(jìn)而將查詢到的結(jié)構(gòu)顯示在列表框控件中，供用戶使用。//產(chǎn)品編號(hào) m_productName=(nFirstSelItem,1)。最后將數(shù)據(jù)庫(kù)中存在的產(chǎn)品的信息顯示在列表框中。 (((CStoreApp*)AfxGetApp())m_pConn)Execute((_bstr_t)strSQL,amp。i()。//打開(kāi)查詢記錄集 if(flag==1) //添加 { m_pProductInputFormRecordsetAddNew()。代碼如下：UpdateData(true)。 } POSITION pos = ()。//獲得插入列表框的位置 CString str。 //此處省略部分代碼 tx_remarkEnableWindow(true)。 m_storeHouse = _T()。formID99) (CPRK00%d,formID)。待錄入采購(gòu)入庫(kù)單信息之后，單擊“存盤(pán)”按鈕完成信息的存儲(chǔ)。如果search=1則是被查詢對(duì)話框調(diào)用，如果search=0則是被菜單調(diào)用。 _RecordsetPtr m_pRecordset。 //設(shè)定新的列表框樣式 (0,產(chǎn)品編號(hào),LVCFMT_LEFT,100)。下面以產(chǎn)品入庫(kù)單為例說(shuō)明操作流程。 //執(zhí)行sql語(yǔ)句，刪除記錄 POSITION pos = ()。代碼如下：void CProductInfo::OnDelete() { CAffirm dlg。 //設(shè)定按鈕的可用性 bt_addEnableWindow(true)。 if (SUCCEEDED(hTRes)) {hTRes = m_pRecordsetOpen((LPTSTR)(130), ((CStoreApp*)AfxGetApp())(), adOpenDynamic,adLockPessimistic,adCmdText)。 //產(chǎn)品名稱 //此處省略部分代碼 AfxMessageBox(插入成功！)。 CString str。代碼如下：void CProductInfo::OnSave() { UpdateData(true)。當(dāng)所有的內(nèi)容修改完畢后，單擊“存盤(pán)”按鈕才能實(shí)現(xiàn)實(shí)際的保存工作。 //添加 //設(shè)定除產(chǎn)品編號(hào)以外的其他編輯控件均可用 tx_productIDEnableWindow(false)。productID99) (product00%d,productID)。代碼如下：void CProductInfo::OnAdd() { UpdateData(true)。//獲取單擊的條目 m_productID=(nFirstSelItem,0)。 （2）實(shí)現(xiàn)列表框控件的NM_CLICK消息函數(shù)當(dāng)列表框中的條目被單擊（如列表框的條目被選中）時(shí)該函數(shù)自動(dòng)被調(diào)用。 tx_productName=GetDlgItem(IDC_productName)。 while(!(m_pListRecordsetadoEOF)) {(i,((CStoreApp*)AfxGetApp())GetStringFromVariant(m_pListRecordsetGetCollect(productID)))。//插入組合框 m_pStoreHouseRecordsetMoveNext()。 //用于創(chuàng)建一個(gè)查詢記錄集 CString strSQL。步驟如下：調(diào)用列表框控件的InsertColumm()方法插入列，并設(shè)定列標(biāo)題；分別查詢storeHouse、product表，并構(gòu)造相應(yīng)的查詢結(jié)果記錄集；打開(kāi)storeHouse的查詢結(jié)果記錄集，將記錄集中的數(shù)據(jù)插入到相應(yīng)的組合框中；打開(kāi)product的查詢結(jié)果記錄集，調(diào)用列表框控件的InsertItem()和SetItemText()方法將記錄集中的數(shù)據(jù)插入到列表框控件中；調(diào)用控件的GetDlgItem()方法，為控件可用性控制變量賦值；調(diào)用控件的EnableWindow()方法，設(shè)定控件的可用性。 //顯示錯(cuò)誤信息 return FALSE。PWD=。（3）產(chǎn)品調(diào)撥單信息的查詢：該功能不僅要對(duì)產(chǎn)品調(diào)撥單據(jù)的信息（入庫(kù)倉(cāng)庫(kù)、出庫(kù)倉(cāng)庫(kù)、經(jīng)辦人等）進(jìn)行查詢，而且要對(duì)該單據(jù)所包括的產(chǎn)品的信息（產(chǎn)品名稱、型號(hào)、單價(jià)等）進(jìn)行查詢。（1）產(chǎn)品入庫(kù)單信息錄入與修改：該功能允許用戶輸入入庫(kù)單信息，在輸入過(guò)程中，程序自動(dòng)生成產(chǎn)品入庫(kù)單編號(hào)以方便對(duì)入庫(kù)產(chǎn)品的信息管理和單據(jù)的查詢，同時(shí)程序也檢查輸入的合法性。 經(jīng)濟(jì)可行性在經(jīng)濟(jì)上，費(fèi)用的支出和帶來(lái)的巨大收益相比自是不能相提并論了，至于管理上，工作人員對(duì)于這項(xiàng)工程的實(shí)施必然是持贊成的態(tài)度，因?yàn)檫@樣會(huì)大大減輕他們的工作量提高工作效率。 77 信息系統(tǒng)課程設(shè)計(jì)說(shuō)明書(shū) 設(shè)計(jì)題目：庫(kù)存管理系統(tǒng) 設(shè) 計(jì) 者： 指導(dǎo)教師： 07信息系統(tǒng)工程2010年 6 月 6 日目錄：第一章 可行性分析 開(kāi)發(fā)必要性第二章 系統(tǒng)分析 系統(tǒng)需求分析 功能需求分析 業(yè)務(wù)流程分析 數(shù)據(jù)與數(shù)據(jù)流程分析第三章 系統(tǒng)設(shè)計(jì) 數(shù)據(jù)庫(kù)設(shè)計(jì) 代碼設(shè)計(jì)第四章 設(shè)計(jì)總結(jié) 工作總結(jié) 設(shè)計(jì)過(guò)程總結(jié) 設(shè)計(jì)展望參考文獻(xiàn)第一章 可行性分析操作系統(tǒng)：Windows XP 開(kāi)發(fā)語(yǔ)言：C++數(shù)據(jù)庫(kù)： SQL 2000數(shù)據(jù)庫(kù)訪問(wèn)控件：ADO 開(kāi)發(fā)必要性隨著計(jì)算機(jī)及網(wǎng)絡(luò)技術(shù)的飛速發(fā)展，Internet/Intranet應(yīng)用在全球范圍內(nèi)日益普及，當(dāng)今社會(huì)正快速向信息化社會(huì)前進(jìn)，信息自動(dòng)化的作用也越來(lái)越大，從而可以使我們從繁雜的信息管理中解放出來(lái)，提高了我們的工作效率。且成本低，建成后的維護(hù)費(fèi)用也與線性系統(tǒng)運(yùn)行費(fèi)用相同，而每年可以促進(jìn)企業(yè)倉(cāng)庫(kù)存儲(chǔ)的工作優(yōu)化、庫(kù)存產(chǎn)品的有效利用率，并可有效降低企業(yè)庫(kù)存的不必要支出，提高企業(yè)產(chǎn)品存儲(chǔ)資金的有效利用。（2）產(chǎn)品出庫(kù)單信息錄入與修改：該功能允許用戶輸入出庫(kù)單信息，在輸入過(guò)程中，程序自動(dòng)生成產(chǎn)品出庫(kù)單編號(hào)以方便對(duì)出庫(kù)產(chǎn)品的信息管理和單據(jù)的查詢，同時(shí)程序也檢查輸入的合法性。（4）產(chǎn)品報(bào)損單信息的查詢：該功能不僅要對(duì)產(chǎn)品報(bào)損單據(jù)的信息（報(bào)損倉(cāng)庫(kù)、經(jīng)辦人等）進(jìn)行查詢，而且要對(duì)該單據(jù)所包括的產(chǎn)品的信息（產(chǎn)品名稱、型號(hào)、單價(jià)等）進(jìn)行查詢。)數(shù)據(jù)庫(kù)的初始化，連接代碼如下：HRESULT hRes。 }hRes = (_T())。部分代碼如下： style=()。 HRESULT hTRes。//記錄集指針向后移動(dòng) } } } m_pStoreHouseRecordsetClose()。//產(chǎn)品編號(hào) (i,1,((CStoreApp*)AfxGetApp())GetStringFromVariant(m_pListRecordsetGetCollect(productName)))。 //此處省略部分代碼 bt_modify=GetDlgItem(IDC_modify)。作用是當(dāng)列表框中的一個(gè)條目被選中時(shí)，將該條目對(duì)應(yīng)的信息顯示到相應(yīng)的編輯框控件中，使按鈕“增加”、“修改”、“刪除”變?yōu)榭捎茫按姹P(pán)”按鈕不可用；當(dāng)沒(méi)有條目被選中時(shí)，“修改”、“刪除”、“保存”按鈕不可用，只有“增加”按鈕可用，同時(shí)將編輯框控件內(nèi)容清空并使其不可用。//產(chǎn)品編號(hào) //省略部分代碼 } bt_modifyEnableWindow(true)。//對(duì)話框數(shù)據(jù)更新到變量 //獲取新增加的產(chǎn)品的編號(hào) int productID=((CStoreApp*)AfxGetApp())m_pIDRecordsetGetCollect(productID).intVal。 CString str。 //此處省略部分代碼 tx_numMinEnableWindow(true)。代碼如下：void CProductInfo::OnModify() { //設(shè)定除產(chǎn)品編號(hào)以外的其他編輯控件均可用 tx_productIDEnableWindow(false)。//將控件中的值更新到變量 _RecordsetPtr m_pRecordset。 m_pRecordsetAddNew()。 //提示信息 } } } catch(__error e)///捕捉異常 { CString errormessage。//打開(kāi)查詢結(jié)果記錄集 if(SUCCEEDED(hTRes)) { TRACE(_T(連接成功!\n))。//添加按鈕可用 bt_deleteEnableWindow(true)。 if(()!=IDOK)//顯示確認(rèn)刪除對(duì)話框 { return。//獲取刪除的記錄的位置 if(pos){ int nFirstSelItem = (pos)。 產(chǎn)品入庫(kù)單選擇產(chǎn)品界面為模塊“信息錄入”創(chuàng)建菜單資源ID標(biāo)題ID_input_productInputForm產(chǎn)品入庫(kù)單ID_input_productOutputForm產(chǎn)品出庫(kù)單ID_inputProductMoveForm產(chǎn)品調(diào)撥單ID_input_productLoseForm產(chǎn)品報(bào)損單產(chǎn)品入庫(kù)單對(duì)話框：（1）產(chǎn)品入庫(kù)單對(duì)話框的OnInitDialog函數(shù)：重載對(duì)話框的OnInitDialog函數(shù)，在該函數(shù)中主要完成如下幾項(xiàng)工作：設(shè)定列表框控件屬性為可整行選擇，畫(huà)網(wǎng)格線，添加列并設(shè)定列標(biāo)題。//添加并設(shè)定列標(biāo)題//此處省略部分代碼 (6,金額,LVCFMT_LEFT,100)。strSQL=select distinct staffName from staff。代碼如下：if(is_search==1) //被查詢對(duì)話框調(diào)用 { bt_addEnableWindow(true)。代碼如下：int formID=((CStoreApp*)AfxGetApp())m_pIDRecordsetGetCollect(productInputFormID).intVal。 CString str。 is_search=0。 }（4）為刪除按鈕提供實(shí)現(xiàn)函數(shù)：“刪除”按鈕用于刪除當(dāng)前的產(chǎn)品入庫(kù)單，刪除信息之前系統(tǒng)會(huì)提示用戶是否要?jiǎng)h除，如果選擇“是”則刪除該條記錄；否則，不進(jìn)行任何操作，直接返回。 (i,)。//確定刪除條目的位置 if(pos) { int nFirstSelItem = (pos)。 //將對(duì)話框數(shù)據(jù)更新到變量 CString strSQL。//添加一條記錄 m_pProductInputFormRecordsetPutCollect(productInputFormID,_variant_t((25)))。i++) {m_pRecordsetAddNew()。RecordsAffected,adCmdText)。實(shí)現(xiàn)方式和產(chǎn)品入庫(kù)單對(duì)話框的的OnInitDialog函數(shù)類似，這里就不在贅述。//產(chǎn)品名稱 m_unit=(nFirstSelItem,7)。這里需要注意的是各個(gè)條件間連接詞的使用一定要符合SQL語(yǔ)句的語(yǔ)法，即第一個(gè)條件前用Where，從第二個(gè)條件開(kāi)始每個(gè)條件前用and進(jìn)行連接。 } //此處省略部分代碼_RecordsetPtr m_pRecordset。}（2）為單據(jù)列表控件的“NM_CLICK”消息實(shí)現(xiàn)函數(shù)產(chǎn)品入庫(kù)單查詢需要查詢“產(chǎn)品入庫(kù)單”和“入庫(kù)產(chǎn)品信息表”兩個(gè)表。 _RecordsetPtr m_pRecordset。//記錄集指針向后移動(dòng) i++。+((CStoreApp*)AfxGetApp())ToStringCTime(m_formDateBegin)+39。 } if(m_houseInType!=)//入庫(kù)類別 {strSQL=strSQL+ and houseInType=39。//數(shù)量 (i,2,((CStoreApp*)AfxGetApp())GetStringFromVariant(m_pRecordsetGetCollect(total)))。通過(guò)這次的設(shè)計(jì)，我不僅拓寬了自己的知識(shí)面，增長(zhǎng)了自己的見(jiàn)識(shí)，還在實(shí)踐過(guò)程中鞏固和加深了自己所學(xué)的理論知識(shí)，使自己的技術(shù)素質(zhì)和實(shí)踐能力有了進(jìn)一步的提高，同時(shí)我的專業(yè)水平也有了很大的進(jìn)步。、明確。2．實(shí)現(xiàn)物資的出庫(kù)、入庫(kù)登記。在這次的設(shè)計(jì)中我學(xué)習(xí)到不少的數(shù)據(jù)庫(kù)知識(shí)，但由于自己的理論知識(shí)水平有限，實(shí)踐知識(shí)和設(shè)計(jì)經(jīng)驗(yàn)不足，在設(shè)計(jì)過(guò)程中難免存在一些問(wèn)題，甚至錯(cuò)誤，還需要進(jìn)一步的進(jìn)行學(xué)習(xí)。該系統(tǒng)可以實(shí)現(xiàn)對(duì)不同用戶的使用權(quán)限進(jìn)行管理。把學(xué)過(guò)的