《數據庫系統(tǒng)原理》課程設計-平面設計公司業(yè)務管理系統(tǒng)

起始時間：截止時間： 2 3 3 4 4 6 7 7 9 9 12 14 15寫此文檔。礎的信息管理方式所取代。圖形化界面：人性化的界面，方便了員工的使用，對操作員技術要求不高。據的操作，保證數據存取不出錯。2000平臺。工的信息，客戶的信息，訂單信息，送貨單信息，歷史單信息。有最高權限。其他員工根據職務需要規(guī)定所需權限。完整性要求：對于一些必須的信息，不能留空值。如 編號送客戶名稱公司地址聯系人客戶名稱公司地址聯系人采用ADO技術實現程序與數據庫的連接。(DLL、EXE等)的一部分被定位在其自身程序中的附屬資源里，如：被定位在msado15.dll的附屬資源中，只需要直接用#import引用它既可。直接在Stdafx.h文件中加入下面語句來實現：#import"c:\programfiles\commonfiles\system\ado\msado15.dll"no_nameename("EOF","adoEOF")//實際上兩行代碼是在同一行/以下為ADOConn類里重要成員函數的代碼：/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////voidCADOConn::ADOCon{{pConn.CreateInstance("ADODB.Connection");//創(chuàng)建Co//設置字符連接字符串，必須是BSTR型或者_bstr_tstrConnect="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;UserID=sa;InitialCatalog=DsnCompany;DataSource=BEN-PC;";pConn->Open(strConnect,"","",adConnectUnspecified);}catch(_com_errore){AfxMessageBox(e.ErrorMessage(}/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////_RecordsetPtr&CDataSource::OpenRecordset(CStringsql){ASSERT(!sql.IsEmpty());//判斷是否為空集{pRs.CreateInstance("ADODB.Recordset");//創(chuàng)建RecpRs->Open(_bstr_t(sql),_variant_t(pConn,true),adOpenStatic,adLockOptimistic,adCmdText);}{AfxMessageBox(e.ErrorMessage(}}voidCADOConn::FreeData()//釋放空間{{pConn->Close();pRs.Release();pConn.Release();}voidCGraphicDsnDlg::OnOK()//確定按鈕事件{//TODO:AddextravalidationheCMainMngDlgdlg;CStringsql="select*fromLogUserwhereUsera.pRs=a.OpenRecordset(sql);/intn=a.pRs->RecordCount;//計算符合條目if(n>0){{::AfxMessageBox("用戶名或密碼不正確！");//登陸失敗}}BOOLCTickets::OnInitDialog()//訂單管理類初始化函數{//TODO:Addextrainitializationherecn.ADOConn();//連接dwExStyle=LVS_EX_FULLROWSELECT|LVS_EX_GRIDLINES|LVS_EX_HEAROP|LVS_EX_ONECLICKACTIm_List.ModifyStyle(0,LVS_REPORT|LVS_SINGLESEL|LVS_SHOWSELALWAYm_List.SetExtendedStyle(dwExStyl//m_List.SetTextColor(RGB(200,200,0//m_List.SetBkColor(RGB(240,247,233m_ListDoc.InsertColumn(0,"",LVCFMT_CENTER,0,m_ListDoc.InsertColumn(1,"稿件名稱",LVCFMT_CENTER,120,m_ListDoc.InsertColumn(2,"長度*寬度",LVCFMT_CENTER,90,m_ListDoc.InsertColumn(3,"規(guī)格",LVCFMT_CENTER,65,m_ListDoc.InsertColumn(4,"色數",LVCFMT_CENTER,65,m_ListDoc.InsertColumn(5,"規(guī)格",LVCFMT_CENTER,65,m_ListDoc.InsertColumn(7,"輸出機型",LVCFMT_CENTER,90,m_ListDoc.InsertColumn(8,"頁數",LVCFMT_CENTER,65,m_ListDoc.InsertColumn(9,"單價",LVCFMT_CENTER,70,m_ListDoc.InsertColumn(10,"小計",LVCFMT_CENTER,80,m_ListDoc.InsertColumn(11,"客戶名稱",LVCFMT_CENTER,137,returnTRUE;//returnTRUEunlessyousetth//EXCEPTION:OCXPropertyPagesshouldreturnFALSEreturnTRUE;//returnTRUEunlessyousetth//EXCEPTION:OCXPropertyPagesshouldreturnFALSE}voidCTicketsMngDlg::Show()//輸出單據信息到列表{intindex=m_oddno.GetCif(index==CB_ERR){AfxMessageBox(_T("出錯!"}m_oddno.GetLBText(index,coursenamCStrings="select*fromDocumentswhereDocName='"+DocName+"'";a.pRs=a.OpenRecordset(s);CStringsql="select*fromDocumentswhereCustomerNa.pRs=a.OpenRecordset(sql);//打開數據到記錄集_variant_tDocNo,DocName,Length,Format,Color,OutputMacMac,Pagess,Price,,Customerinti=0;intnIndex=m_List.GetItemCount();lvItem.iSubItem=0;lvItem.pszText=(char*)(LPCTSTR)DocName1;for(a.pRs->MoveFirst();!a.pRs->adoEOF;a.pRs->M{m_List.InsertItem(&lvIteDocName=a.pRs->GetCollect("DocName");//取數據Length=a.pRs->GetCollect("LenFormat=a.pRs->GetCollect("FormColor=a.pRs->GetCollect(Pages=a.pRs->GetCollect("PagPrice=a.pRs->GetCollect("PriSubtotal=a.pRs->GetColleColor=a.pRs->GetCollect(design=a.pRs->GetCollect("dCustomerName=a.pRs->GetCollect("CustomOutputMac=a.pRs->GetCollect("OutDocName.ChangeType(VT_BSTR);//改變類型Length.ChangeType(VT_Format.ChangeType(VT_BPages.ChangeType(VT_BPrice.ChangeType(VT_BCustomerName.ChangeType(OutputMac.ChangeType(DocName=DocName.bstrVal;//調用bstrvalOutputMac1=OutputMacCustomerName=CustomerName}}//打開修改訂單voidCTicketsManDlg::OnItemmanButto{//TODO:Addyourcontrolnotificationhandlercodeheif(m_Adodc.GetRecordset().GetEof()){MessageBox("請選擇要修改的}CListItemManDlgdlg;dlg.cRegId=m_Datagrid.Getif(dlg.DoModal()==IDOK)}voidCTicketsManDlg::OnDelButto{//TODO:Addyourcontrolnotificationhandlercodeheif(m_Adodc.GetRecordset().GetEof()){MessageBox("請選擇要刪除的訂}if(MessageBox("是否刪除當前記錄？","請確認",MB_YESNO+MB_ICONQUESTION){reg.SqlDelete(m_Datagrid.GetItem(0}對象編程有了更深切的理解。模塊化的