【正文】 fundsFloat8總資產(chǎn)否ClientcharacterChar20客戶性質(zhì)否字段名稱數(shù)據(jù)類型數(shù)據(jù)長度說明主鍵StorehouseIDChar20倉庫編號是storehouseNameChar30倉庫名稱否storehousePostionChar30倉庫地址否priceMethodChar20倉庫計價法否字段名稱數(shù)據(jù)類型數(shù)據(jù)長度說明主鍵ProductInputFormIDChar10產(chǎn)品入庫單號是ProduceDateDatetime8生產(chǎn)日期否storeHouseChar20倉庫名稱否produceDepartmentChar20生產(chǎn)部門否DealerChar20經(jīng)辦人否houseInTypeChar20入庫類別否RemarkChar100備注否FormdateDatetime8制單日期否字段名稱數(shù)據(jù)類型數(shù)據(jù)長度說明主鍵productInputFormIDChar10入庫單號是productIDChar10產(chǎn)品編號是NumInt4數(shù)量否PriceFloat8單價否字段名稱數(shù)據(jù)類型數(shù)據(jù)長度說明主鍵ProductOutputFormIDChar10產(chǎn)品出庫單號是ConsignmentFormIDChar10發(fā)貨單號否storeHouseChar20倉庫名稱否sellDepartmentChar20銷售部門否SellerChar20銷售人員否clientNameChar20客戶名稱否HouseOutTypeChar20出庫類別否RemarkChar20備注否FormdateDatetime8制單日期否DealerChar20經(jīng)辦人否字段名稱數(shù)據(jù)類型數(shù)據(jù)長度說明主鍵ProductOutputFormIDChar10出庫單號是ProductIDChar10產(chǎn)品編號是NumInt4數(shù)量否PriceFloat8單價否字段名稱數(shù)據(jù)類型數(shù)據(jù)長度說明主鍵productMoveFormIDChar10產(chǎn)品調(diào)撥單號是storeHouseInChar20入庫倉庫否storeHouseOutChar20出庫倉庫否DealerChar20經(jīng)辦人否houseOutTypeChar20出庫類別否RemarkChar100備注否FormdateDatetime8制單日期否字段名稱數(shù)據(jù)類型數(shù)據(jù)長度說明主鍵ProductMoveFormIDChar10產(chǎn)品調(diào)撥單號是ProductIDChar10產(chǎn)品編號是NumInt4數(shù)量否PriceFloat8單價否字段名稱數(shù)據(jù)類型數(shù)據(jù)長度說明主鍵ProductLoseFormIDChar10產(chǎn)品報損單號是storeHousechar20報損倉庫否DealerChar20經(jīng)辦人否houseOutTypeChar20出庫類別否RemarkChar100備注否FormdateDatetime8制單日期否字段名稱數(shù)據(jù)類型數(shù)據(jù)長度說明主鍵ProductLoseFormIDChar10報損單號是ProductIDChar10產(chǎn)品編號是NumInt4數(shù)量否PriceFloat8單價否我在應(yīng)用程序類StoreApp的InitInstance方法中進行初始化。 // 記錄集指針的個數(shù)可根據(jù)實際的需要來確定聲明幾個_ConnectionPtr m_pConn；在StoreApp的構(gòu)造函數(shù)中定義數(shù)據(jù)庫的連接字符串：TreeConnString=_T(Data Source=SaleData。PWD=。try{hRes=(_T())。 //超時八秒 hRes=m_pConnOpen(_bstr_t((LPCTSTR) TreeConnString),_T(),_T(),adModeUnknown)。 (_T(連接SaleData數(shù)據(jù)庫失敗!\r\n錯誤信息:%s),())。 //顯示錯誤信息 return FALSE。//創(chuàng)建Recordset對象 if (SUCCEEDED(hRes)) { hRes = m_pIDRecordsetOpen((LPTSTR)(130), (), adOpenDynamic,adLockPessimistic,adCmdText)。 }在要用記錄集指針的時候可以用CreateInstance方法創(chuàng)建ADO連接對象。然后單擊“OK”按鈕即可完成CProductInfo類的創(chuàng)建。步驟如下：調(diào)用列表框控件的InsertColumm()方法插入列，并設(shè)定列標題；分別查詢storeHouse、product表，并構(gòu)造相應(yīng)的查詢結(jié)果記錄集；打開storeHouse的查詢結(jié)果記錄集，將記錄集中的數(shù)據(jù)插入到相應(yīng)的組合框中；打開product的查詢結(jié)果記錄集，調(diào)用列表框控件的InsertItem()和SetItemText()方法將記錄集中的數(shù)據(jù)插入到列表框控件中；調(diào)用控件的GetDlgItem()方法，為控件可用性控制變量賦值；調(diào)用控件的EnableWindow()方法，設(shè)定控件的可用性。 style=(style|LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT)amp。//設(shè)定列表框風格 網(wǎng)格\行選擇 取消復選框 (style)。//左對齊 寬度100 (1,商品名稱,LVCFMT_LEFT,100)。 //用于創(chuàng)建一個查詢記錄集 CString strSQL。 strSQL=select * from storeHouse。 hTRes = (_T())。//打開查詢結(jié)果記錄集 if(SUCCEEDED(hTRes)) { TRACE(_T(連接成功!\n))。//插入組合框 m_pStoreHouseRecordsetMoveNext()。 //關(guān)閉記錄集 //將目前數(shù)據(jù)庫中已經(jīng)存在的產(chǎn)品信息添加到產(chǎn)品列表框中 strSQL=SELECT * FROM product。 hTRes = (_T())。//打開查詢結(jié)果記錄集 if(SUCCEEDED(hTRes)) {TRACE(_T(連接成功!\n))。 while(!(m_pListRecordsetadoEOF)) {(i,((CStoreApp*)AfxGetApp())GetStringFromVariant(m_pListRecordsetGetCollect(productID)))。 //產(chǎn)品名稱 //此處省略部分代碼if (!(m_pListRecordsetadoEOF)){ m_pListRecordsetMoveNext()。 } } } } } } catch(__error e)///捕捉異常 {CString errormessage。 }flag=0。 tx_productName=GetDlgItem(IDC_productName)。//設(shè)定按鈕的可用性 bt_saveEnableWindow(false)。//修改按鈕可用 bt_deleteEnableWindow(false)。 //此處省略部分代碼UpdateData(false)。 （2）實現(xiàn)列表框控件的NM_CLICK消息函數(shù)當列表框中的條目被單擊（如列表框的條目被選中）時該函數(shù)自動被調(diào)用。步驟如下：調(diào)用m_list的GetFirstSelectedItemPosition()方法，獲得單擊的位置。調(diào)用m_list的GetItemText()方法，獲得條目中對應(yīng)列的字符串，并將其轉(zhuǎn)換成預定的類型。//將對話框中數(shù)據(jù)更新到變量 POSITION pos = ()。//獲取單擊的條目 m_productID=(nFirstSelItem,0)。 //修改按鈕可用 bt_deleteEnableWindow(true)。 //將數(shù)據(jù)更新到對話框 *pResult = 0。通過查詢數(shù)據(jù)庫，查詢可用的產(chǎn)品入庫單號，并更新下一個可用的產(chǎn)品入庫單號。代碼如下：void CProductInfo::OnAdd() { UpdateData(true)。 if(productID10) //為產(chǎn)品編號設(shè)定格式 (product0000%d,productID)。amp。 else if(productID1000amp。productID99) (product00%d,productID)。 (%d,productID+1)。 ((CStoreApp*)AfxGetApp())m_pIDRecordsetUpdate()。 m_standard = _T()。 //添加 //設(shè)定除產(chǎn)品編號以外的其他編輯控件均可用 tx_productIDEnableWindow(false)。 //設(shè)定按鈕的可用性 bt_saveEnableWindow(true)。 //添加按鈕不可用 bt_modifyEnableWindow(false)。 //刪除按鈕不可用 UpdateData(false)。當所有的內(nèi)容修改完畢后，單擊“存盤”按鈕才能實現(xiàn)實際的保存工作。 tx_productNameEnableWindow(true)。 flag=2。//保存按鈕可用 }（5）為存盤按鈕提供實現(xiàn)函數(shù)“存盤”按鈕用于將新添加的條目或修改后的條目存儲到數(shù)據(jù)庫中，并將列表框控件中的內(nèi)容刷新，同時使新增加的條目或修改的條目在列表框控件中可見并處于選中狀態(tài)。代碼如下：void CProductInfo::OnSave() { UpdateData(true)。 CString strSQL。//構(gòu)造sql語句 try { HRESULT hTRes。 if (SUCCEEDED(hTRes)) { hTRes = m_pRecordsetOpen((LPTSTR)(130),((CStoreApp*)AfxGetApp())(), adOpenDynamic,adLockPessimistic,adCmdText)。 CString str。//添加新的記錄m_pRecordsetPutCollect(productID,_variant_t(m_productID))。 //更新數(shù)據(jù)庫 int j。 //獲取要插入的條目的位置 (j,m_productID)。 //產(chǎn)品名稱 //此處省略部分代碼 AfxMessageBox(插入成功！)。 MessageBox(創(chuàng)建記錄集失敗!,錯誤)。 。//構(gòu)造查詢指定產(chǎn)品編號的產(chǎn)品的信息的sql語句 try {HRESULT hTRes。 if (SUCCEEDED(hTRes)) {hTRes = m_pRecordsetOpen((LPTSTR)(130), ((CStoreApp*)AfxGetApp())(), adOpenDynamic,adLockPessimistic,adCmdText)。 CString str。//產(chǎn)品名稱//此處省略部分代碼 AfxMessageBox(修改成功！)。 MessageBox(創(chuàng)建記錄集失敗!,錯誤)。 //設(shè)定按鈕的可用性 bt_addEnableWindow(true)。//刪除按鈕可用 bt_modifyEnableWindow(true)。//保存按鈕不可用 //所有的編輯控件均不可用 tx_productIDEnableWindow(false)。//將數(shù)據(jù)更新到對話框 }（6）為“刪除”按鈕提供實現(xiàn)函數(shù)刪除選定的記錄或者是當前記錄，先生成刪除指定產(chǎn)品編號的產(chǎn)品信息的SQL語句，調(diào)用數(shù)據(jù)庫連接對象Execute方法執(zhí)行該SQL語句將滿足條件的記錄從數(shù)據(jù)庫中刪除。代碼如下：void CProductInfo::OnDelete() { CAffirm dlg。 } _variant_t RecordsAffected。 //構(gòu)造刪除記錄的sql語句