【正文】 xMessageBox(())。 RefreshData()。在這個(gè)項(xiàng)目中，所有的表格都用此方法作了綁定，使得添加和修改記錄靈活、易用，且具有較高的性能。 CHAR m_sz_tel[11]。 ULONG m_sts_code。 ULONG m_sts_number。 fields, COleSafeArrayamp。這個(gè)方法使用兩個(gè)VARIANT數(shù)組作為參數(shù)，前一個(gè)存放字段名，后一個(gè)存放字段值。組合框控件用于使用戶輸入合法的設(shè)備代碼，對(duì)這個(gè)控件的初始化參見(jiàn)上一節(jié)的顯影內(nèi)容。 return。 try { TESTHR((__uuidof(Recordset)))。 strcpy(, m_provider)。 strcpy(, m_buyer)。 TESTHR(pRstAddNew(vaFieldlist, vaValuelist))。%s39。 if (pRstGetRecordCount()==0) { CDevRs rsDev。 = 1。 TESTHR(pRstAddNew(vaFields, vaValues))。picRs))。 = + 。 picRsRelease()。 e) { AfxMessageBox(())。 m_logAddLog(添加入庫(kù)信息)。如果第一個(gè)操作順利完成而第二個(gè)操作不幸失敗的話，數(shù)據(jù)庫(kù)的完整性將受到破壞。AfxMessageBox(())。在這里，用戶可以從組合框中選擇一種設(shè)備。它是響應(yīng)了組合框控件的CBN_CLOSEUP事件。 _RecordsetPtr pRst = NULL。 _bstr_t strSQL。,buf)。 TESTHR(pRstQueryInterface(__uuidof(IADORecordBinding),(LPVOID*)amp。 (%s,)。 e) { AfxMessageBox(())。,buf)。 if (pRstGetRecordCount()!=1) { m_max = 0。picRs))。 m_cur = 。 } catch(__erroramp。1庫(kù)存報(bào)警窗口的設(shè)計(jì)倉(cāng)庫(kù)中的每一個(gè)設(shè)備都有最大庫(kù)存量的最小庫(kù)存量的限制（這部分?jǐn)?shù)據(jù)在device表中保存）。圖24 庫(kù)存報(bào)警界面其中的“搜索更多庫(kù)存”按鈕搜索庫(kù)中當(dāng)前量多于最高限量的設(shè)備，“搜索過(guò)少庫(kù)存”則反之。 //Interface Pointer declared.(VC++ Extensions) CDevRs rs。 TESTHR(pRstQueryInterface(__uuidof(IADORecordBinding),(LPVOID*)amp。 int i = 0。 (i, 1, buf)。 (i, 3, buf)。 } picRsRelease()。 return。 } catch(__erroramp。 (i, 4, buf)。 (i, 2, buf)。 while (!pRstadoEOF) { (0, )。 TESTHR(picRsBindToRecordset(amp。 TESTHR((__uuidof(Recordset)))。檢索這些記錄的代碼如下：// //檢索過(guò)多、過(guò)少庫(kù)存void CDlgDevAlert::SearchOver(){ _RecordsetPtr pRst = NULL。用戶單擊主對(duì)話框中“庫(kù)存報(bào)警”按鈕可以進(jìn)入此模塊。 } UpdateData(FALSE)。 picRsRelease()。rs2))。 m_total = 0。 TESTHR((__uuidof(Recordset)))。 (SELECT * FROM DEVICE WHERE code=39。 pRstClose()。 TESTHR(picRsBindToRecordset(amp。 TESTHR((__uuidof(Recordset)))。 (SELECT * FROM DEVICE_CODE WHERE code=39。 //Interface Pointer declared.(VC++ Extensions) CDevCodeRs rs1。 (buf,64)。此界面如圖23所示。設(shè)備采購(gòu)報(bào)表的管理設(shè)備采購(gòu)報(bào)表的管理包括兩個(gè)界面，一個(gè)是生成報(bào)表界面，另一個(gè)是對(duì)已有報(bào)表的管理界面。在第二個(gè)操作成功之后調(diào)用了Connection對(duì)象的CommitTrans方法提交此事物：m_DBCntCommintTrans()。}這里用到了ADO中事物處理的概念。 return。 m_DBCntCommitTrans()。 TESTHR(picRsUpdate(amp。rsDev))。 IADORecordBinding *picRs = NULL。 COleSafeArray vaFields, vaValues。 = 。 _bstr_t sql = sql_。 CString sql_。 (vaFieldlist,vaValuelist)。 = m_number。 (,11)。 _RecordsetPtr pRst = NULL。具體來(lái)說(shuō)，在庫(kù)存表中已有這個(gè)設(shè)備的記錄時(shí)，要增加device表中電腦跟前庫(kù)存（now_number）這個(gè)字段的值，若此時(shí)庫(kù)存表中還沒(méi)有這個(gè)設(shè)備的記錄，則向其中要增加一條新記錄，新紀(jì)錄的“當(dāng)前庫(kù)存”（now_number）和“總數(shù)”（total_number）字段都設(shè)為當(dāng)前的入庫(kù)數(shù)量，“最大庫(kù)存”（max_number）和“最小庫(kù)存”（min_number）兩個(gè)字段都設(shè)為缺省值1。雖然Data Bing操控?cái)?shù)據(jù)的方式比這種通過(guò)VARIANT的操控方式更值得推薦，但后者是有其存在的價(jià)值的。}。 ULONG m_sts_buyer。 ULONG m_sts_provider。 float m_f_price。 CHAR m_sz_date[20]。注意其中SQL語(yǔ)句的WHERE子句：Sql_Format(CString(“DELETE FROM DEVICE_IN WHERE in_date=”)+DATEFMT，m_date)對(duì)修改操作，則使用了ADO里的Data Binding技術(shù)。 } MessageBox(完成操作！)。 try { m_DBCntExecute(sql, NULL, adCmdText)。}void CDlgViewDevIn::OnBtnVidel() { if (!UpdateData()) return。 return。 picRsRelease()。 = m_price。 strcpy(,m_date)。picRs))。 //Interface Pointer declared.(VC++ Extensions) CDevInRs rs。 (CString(SELECT * FROM DEVICE_IN WHERE in_date=)+DATEFMT, m_date)。所以在創(chuàng)建入庫(kù)模塊之前，先要?jiǎng)?chuàng)建它的管理模塊。設(shè)備入庫(kù)信息管理設(shè)備入庫(kù)信息管理模塊恰好與設(shè)備入庫(kù)模塊相匹配。 } RefreshData()。 } catch(__erroramp。 while (!pRstadoEOF) { ()。picRs))。 try { _bstr_t strSQL(SELECT * FROM DEVICE_CODE)。 (LVS_EX_FULLROWSELECT)。 (1,wid/5)。 (amp。 (2,最大數(shù)量)。修改記錄時(shí)，用戶單擊列表中某一行，程序利用上一節(jié)的方法，在窗口下面把這一記錄的詳細(xì)信息顯示出來(lái)，用戶即可對(duì)之修改。用戶可以在此新增、修改、刪除某種設(shè)備的記錄。但注意所轉(zhuǎn)換的類型一定要和VT變量指明的類型一致，否則是沒(méi)有意義的。 //VT_BYREF|VT_UI4 Int FAR * pintVal。Union{ Byte bVal。它的定義如下：Typedef struct VARIANT{ VARTYPE vt。)。 } catch(__erroramp。%s39。 CString sql_。 } m_logAddLog(刪除設(shè)備記錄。 try { m_DBCntExecute(sql,NULL,adCmdText)。 (DELETE FROM DEVICE_CODE WHERE CODE=39。)。 } catch(__erroramp。%s39。 CString sql_。 m_name = (i,1)。 RefreshData()。 int wid = 。 (1,設(shè)備名)。 return。 MySetMoveNext()。 while(!MySetadoEOF) { Holder = MySetGetCollect(code)。 int i = 0。 //}}AFX_DATA_MAP}BEGIN_MESSAGE_MAP(CDlgDevcode, CDialog) //{{AFX_MSG_MAP(CDlgDevcode) ON_NOTIFY(NM_CLICK, IDC_LIST_DEVCODE, OnClickListDevcode) ON_BN_CLICKED(IDC_BTN_DCADD, OnBtnDcadd) ON_BN_CLICKED(IDC_BTN_DCDEL, OnBtnDcdel) ON_BN_CLICKED(IDC_BTN_DCUPD, OnBtnDcupd) //}}AFX_MSG_MAPEND_MESSAGE_MAP()/////////////////////////////////////////////////////////////////////////////// CDlgDevcode message handlersvoid CDlgDevcode::RefreshData(){ ()。}void CDlgDevcode::DoDataExchange(CDataExchange* pDX){ CDialog::DoDataExchange(pDX)。endif/////////////////////////////////////////////////////////////////////////////// CDlgDevcode dialogCDlgDevcode::CDlgDevcode(CWnd* pParent /*=NULL*/) : CDialog(CDlgDevcode::IDD, pParent){ //{{AFX_DATA_INIT(CDlgDevcode) m_code = _T()。 m_name = (i,1)。 return TRUE。 (0,wid/2)。 RECT rect。在CDlgDevcode：：OnInitDialog()中對(duì)這個(gè)控件（m_list）進(jìn)行初始化（分割列、設(shè)置列寬、設(shè)置風(fēng)格等）。設(shè)備代碼管理窗口的建立設(shè)備代碼表格（device_code）經(jīng)常被其他表格引用，如獲取合法編碼、由設(shè)備編碼號(hào)查找設(shè)備名稱等。 thisShowWindow(SW_HIDE)。 圖18 主對(duì)話框界面 以其中“設(shè)備代碼”按鈕為例，說(shuō)明他的事件處理函數(shù)。 m_DBCntClose()。 e) { AfxMessageBox(())。 m_DBCntOpen(sql,1)。 (DSN=DMS。圖17 登錄界面在得到有效的用戶名（字符串長(zhǎng)度非0）后，程序用如下的代碼嘗試連接數(shù)據(jù)庫(kù)，初始化成員變量（Connection指針和ClogMngr的實(shí)例）。 圖16 查看日志窗口登錄窗口的設(shè)計(jì)在CDMSDlg：：OnInitDialog（）中加入如下一段代碼：////彈出登錄界面CDlgLogIn dlg。 EndDialog(0)。////刪除所有日志記錄的函數(shù)void CDlgViewLog::OnBtnVlrmall() { _bstr_t strSQL(TRUNCATE TABLE HOWDO)。這個(gè)窗體用以顯示系統(tǒng)所用的日志記錄。}可以看到，它利用了Connection對(duì)象的Execute方法，直接執(zhí)行SQL語(yǔ)句，向ＨＯＷＤＯ表中加入了一條包含了操作者、操作時(shí)間和操作內(nèi)容3個(gè)字段的記錄。 e) { CString Error = ()。), m_user, op, (), (), (), (), (), ())。,39。////向數(shù)據(jù)庫(kù)中添加Log記錄的代碼b