【正文】 () { // TODO: add member initialization code here } CMainFrame::~CMainFrame() { } int CMainFrame::OnCreate(LPCREATESTRUCT lpCreateStruct) { if (CFrameWnd::OnCreate(lpCreateStruct) == 1) return 1。 return 0。 } 物資基本信息模塊的創(chuàng)建 物資基本信息管理模塊主要實現(xiàn)如下功能： ? 添加物資基本信息。 添加物資基本信息對話框的創(chuàng)建 選擇 “ 物資基本信息管理 /添加物資基本信息 ” 菜單，將會出現(xiàn)圖 6 所示的對話框 圖 6 添加物資基本 信息對話框 在這個對話框上面放置多個文本框，用來輸入物資基本信息：放置兩個按鈕，用來確定是否添加物資基本信息 。為了 響應(yīng) addbasicinfo 類 對話框 的初始化 事件，為oninitdialog()函數(shù)，添加如下代碼： BOOL AddBasicInfo::OnInitDialog() { CDialog::OnInitDialog()。 ((CEdit*)GetDlgItem(IDC_BASICINFO_WZKIND))SetLimitText(50)。 } return TRUE。 ( )。 if ( ==m_wzID ) sWarning=_T(物資編號 )。 else if ( ==m_wzUnit ) sWarning=_T(計量單位 )。 } _variant_t strQuery。 int iCount = GetRecordCount()。+m_wzID+39。+m_wzSpec+39。+m_wzUnit+39。 UpdateData(false)。, wzspec=39。+m_wzID+39。 pRefreshMaterial()。所以程序中使用判斷是否有重復(fù)的 ID 來判斷是否已經(jīng)存在相同的物資。 載入 這個窗體的時候 ， 就會調(diào)用 OnMenuAlterbasicinfo()函數(shù) ， 添加方法和上面的 OnOK（） 的添加方法一樣 ， 只是 Class Name 要選擇 Material_MISView,下面其他 On 開始的函數(shù)都是這樣添加的 ， 其他的函數(shù)使用鼠標右鍵單擊類名添加。 CreateMaterialInfo()。 } POSITION pos = ()。 CString str。 =(iItem,2)。 } } 選擇要修改的記錄，然后單擊鼠標右鍵，就會觸發(fā)OnContextMenu(CWnd*pWnd,CPoint point)函數(shù)，函數(shù)的代碼如下： void CMaterial_MISView::OnContextMenu(CWnd* pWnd, CPoint point) { // TODO: Add your message handler code here if ( ==m_sCurrentList ) return。 else if ( _T( 物 資 出 庫 列 表 )==m_sCurrentList ) (IDR_MENU_OUT)。 } 出現(xiàn)彈出式菜單，如圖 8 所示。 CreateMaterialInfo()。 } POSITION pos = ()。 CString str。 //獲得規(guī)格 = (iItem, 2)。 } } 刪除物資基本信息 選擇“物資基本信息管理 /刪除物資基本信息”菜單，將會出現(xiàn)記錄列表。 m_sCurrentList!=物資列表 ) { ()。 return。 Cstring sID。 strquery= “delete from material where wzid= ““+sid+””。在這里可以按照各種方式以及它們的組合進行查詢。amp。 ( )。 if ( m_bSpecChecked ) { if ( ==m_sSpec ) { AfxMessageBox(_T( 物資型號不能為空！ ), MB_ICONEXCLAMATION)。 strQuery = select * from material where wzname like 39。 CMaterial_MISView* p = (CMaterial_MISView*)(((CMainFrame*)AfxGetMainWnd())GetActiveView())。代碼如下： void CMaterial_MISView::CreateMaterialInfo() { m_sCurrentList = _T(物資列表 )。 += 30。 (RGB(177, 151, 240))。 (RGB(177, 151, 240))。 CRect rect。 CDialog::OnOK()。 and wzspec like 39。 } } else m_sSpec=%。 return。 return。單擊“確定”按鈕，調(diào)用 OnOK（）函數(shù)，具體代碼如下： void CCheckBasicInfoDLG::OnOK() { // TODO: Add extra validation here UpdateData(true)。 } }//刷新列表 RefreshMaterial()。 while(pos) { iItem=(pos)。 if (pos == NULL) AfxMessageBox(_T( 沒 有 選 中 記 錄 ！ ), MB_ICONEXCLAMATION)。 return。具體代碼如下： void CMaterial_MISView::OnMenuDelbasicinfo() { // TODO: Add your mand handler code here if ( m_ListCtrl amp。 //獲得單位 = (iItem, 4)。 //獲得 ID = (iItem, 0)。 else { AddBasicInfo dlg。 } if ( !m_ListCtrl ) { CreateMaterialInfo()。amp。 pMenuTrackPopupMenu(TPM_LEFTALIGN|TPM_LEFTBUTTON|TPM_RIGHTBUTTON,this)。 if ( _T( 物 資 列 表 )==m_sCurrentList ) (IDR_MENU_BASICINFO)。 =(iItem,4)。 =(iItem,0)。 else { AddBasicInfo dlg。 } if ( !m_ListCtrl ) { CreateMaterialInfo()。amp。最后根據(jù)選擇的操作來顯示相應(yīng)的信息，如果是添加，則顯示添加成功，并 清空所有文本框；如果是修改，則提示修改成功，然后更新所有記錄的列表。 } 這個函數(shù)首先判斷是否輸入了內(nèi)容，然后才進行下一下。 else AfxMessageBox(_T(修改記錄失?。?), MB_ICONEXCLAMATION)。, wzunit=39。 } else//修改記錄 { strQuery = Update material set wzname=39。 if ( (, strQuery) ) { AfxMessageBox(_T(添加記錄成功！ ), MB_ICONINFORMATION)。+m_wzKind+39。+m_wzName+39。 return。+m_wzID+39。 AfxMessageBox(sWarning, MB_ICONEXCLAMATION)。 else if ( ==m_wzKind ) sWarning=_T(類別 )。 ( )。 ( )。 if (m_bAppend) { //更新對話框?qū)傩? SetWindowText(_T(添加物資基本信息 ))。 ((CEdit*)GetDlgItem(IDC_BASICINFO_WZNAME))SetLimitText(50)。這些控件的屬性見 表 7 添加物資基本信息對話框中各個控件的屬性設(shè)置 控件 屬性 ID Label1 物資編號 IDC_STATIC Label2 物資名稱 IDC_STATIC Label3 規(guī)格型號 IDC_STATIC Label4 類 別 IDC_STATIC Label5 計量單位 IDC_STATIC Edit Box1 IDC_BASICINFO_WZID Edit Box2 IDC_BASICINFO_WZNAME Edit Box3 IDC_BASICINFO_WZSPEC Edit Box4 IDC_BASICINFO_WZKIND Edit Box5 IDC_BASICINFO_WZUNIT Button1 IDOK Button2 IDCANCEL 選擇 “view/classwizard 菜單，然后選擇 “message maps” 標簽頁，在 “class name” 下拉列表中選 “addbasicinfo” 選項，在左邊的 “object ids” 中選擇idok,然后雙擊右邊 “messages” 中的 bn_clicked 添加 onok()函數(shù)，在左邊選擇 addbasicinfo,然后在右邊雙擊選擇 wm_initdialog,添加 oninitdialog()函數(shù)，選擇 “me mber variables” 標簽頁，在 “class name” 下拉列表中仍然選擇 “addbasicinfo”, 雙擊 “control ids” 中每一個 id,添加變量，除了使用這種方法添加變量和函數(shù)以外，用鼠標右鍵單擊 addbasicinfo 為，選擇彈出菜單中的 “add member variable” 命令，然后在彈出對話框中添加變量。 ? 刪除物資基本信息。 cs) { if( !CFrameWnd::PreCreateWindow(cs) ) return FALSE。 return 1。m_fMyFont, true)。 ((CEdit*)GetDlgItem(IDC_LOGIN_PWD))SetLimitText(10)。 } // Get Login User = m_sUSER。 CDialog::OnCancel()。 Holder = GetCollect(user_PWD)。 } AfxMessageBox( 沒 有 這 個 用 戶 ， 請 重 新 輸 入 用 戶 名 , MB_ICONEXCLAMATION)。 if ( 0==iCount ) { ++。 strQuery = select user_ID, user_PWD from user_Info where user_ID=39。 ( )。 //}}AFX_DATA_INIT } void CLoginDLG::DoDataExchange(CDataExchange* pDX) { CDialog::DoDataExchange(pDX)。 為了保證數(shù)據(jù)庫的安全，有時候需要經(jīng)常修改用戶的口令。放置了 2 個編輯框（ Edit），一個供用戶輸入登錄的用戶名（ m_username），另一個供用戶輸入口令（ m_passward），這個編輯框的屬性要設(shè)成 password。 ()。 } } 最后添加關(guān)閉數(shù)據(jù)庫連接的函數(shù)。e) { CString err。strSQL) { if ( ADOSetState == adStateOpen) ADOSetClose()。 在函數(shù)中 bool ADOExecute(_RecordsetPtr amp。 (%s, (char*)(()) )。 ADOConnOpen(_bstr_t(Provider=。 import C:\Program files\mon files\System\ado\ no_namesp