【正文】 iant_t(女))。 pRsUpdate()。 MessageBox(修改成功!,系統(tǒng)消息)。 m_stuXH=。 m_stuXM=。 m_stuZY=。 m_stuDZ=。 m_stuBZ=。 UpdateData(false)。 } pRsClose()。 pConnectionClose()。 } catch(__error amp。e) { _bstr_t bstrSource( ())。 _bstr_t bstrDescription( ())。 CString sError。 (Source:%Description:%s,(LPCSTR)bstrSource,(LPCSTR)bstrDescription)。 AfxMessageBox(sError)。 }}8 主界面“刪除”按鈕代碼void CXSCJView::OnDelete() { _CommandPtr pCmd=NULL。 _variant_t vNULL。 =VT_ERROR。 =DISP_E_PARAMNOTFOUND。 CString strname。 (Provider=。Integrated Security=SSPI。\ Persist Security Info=False。Initial Catalog=PXSCJ。Data Source=.)。 _bstr_t strCnn=strname。 UpdateData(TRUE)。 (__uuidof(Connection))。 pConnectionOpen(strCnn,NULL)。 (__uuidof(Command))。 pCmdActiveConnection =pConnection。 CString SqlStr。 (delete from XSB where XH=39。%s39。,m_stuXH)。 pCmdCommandText =(_bstr_t)SqlStr。 pCmdExecute (amp。vNULL,amp。vNULL,adCmdText)。 pConnectionClose()。 AfxMessageBox(刪除成功！)。9 添加菜單欄和工具欄代碼void CXSCJView::OnStuinfo() { CStuInfoModify StuInfoDlg。 ()。void CXSCJView::OnToolInfo() { CStuInfoModify StuInfoDlg。 ()。}void CXSCJView::OnMenuitem32772() { CStuScoreAdd StuScoreDlg。 ()。}void CXSCJView::OnScoreModify() { CStuScoreAdd StuScoreDlg。 ()。 }10 信息查詢界面“查詢”按鈕代碼void CStuInfoModify::OnBUTSearch() { UpdateData()。 CString SqlStr。 SqlStr=select as 學(xué)號,XM as 姓名,XB as 性別,ZY as 專業(yè),ZXF as 總學(xué)分,DZ as 地址,CSSJ as 出生時間 from XSB where ZXF=0+MakeSqlStr()。 (SqlStr)。 ()。 _ConnectionPtr m_pCon。 _RecordsetPtr m_pRs。 (__uuidof(Connection))。 m_pConOpen(SQLCONSTR,0)。 (__uuidof(Recordset))。 m_pRsOpen((_variant_t)SqlStr,(),adOpenKeyset,adLockOptimistic,adCmdText)。 if(m_pRsRecordCount ==0) { MessageBox(未找到記錄,提示)。 CWnd* XH=GetDlgItem(IDC_XH)。 CWnd* XM=GetDlgItem(IDC_XM)。 XHSetWindowText()。 XMSetWindowText()。 return。 }}11 成績錄入界面“查詢”代碼void CStuScoreAdd::OnSearch() { // TODO: Add your control notification handler code here UpdateData(true)。 CString str。 ((),str)。 (select*from XS_KC_CJ where +str+=39。+m_edit+39。)。 ()。 }12 成績錄入界面“添加”代碼void CStuScoreAdd::OnAdd() { // TODO: Add your control notification handler code here UpdateData(true)。 if(m_xh==||m_kch==) { MessageBox(學(xué)號和課程不能為空，請重新輸入！,系統(tǒng)消息)。 return。 } ADOConn m_AdoConn。 ()。 _bstr_t vSQL,sql。 CString cj。 (%d,m_cj)。 _RecordsetPtr m_pRecordset。 vSQL=select*from CJB where XH=39。+m_xh+39。 and KCH=39。+m_kch+39。 m_pRecordset=(vSQL)。 if(!m_pRecordsetadoEOF) { MessageBox(該項(xiàng)記錄已經(jīng)存在!請重新輸入!,系統(tǒng)消息)。 return。 } else { sql=insert into CJB(XH,KCH,CJ) values(39。+m_xh+39。,39。+m_kch+39。,+cj+)。 (sql)。 ()。 (select*from XS_KC_CJ)。 ()。 MessageBox(添加成功!,系統(tǒng)消息)。 }}13 成績錄入界面“修改”void CStuScoreAdd::Onchange() { // TODO: Add your control notification handler code here UpdateData(true)。 if(m_xh==||m_kch==) { MessageBox(學(xué)號和課程不能為空，請重新輸入！,系統(tǒng)消息)。 return。 } ADOConn m_AdoConn。 ()。 _bstr_t vSQL,sql。 CString cj。 (%d,m_cj)。 _RecordsetPtr m_pRecordset。 vSQL=select*from CJB where XH=39。+m_xh+39。 and KCH=39。+m_kch+39。 m_pRecordset=(vSQL)。 if(m_pRecordsetadoEOF) { MessageBox(該項(xiàng)記錄不存在!請重新輸入!,系統(tǒng)消息)。 return。 } else { sql=update CJB set CJ=+cj+ where XH=39。+m_xh+39。 and KCH=39。+m_kch+39。 (sql)。 ()。 MessageBox(修改成功!,系統(tǒng)消息)。 (select*from XS_KC_CJ)。 ()。 m_xh=。 m_kch=。 m_cj=0。 UpdateData(false)。 }}14 成績錄入界面“刪除”按鈕代碼void CStuScoreAdd::Ondelete() { // TODO: Add your control notification handler code here // TODO: Add your control notification handler code here UpdateData(true)。 if(m_xh==||m_kch==) { MessageBox(學(xué)號和課程不能為空，請重新輸入！,系統(tǒng)消息)。 return。 } ADOConn m_AdoConn。 ()。 _bstr_t vSQL,sql。 CString cj。 (%d,m_cj)。 _RecordsetPtr m_pRecordset。 vSQL=select*from CJB where XH=39。+m_xh+39。 and KCH=39。+m_kch+39。 m_pRecordset=(vSQL)。 if(m_pRecordsetadoEOF) { MessageBox(該項(xiàng)記錄不存在,無需刪除!請重新輸入!,系統(tǒng)消息)。 return。 } else { sql=delete CJB where XH=39。+m_xh+39。 and KCH=39。+m_kch+39。 (sql)。 ()。 MessageBox(刪除成功!,系統(tǒng)消息)。 (select*from XS_KC_CJ)。 ()。 m_xh=。 m_kch=。 m_cj=0。 UpdateData(false)。 }}第 39 頁 共 39