【正文】 ate。 bool isrflag。 CString sql。 //默認(rèn)沒超過修改期限 (0)。 //獲取課程名 (1)。 (2)。 //獲取 班級 (3)。 //AfxMessageBox(local_ame+local_class)。 //直接返回 } (是真的要上傳或修改 %d%s 的成績 ??,local_class,local_ame)。 } if (isrflag) //已上傳 { (4)。 17 //AfxMessageBox(local_rdate)。 //提取年 int year = _ttoi(strtemp)。 //提取月 int month = _ttoi(strtemp)。 //提取日月為 1 位 提 19 空格 兩位 19 int day = _ttoi(strtemp)。 //提取時，分，秒 CString timetemp = strtemp。 //小時 int hour = _ttoi(strtemp)。 //分 int minite = _ttoi(strtemp)。 //秒 int second = _ttoi(strtemp)。 radtetime += CTimeSpan(3,0,0,0)。 CTime currentt = CTime::GetCurrentTime()。 AfxMessageBox(您的科目已超過 3 個工作日 ,只能查看 )。 (strtemp)。%s39。%s39。%s39。 //AfxMessageBox(sql)。%s39。 (sql)。 thisGetDlgItem(IDC_BUTTONOUTINPUT)EnableWindow(true)。 //不允許修改 thisSetDlgItemText(IDC_BUTTONOUTINPUT,退出查看 )。 //允許修改 thisSetDlgItemText(IDC_BUTTONOUTINPUT,完成上傳 )。 renewteapage()。 } // TODO: Add your message handler code here else //轉(zhuǎn)到教師頁面 { CDialog::OnShowWindow(bShow, nStatus)。 ()。 sno = 。 CString sql。 //AfxMessageBox( + )。%s39。%s39。 (_bstr_t(sql))。 thisGetDlgItem(IDC_BUTTONSOUT)EnableWindow(false)。 return。 thisGetDlgItem(IDC_BUTTONSOUT)EnableWindow(true)。 //保 存 var = GetCollect(sname)。 ()。 return。 } else return。 CString strtemp。 UpdateData(false)。 (sql)。課程名 39。成績 39。教師 39。上傳時間 39。%s39。 (sql)。 BYTE count = 0。 m_nopass = 0。(1)。 grade = _ttoi(())。 if (grade60) { m_nopass++。 (count)。 UpdateData(false)。 } thisGetDlgItem(IDC_BUTTONSOUT)EnableWindow(false)。 m_staticwel = 歡迎 。 ( )。039。 ()。 } 4, 數(shù)據(jù)庫常用操作 /*****************/ /********************************************************************************* * 函數(shù)名： void ADOConn::OnInitADOConn() * 功能： 建立數(shù)據(jù)庫連接 21 * 參數(shù)： 無 * 全局變量引用： m_pConnection(ado 數(shù)據(jù)庫連接指針 ) * 返回值 無 *********************************************************************************/ void ADOConn::OnInitADOConn() { //初始化 OLE/COM 庫環(huán)境 ::CoInitialize(NULL)。 //設(shè)置連接字符串 CString conectstr。Integrated Security=SSPI。Initial Catalog=%s。 _bstr_t strConnect= conectstr。 } //捕捉異常 catch(__error e) { //顯示錯誤信息 //AfxMessageBox(())。 } } /*********************************************************************************** * 函數(shù)名： _RecordsetPtramp。 ADOConn::GetRecordSet(_bstr_t bstrSQL) { try { //連接數(shù)據(jù)庫，如果 connection 對象為 空，則重新連接數(shù)據(jù)庫 if(m_pConnection==NULL) 22 OnInitADOConn()。 //取得表中的記錄 m_pRecordsetOpen(bstrSQL,(),adOpenDynamic,\ adLockOptimistic,adCmdText)。 } //返回記錄集 return m_pRecordset。 try { //是否已連接數(shù)據(jù)庫 if(m_pConnection==NULL) //未連接 OnInitADOConn()。 return true。 return false。 m_pConnectionClose()。 } 附錄 3 部分 sql 源代碼 1, 創(chuàng)建教師授課程表 /*********** **********/ use qgradems go create table teacourse( tno char(11), o char(8), cclass smallint,/****一門課開多個班級 *****/ torf bit default 0, inputt smalldatetime, primary key(o,cclass), foreign key(tno) references teacher(tno), foreign key(o) references course(o) ) 2, 創(chuàng)建學(xué)生課表 /******** ******/ use qgradems go 24 create table selcourse( sno char(11), o char(8), cclass smallint, grade smallint check(grade=100 and grade=0) primary key(sno,o), foreign key(sno) references student(sno), foreign key(o,cclass) references teacourse(o,cclass) ) 3, 成績統(tǒng)計存儲過程 /********** ***************/ /******************************************************************** * 統(tǒng)計班級成績 課程名 ,課程班級 ,班級，低于 60， 6080，高于 80，及格率 *********************************************************************/ create proc proc_wel as set nocount on declare cclass smallint declare tname varchar(30) declare ame varchar(30) declare downs smallint declare stoe smallint declare upe smallint declare o char(8) declare tno char(11) declare sno char(11) declare average real declare pass real declare sum real create table temp(cclass smallint,ame varchar(30), tname varchar(30),upe smallint, stoe smallint,downs smallint, average real,pass real, primary key(cclass,ame) ) declare local_cursor cursor set local_cursor = CURSOR FORWARD_ONLY STATIC for select cclass,tno,o from teacourse where torf=1 open local_cursor 25 fetch next from local_cursor into cclass,tno,o WHILE (fetch_status = 0) /*0，為 fetch 成功， 1 為出錯， 2 為不存在 */ begin /*set sclass= set tno=Tno set o=o*/ set average =0 set sum = 0。課程班級 39。課程名 39。教師 39。高于 80 分人數(shù) 39。60 分到 80 分人數(shù) 39。不及格人數(shù) 39。平均分 39。及格率 (%)39