发布时间 : 星期日 文章基于MYSQL的医院综合信息管理系统设计报告更新完毕开始阅读
// 异常: OCX 属性页应返回 FALSE }
void CDurgDlg::AddToGrid(CString str) { CADOConn m_AdoConn; m_AdoConn.OnInitADOConn(); CString sql; sql.Format(str); _RecordsetPtr m_pRecordset; m_pRecordset = m_AdoConn.GetRecordSet((_bstr_t)sql); while(m_AdoConn.m_pRecordset->adoEOF==0) { m_grid.InsertItem(0,CString(\ m_grid.SetItemText(0,0,(CString)(char*)(_bstr_t)m_pRecordset->GetCollect(\ m_grid.SetItemText(0,1,(CString)(char*)(_bstr_t)m_pRecordset->GetCollect(\ m_grid.SetItemText(0,2,(CString)(char*)(_bstr_t)m_pRecordset->GetCollect(\ m_grid.SetItemText(0,3,(CString)(char*)(_bstr_t)m_pRecordset->GetCollect(\ m_pRecordset->MoveNext(); } m_AdoConn.ExitConnect(); UpdateData(true); }
void CDurgDlg::OnBnClickedOk() { // TODO: 在此添加控件通知处理程序代码 // CDialogEx::OnOK(); UpdateData(true); if(m_no.IsEmpty()) { MessageBox(CString(\编号不能为空!\ return; } if(m_name.IsEmpty()) { MessageBox(CString(\名称不能为空!\ return; } CADOConn m_AdoConn;
49
m_AdoConn.OnInitADOConn(); _bstr_t sql; sql = \ _RecordsetPtr m_pRecordset;
m_pRecordset=m_AdoConn.GetRecordSet(sql); try { m_pRecordset->AddNew();//添加新行 m_pRecordset->PutCollect(\ m_pRecordset->PutCollect(\ m_pRecordset->PutCollect(\ m_pRecordset->PutCollect(\ m_pRecordset->Update();//更新数据库 m_AdoConn.ExitConnect();//断开数据库连接 } catch(...) { MessageBox(CString(\操作失败\ return; } MessageBox(CString(\保存成功.\ m_grid.DeleteAllItems();//删除grid中原来的数据 CString str; str=\ AddToGrid(str);//重新遍历 }
void CDurgDlg::OnBnClickedChange() { // TODO: 在此添加控件通知处理程序代码 UpdateData(true); CADOConn m_AdoConn; m_AdoConn.OnInitADOConn(); CString tempSql; tempSql.Format(CString(\`mydb`.`durg` `name`='%s',`price`='%s',`inventory`='%s'
`durgno`='%s'\ m_AdoConn.ExecuteSQL((_bstr_t)tempSql); m_AdoConn.ExitConnect();
SET
WHERE
50
MessageBox(CString(\修改成功.\ m_grid.DeleteAllItems();//删除grid中原来的数据 CString str; str=\ AddToGrid(str);//重新遍历 }
void CDurgDlg::OnBnClickedDelete() { // TODO: 在此添加控件通知处理程序代码 UpdateData(true); CADOConn m_AdoConn; m_AdoConn.OnInitADOConn(); CString tempSql; tempSql.Format(CString(\ CString tenpstr; tenpstr.Format(CString(\是否要删除%s的记录\ if(MessageBox(tenpstr,CString(\提示\ { m_AdoConn.ExecuteSQL((_bstr_t)tempSql); m_AdoConn.ExitConnect(); MessageBox(CString(\删除成功.\ m_grid.DeleteAllItems();//删除grid中原来的数据 CString str; str=\ AddToGrid(str);//重新遍历 } }
void CDurgDlg::OnBnClickedClear() { // TODO: 在此添加控件通知处理程序代码 m_no = _T(\ m_price = _T(\ m_name = _T(\
51
m_inventory = _T(\ UpdateData(false); }
void CDurgDlg::OnBnClickedSelect() { // TODO: 在此添加控件通知处理程序代码 m_grid.DeleteAllItems(); UpdateData(true); CString str1,str2; GetDlgItem(IDC_EDIT_NO)->GetWindowText(str1); str2=CString(\ AddToGrid(str2);// 遍历功能信息记录 }
void CDurgDlg::OnNMClickDurg(NMHDR *pNMHDR, LRESULT *pResult) { LPNMITEMACTIVATE pNMItemActivate reinterpret_cast
=
52