【正文】 自己教授班級的成績。 3 游 客查 看 學(xué) 校 成績 統(tǒng) 計 公 示教 師 學(xué) 生查 看 班 級 成績校 驗 密 碼修 改 成 績上 傳 成 績校 驗 日 期《包含》《 包 含 》《包含》《 包 含 》查 看 班 級《包含》 圖 2_2 系統(tǒng)用況圖 二，系統(tǒng)模塊及界面設(shè)計 本系統(tǒng)分 3個界面， 分別與圖 2_2的三個角色相對應(yīng)。 圖 2_3 游客頁 圖 2_4學(xué)生頁 圖 2_5 教師頁 系統(tǒng)模塊在上述三界面為基礎(chǔ)的角色上曾加一個數(shù)據(jù)庫常用操作模塊。 其中各模塊對 4 應(yīng)的源文件見附錄 2 系統(tǒng)源代碼 。 try { //創(chuàng)建 connection對象 ()。 (Provider=。\ Persist Security Info=False。\ Data Source=%s,DATABASENAME,SERVERNAME)。 //SERVER和 UID,PWD的設(shè)置根據(jù)實際情況來設(shè)置 m_pConnectionOpen(strConnect,adModeUnknown)。 AfxMessageBox(連接數(shù)據(jù)庫失敗 )。 ADOConn::GetRecordSet(_bstr_t bstrSQL) * 功能： 獲取數(shù)據(jù)庫查詢記錄集 * 參數(shù)： _bstr_t bstrsql(數(shù)據(jù)庫語句 ) * 全局變量： m_pConnection(數(shù)據(jù)庫連接指針 ) m_pRecordset(數(shù)據(jù)庫記錄集指針 ) * 返回值： m_pRecordset 引用 ***********************************************************************************/ _RecordsetPtramp。 //創(chuàng)建記錄集對象 (__uuidof(Recordset))。 } catch(__error e) { AfxMessageBox(獲取記錄集失敗 !!!!)。 } /************************************************************************************** * 函數(shù)名： BOOL ADOConn::ExecuteSQL(_bstr_t bstrSQL) * 功能： 執(zhí)行 sql語句 * 參數(shù)： _bstr_t bstrSql 待執(zhí)行的 sql語句 * 全局變量引用： m_pConnection 數(shù)據(jù)庫連接指針 * 返回值：成執(zhí)行返回 true 失敗返回 false * 備注： connection對象的 Execute方法 (_bstr_t CommandText,VARIANT * RecordsAffected, long Options)其中 CommandText是命令字符串 ,通常是 SQL命令參數(shù) RecordsAffected是操作完 成后所影響的行數(shù)參數(shù) Options表示 CommandText的類型 ,adCmdText文本命令 ,adCmdTable表 名 adCmdProc存儲過程 ,adCmdUnknown未知 ***************************************************************************************/ BOOL ADOConn::ExecuteSQL(_bstr_t bstrSQL) { _variant_t RecordsAffected。 m_pConnectionExecute(bstrSQL,NULL,adCmdText)。 } catch(__error e) { ()。 } } /*********************************************************************************** * 函數(shù)名： void ADOConn::ExitConnect() * 功能： 斷開數(shù)據(jù)庫連接 ,關(guān)閉記錄集 * 參數(shù)： 無 * 全局變量： m_pConnection， m_pRecordset * 返回值：無 ***********************************************************************************/ void ADOConn::ExitConnect() { //關(guān)閉記錄集和連接 if(m_pRecordset!=NULL) m_pRecordsetClose()。 //釋放環(huán)境 ::CoUninitialize()。 // standard constructor StuPage stuPage。 TeaPage teaPage。 11 CListCtrl m_Func_list。 // DDX/DDV support //}}AFX_VIRTUAL // Implementation protected: HICON m_hIcon。 afx_msg void OnSysCommand(UINT nID, LPARAM lParam)。 afx_msg HCURSOR OnQueryDragIcon()。 //}}AFX_MSG afx_msg void Rnew(WPARAM wparam,LPARAM lparam)。 //手動添加功能函數(shù) private: void UpdateFuncList()。 //把子窗口嵌入父窗口 void ActivatePage(int index)。 ********************** /******************************************************************************************* * 函數(shù)名： HCURSOR CGradeMSDlg::UpdateFuncList()。 HICON hIcon = ::LoadIcon (AfxGetResourceHandle(), MAKEINTRESOURCE(IDI_WELICON))。 hIcon = ::LoadIcon (AfxGetResourceHandle(), MAKEINTRESOURCE(IDI_TEAICON))。 hIcon = ::LoadIcon (AfxGetResourceHandle(), MAKEINTRESOURCE(IDI_STUICON))。 (amp。 CRect rc。 // set new icon spacing ((), 64)。 //綠色 (RGB(87,166,117))。 // insert items (0, _T(OutlookBar))。 (1, _T(學(xué)生入口 ), 1)。 } /************************************************************************************* * 函數(shù)名： void ActivatePage(int index)。 switch(index) { case TEAPAGE: //顯示教師頁 { (SW_HIDE)。 (SW_SHOW)。 // (%d,index)。 break。 (SW_SHOW)。 break。 (SW_HIDE)。 } } MoveChild()。 } 3 教師窗口主要源代碼 /****************************/ void TeaPage::OnButtontlog() //教師登入 { // TODO: Add your control notification handler code here UpdateData(true)。 CString sql。 _variant_t var。 return。 (select * from teacher where tno=%s,m_tno)。 if (adoEOF) { AfxMessageBox(沒有這個職工號 !!!)。 return。 14 } var = GetCollect(tpassword)。 if (((LPCSTR)_bstr_t(var))) //密碼錯誤 { AfxMessageBox(密碼錯誤 !!!!)。 return。 (%s老師的授課表 ,(LPCSTR)_bstr_t(var))。 (select as 39。,ame as 39。,\ sclass as 39。,isr as 39。,rdate as 39。\ from tcourse,course \ where = \ and tno=%s,m_tno)。 ()。 thisSetDlgItemText(IDC_BUTTONTLOG,已登入 \\重新登入 )。 //登入成功 GetDlgItem(IDC_BUTTONTOLOG)EnableWindow(true)。 tlogflag = 0。姓名 39。課程名 39。班級 39。成