【正文】 CStuInfoModify::OnPaint() { CPaintDC dc(this)。 } else { m_StuZPPath = 。m_pStuZPStm)。 m_StuZPLen = 。 if (hGlobal != NULL) { if ((pvData = GlobalLock(hGlobal)) != NULL) { (pvData, cb)。 ((cb = ) != 1)) { HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE, cb)。 (m_StuZPPath,fstatus) amp。 } //重文件中讀出照片數(shù)據(jù)流，存放到m_pStuZPStm中，在OnPaint中會(huì)把他顯示出來 if ((m_StuZPPath,CFile::modeRead) amp。 Invalidate()。 // TODO: Add your control notification handler code here //打開文件選擇對(duì)話框 CFileDialog dlg(TRUE,jpg,*.jpg,OFN_HIDEREADONLY|OFN_OVERWRITEPROMPT,JPEG(*.jpg)|*.jpg,GIF(*.gif)|*.gif,NULL)。 //LONG cb。 }}“載入照片”Click事件的處理，打開對(duì)話框，給用戶選擇照片，打開照片把照片數(shù)據(jù)寫入到流中，在OnPaint 消息中顯示照片，同時(shí)記錄下選擇的文件名和路徑到全局m_StuZPPath變量中，給后面的更新學(xué)生信息使用void CStuInfoModify::OnBtzp() { // TODO: Add your control notification handler code here CFileStatus fstatus。 (Source : %s Description : %s ,(LPCSTR)bstrSource,(LPCSTR)bstrDescription)。 CString sError。e) { // Notify the user of errors if any. _bstr_t bstrSource(())。 AfxMessageBox(刪除成功!)。vNULL,adCmdText)。 pCmdExecute(amp。,m_StuXH)。 (delete from XS where XH = 39。 pCmdActiveConnection = pConnection。 hr = pConnectionOpen(strCnn,NULL)。 try { //Open a connection UpdateData(TRUE)。 = DISP_E_PARAMNOTFOUND。 _variant_t vNULL。 _CommandPtr pCmd = NULL。 UpdateData(FALSE)。 pConnectionClose()。 AfxMessageBox(sError)。 CString sError。e) { // Notify the user of errors if any. _bstr_t bstrSource(())。 pConnectionClose()。 SafeArrayUnaccessData ()。m_pStuZPStm)。m_pStuZPBuf)。 } else { //取照片數(shù)據(jù) m_varChunk = pRsZPFieldsGetItem(ZP)GetChunk(lDataLength)。 //取照片數(shù)據(jù)長(zhǎng)度 long lDataLength = pRsZPFieldsGetItem(ZP)ActualSize。 (__uuidof(Recordset))。 (__uuidof(Connection))。%s39。 pStreamOpen(varOptional, adModeUnknown, adOpenStreamUnspecified, _bstr_t(), _bstr_t())。 variant_t varOptional(DISP_E_PARAMNOTFOUND,VT_ERROR)。 CString Sql。 //根據(jù)當(dāng)前學(xué)號(hào)，從數(shù)據(jù)庫中讀出照片數(shù)據(jù)流，并保存在m_pStuZPStm流中，在OnPaint中會(huì)把他顯示出來 _bstr_t strCnn(SQLCONSTR)。 if() m_StuXBN = 0。 (index)。 ()。 varFld = pRsFieldsGetItem(ZY)Value。 varFld = pRsFieldsGetItem(ZXF)Value。 varFld = pRsFieldsGetItem(CSSJ)Value。 ()。 varFld = pRsFieldsGetItem(BZ)Value。 ()。 varFld = pRsFieldsGetItem(XM)Value。 ()。 varFld = pRsFieldsGetItem(XH)Value。 pRecordsetQueryInterface(IID_IDispatch, (void **)amp。 _variant_t varFld。 HRESULT hr。 _RecordsetPtr pRsZP = NULL。 return TRUE。 //移動(dòng)記錄指針到第一個(gè) ().MoveFirst()。 (1,通信工程)。 ()。 (備注)。 col=(vIndex)。 (總學(xué)分)。 col=(vIndex)。 (專業(yè))。 col=(vIndex)。 (出生日期)。 col=(vIndex)。 (性別)。 col=(vIndex)。 (姓名)。 col=(vIndex)。 (學(xué)號(hào))。 col=(vIndex)。 = VT_UINT。 (5)。 (3)。 // TODO: Add extra initialization here cols = ()。 CColumn col。BOOL CStuInfoModify::OnInitDialog() { CDialog::OnInitDialog()。 m_pStuZPStm = NULL。 m_StuXBN = 1。 m_StuBZ = _T()。 m_StuXM = _T()。 //照片緩沖指針 _variant_t m_varChunk。 //照片流變量 long m_StuZPLen。 //初始化標(biāo)記 CString m_StuZPPath。圖 設(shè)計(jì)好的窗體如圖：圖 實(shí)現(xiàn)過程：當(dāng)點(diǎn)擊DataGrid中的記錄時(shí)記錄集游標(biāo)也跟著移動(dòng)，在OnMoveCompleteAdodc2事件中取出本條記錄顯示在上面的控件中，可以在控件中修改學(xué)生信息，點(diǎn)擊載入照片可以選擇學(xué)生照片，按更新按鈕更新到數(shù)據(jù)庫中，按刪除按鈕刪除當(dāng)前此記錄，刪除記錄時(shí)系統(tǒng)會(huì)調(diào)用CheckXs觸發(fā)器來保持?jǐn)?shù)據(jù)的參照完整性。（5）在窗體上放入Image控件并起名為IDC_STUPIC，用來顯示學(xué)生照片。Initial Catalog=XSCJ。Persist Security Info=False。（2）設(shè)置StuADO的ConnectionString屬性為Provider=。如輸入一個(gè)新的學(xué)號(hào)點(diǎn)擊“更新”實(shí)現(xiàn)記錄的添加，當(dāng)選中當(dāng)前記錄點(diǎn)擊“刪除”時(shí)則可以刪除此學(xué)生記錄，點(diǎn)擊“載入照片”可以選擇學(xué)生照片，用于更新學(xué)生照片信息。 6. 學(xué)生信息修改目的與要求：了解使用Recordset對(duì)象對(duì)數(shù)據(jù)庫操作的基本方法（增、刪、改），以及存儲(chǔ)顯示圖像的操作。 ()。,strXH)。 (select XM,KCM,CJ, from XS,KC,XS_KC Where = And = and =39。 CString strXH(_T())。pRs)。 (__uuidof(Recordset))。 _variant_t varFld。}IDC_STUVIEWADODC控件有記錄Move的消息的時(shí)候，以當(dāng)前學(xué)生信息的學(xué)號(hào)作為查詢條件，從XS_KC表中查找當(dāng)前學(xué)生的選課記錄，并顯示到學(xué)生課程顯示的IDC_DGKC中void CXSCJView::OnMoveCompleteStuviewadodc(long adReason, LPDISPATCH pError, long FAR* adStatus, LPDISPATCH pRecordset) { // TODO: Add your control notification handler code here if(m_AdoInitFlag == 0) return。(SqlStr)。}“查詢”Click事件處理，用生成的模糊查詢的SQL字符串，來刷新IDC_STUVIEWADODC，并顯示到關(guān)聯(lián)的DataGrid中，在DataGrid顯示查詢到的結(jié)果void CXSCJView::OnSearchb() {// TODO: Add your control notification handler code hereCString SqlStr。 。 SqlStr += TempStr。 ()。 } //取選擇的專業(yè) int index = ()。 SqlStr += %39。%。 } if(!()) { //strcat(SqlStr,and XH like )。 SqlStr += %39。%。 UpdateData(TRUE)。}根據(jù)輸入產(chǎn)生查詢SQL語句的函數(shù)，以學(xué)號(hào)、姓名的輸入信息和專業(yè)的選擇生成模糊查詢的SQL字符串CString CXSCJView::MakeSqlStr(void){ CString SqlStr。 ()。 //初始化標(biāo)記設(shè)置 m_AdoInitFlag = 1。 (BZ)。 = long(6)。 (ZXF)。 = long(5)。 (ZY)。 = long(4)。 (CSSJ)。 = long(3)。 (XBM)。 = long(2)。 (XM)。 = long(1)。 (XH)。 //分別設(shè)定每列的屬性，包括表頭、綁定的數(shù)據(jù)庫字段 = long(0)。 (6)。 (4)。 (2)。 VARIANT vIndex。 CColumns cols。GetDocument()m_xSCJSet。//初始化成0 //}}AFX_DATA_INIT // TODO: add construction code here}CXSCJView初始化函數(shù)，這里初始化IDC_STUVIEWDATAGRID的顯示格式，添加表格頭以及和數(shù)據(jù)庫字段的綁定關(guān)系。 m_StuXM = _T()。 //添加成員變量…………………………}CXSCJView類的構(gòu)造函數(shù)，初始化成員對(duì)象CXSCJView::CXSCJView() : COleDBRecordView(CXSCJView::IDD){ //{{AFX_DATA_INIT(CXSCJView) m_pSet = NULL。主要代碼：CXSCJView對(duì)象的構(gòu)造函數(shù)，為了避免在未初始化完成就做一些操作，所以定義m_AdoInitFlag為初始化完成標(biāo)記，標(biāo)記有效才能做進(jìn)一步操作。圖 圖 完成的開發(fā)窗體如圖：圖 實(shí)現(xiàn)過程：直接打開時(shí)由于控件屬性的設(shè)置，所以顯示所有記錄，當(dāng)輸入查詢條件時(shí)點(diǎn)擊查詢按鈕則調(diào)用MakeSqlStr函數(shù)產(chǎn)生查詢字符串，然后重新設(shè)置控件的屬性，打開控件顯示查詢結(jié)果集。Data Source=microsofcee903\dcr（6） 設(shè)置IDC_StuKCADO的RecordSource屬性為select * from XS,KC,XS_KCwhere = and =（7） 設(shè)置IDC_DGKC的DataSource屬性為IDC_StuKCADO。User ID=sa。Integrated Security=SSPI。Data Source=microsofcee903\dcr（3） 設(shè)置IDC_STUVIEWADODC的RecordSource屬性為select * from XS,CXB where =（4） 設(shè)置IDC_STUVIEWDATAGRID的DataSource屬性為IDC_STUVIEWADODC。User ID=sa。Integrated Security=SSPI。放入IDC_StuXH學(xué)號(hào)Edit、IDC_StuXM姓名Edit和IDC_StuZYCB專業(yè)下拉列表框,為了美觀IDC_StuKCADO隱藏在IDC_DGKC后面，增加IDC_StuZYCB專業(yè)下拉列表項(xiàng)。}5. 學(xué)生信息查詢目的與要求：