基于DAO的学生成绩管理软件
2008-04-19 20:28:05 来源:WEB开发网 闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾惧綊鏌熼梻瀵割槮缁炬儳缍婇弻鐔兼⒒鐎靛壊妲紒鐐劤缂嶅﹪寮婚悢鍏尖拻閻庨潧澹婂Σ顔剧磼閻愵剙鍔ょ紓宥咃躬瀵鎮㈤崗灏栨嫽闁诲酣娼ф竟濠偽i鍓х<闁绘劦鍓欓崝銈囩磽瀹ュ拑韬€殿喖顭烽幃銏ゅ礂鐏忔牗瀚介梺璇查叄濞佳勭珶婵犲伣锝夘敊閸撗咃紲闂佽鍨庨崘锝嗗瘱闂備胶顢婂▍鏇㈠箲閸ヮ剙鐏抽柡鍐ㄧ墕缁€鍐┿亜韫囧海顦﹀ù婊堢畺閺屻劌鈹戦崱娆忓毈缂備降鍔庣划顖炲Φ閸曨垰绠抽悗锝庝簽娴犻箖姊洪棃娑欐悙閻庢矮鍗抽悰顕€宕堕澶嬫櫖濠殿噯绲剧€笛囧箲閸ヮ剙钃熼柣鏂挎憸閻熷綊鏌涢…鎴濇灈妞ゎ剙鐗嗛—鍐Χ鎼粹€茬凹缂備緡鍠楅幐鎼佹偩閻戣棄纭€闁绘劕绉靛Λ鍐春閳ь剚銇勯幒鎴濐伀鐎规挷绀侀埞鎴︽偐閹绘帩浼€缂佹儳褰炵划娆撳蓟濞戞矮娌柟瑙勫姇椤ユ繈姊洪柅鐐茶嫰婢т即鏌熼搹顐e磳闁挎繄鍋涢埞鎴犫偓锝庘偓顓涙櫊閺屽秵娼幏灞藉帯闂佹眹鍊曢幊鎰閹惧瓨濯撮柛鎾村絻閸撳崬顪冮妶鍡楃仸闁荤啿鏅涢悾鐑藉Ψ瑜夐崑鎾绘晲鎼粹剝鐏嶉梺缁樻尰濞叉﹢濡甸崟顖氱疀闂傚牊绋愮花鑲╃磽娴h棄鐓愭慨妯稿妿濡叉劙骞樼拠鑼槰闂佸啿鎼崐濠毸囬弶搴撴斀妞ゆ梻銆嬪銉︺亜椤撶偛妲婚柣锝囧厴楠炴帡骞嬮弮鈧悗濠氭⒑鐟欏嫭鍎楅柛妯衡偓鐔插徍濠电姷鏁告慨鐑藉极閸涘﹥鍙忔い鎾卞灩绾惧鏌熼崜褏甯涢柍閿嬪灦閵囧嫰骞掗崱妞惧缂傚倷绀侀ˇ閬嶅极婵犳氨宓侀柛鈩冪⊕閸婄兘鏌涘┑鍡楊伀妞ゆ梹鍔曢埞鎴︽倻閸モ晝校闂佸憡鎸婚悷锔界┍婵犲洦鍤冮柍鍝勫暟閿涙粓姊鸿ぐ鎺戜喊闁告瑥楠搁埢鎾斥堪閸喓鍘搁柣蹇曞仧绾爼宕戦幘璇茬疀濞达絽鎲¢崐顖炴⒑绾懎浜归悶娑栧劦閸┾偓妞ゆ帒鍟惃娲煛娴e湱澧柍瑙勫灴閹瑩寮堕幋鐘辨闂備礁婀辨灙闁硅姤绮庨崚鎺楀籍閸喎浠虹紓浣割儓椤曟娊鏁冮崒娑氬幈闂佸搫娲㈤崝宀勬倶閻樼粯鐓曢柟鑸妼娴滄儳鈹戦敍鍕杭闁稿﹥鐗犲畷婵嬫晝閳ь剟鈥﹂崸妤€鐒垫い鎺嶈兌缁犲墽鈧厜鍋撳┑鐘辩窔閸嬫鈹戦纭烽練婵炲拑绲垮Σ鎰板箳閹冲磭鍠撻幏鐘绘嚑閼稿灚姣愰梻鍌氬€烽懗鑸电仚濠电偛顕崗妯侯嚕椤愩倖瀚氱€瑰壊鍠栧▓銊︾節閻㈤潧校缁炬澘绉瑰鏌ュ箵閹烘繄鍞甸柣鐘烘鐏忋劌顔忛妷褉鍋撶憴鍕碍婵☆偅绻傞~蹇涙惞閸︻厾锛滃┑鈽嗗灠閹碱偊锝炲鍥╃=濞达綁顥撻崝宥夋煙缁嬪灝鏆遍柣锝囧厴楠炲鏁冮埀顒傜不婵犳碍鍋i柛銉戝啰楠囬悗瑙勬尭缁夋挳鈥旈崘顔嘉ч柛鈩兠棄宥囩磽娴e壊鍎愰柛銊ュ缁顓兼径瀣偓閿嬨亜閹哄秶顦︾€殿喖鐏濋埞鎴﹀煡閸℃浠梺鍛婎焼閸曨収娲告俊銈忕到閸燁垶宕愰崹顐e弿婵☆垳鍘ф禍楣冩倵濮樼偓瀚�

前面我已经写过几篇关于数据库的文档,这一篇还是它的后继篇。前面都是用ODBC开发的,现在改用DAO,DAO有一个缺点,没有同步支持ACCESS的最新版本,还要转换到早期的版本,不知道微软是咋搞的。废话少说,首先看一下软件的用法:
- 1、对话框中有两个菜单项用于创建班级和增减科目,一项下面有两个子项。其中"增加班级"只有在选中对话框"组合控件"中的一个班级然后按"开始"按钮后,才可以使用,因为只有先得到表的结构,才能按此结构创建新表。而其它三个子项恰相反,只有程序刚打开还没有选择班级按"开始按钮"或选择"组合控件"中的"关闭班级"项按"开始"按钮后才可以使用,这是因为只有把所有班级记录集关闭后,这三项才能安全工作。
- 2、增加记录与以前有一点不同,打开增加记录对话框后,大家可以看到不同,因为科目是随"增减科目"变化的,所以增加记录的科目要动态变化。
- 3、修改记录只有选中列表控件中的一条记录后,按"修改记录"按钮才可以。
- 4、其它的与以前版本相同。
下面看一下开发过程:
因为科目是可以变化的,所以我没有用一个具体的CDaoRecordset类,因此大部分的
功能是用SQL语句实现的。
1、首先看一下OnInitDialog():
BOOL CListDlg::OnInitDialog()
{
CDialog::OnInitDialog();
SetWindowText("学生成绩管理");
// IDM_ABOUTBOX must be in the system command range.
ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
ASSERT(IDM_ABOUTBOX < 0xF000);
CMenu* pSysMenu = GetSystemMenu(FALSE);
if (pSysMenu != NULL)
{
CString strAboutMenu;
strAboutMenu.LoadString(IDS_ABOUTBOX);
if (!strAboutMenu.IsEmpty())
{
pSysMenu->AppendMenu(MF_SEPARATOR);
pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
}
}
SetIcon(m_hIcon, TRUE); // Set big icon
SetIcon(m_hIcon, FALSE); // Set small icon
GetDlgItem(IDC_STRAT)->EnableWindow(FALSE);
this->Enable(FALSE);
m_pDB=new CDaoDatabase;
CString sPath;
GetModuleFileName(NULL,sPath.GetBufferSetLength(MAX_PATH+1),MAX_PATH);
sPath.ReleaseBuffer ();
int nPos;
nPos=sPath.ReverseFind (''\\'');
sPath=sPath.Left (nPos);
nPos=sPath.ReverseFind(''\\'');
sPath=sPath.Left (nPos);
CString lpszFile = sPath + "\\db6.mdb";
try{
m_pDB->Open(lpszFile);
}
catch(CDaoException* e)
{
AfxMessageBox(e->m_pErrorInfo->m_strDescription,MB_ICONEXCLAMATION);
delete m_pDB;
e->Delete();
return FALSE;
}
CDaoTableDefInfo tabInfo;
int nTableDefCount = m_pDB->GetTableDefCount();
for (int i = 0; i < nTableDefCount; i++)
{
m_pDB->GetTableDefInfo(i,tabInfo);
if (tabInfo.m_lAttributes & dbSystemObject)
continue;
m_Com.AddString(tabInfo.m_strName);
}
m_pRecordSet=new CDaoRecordset(m_pDB);
m_bTF=TRUE;
m_bCR=FALSE;
return TRUE; // return TRUE unless you set the focus to a control
}
它的主要任务是打开数据库和表的名字
2、下面是最为重要的OnStatr():
void CListDlg::OnStrat()
{
if(m_pRecordSet->IsOpen())
m_pRecordSet->Close();
m_List1.DeleteAllItems();
if(nField!=0)
{
for(long i=0;i<nField;i++)
{
m_List1.DeleteColumn(0);
}
}
m_Com.GetLBText(m_Com.GetCurSel(),m_GetString);
if(m_GetString=="关闭班级")
{
m_bTF=TRUE;
m_bCR=FALSE;
return ;
}
m_bTF=FALSE;
m_bCR=TRUE;
CString strSQL="SELECT * FROM " + m_GetString;
try{
m_pRecordSet->Open(dbOpenDynaset, strSQL);
m_pRecordSet->m_strFilter.Empty();
}
catch(CDaoException *e)
{
AfxMessageBox(e->m_pErrorInfo->m_strDescription,MB_ICONEXCLAMATION);
delete m_pRecordSet;
m_pDB->Close();
delete m_pDB;
e->Delete();
return ;
}
if(m_pRecordSet != NULL)
{
m_pImageList = new CImageList();
m_pImageList->Create(IDB_BITMAP4, 16, 1, RGB(255,0,0));
m_List1.SetImageList(m_pImageList, LVSIL_SMALL); /* set extended stlyes*/
DWORD dwExStyle = LVS_EX_FULLROWSELECT | LVS_EX_GRIDLINES | /*LVS_EX_SUBITEMIMAGES |*/
m_List1.SetExtendedStyle(LVS_EX_FULLROWSELECT|LVS_EX_GRIDLINES);
LVS_EX_HEADERDRAGDROP | LVS_EX_TRACKSELECT;
LV_COLUMN lvColumn;
lvColumn.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT | LVCF_SUBITEM;
lvColumn.fmt = LVCFMT_LEFT; lvColumn.cx = 67;
nField=m_pRecordSet->GetFieldCount();
for(int i = 0; i < nField; i++) // set up columns
{
CDaoFieldInfo m_fieldinfo;
m_pRecordSet->GetFieldInfo(i, m_fieldinfo);//get field name
int len = m_fieldinfo.m_strName.GetLength();
CString temp = m_fieldinfo.m_strName;
TCHAR* szBuffer = new TCHAR[len + 1];
strcpy(szBuffer, temp.GetBuffer(len));
temp.ReleaseBuffer();
lvColumn.pszText = szBuffer;
m_List1.InsertColumn(i, &lvColumn);//insert column
delete szBuffer;
}
/*set number of items in ListView*/
m_pRecordSet->MoveFirst();
m_pRecordSet->MoveLast();
long count =m_pRecordSet->GetRecordCount();//Get number of records
this->OnGetdispinfoList( count, nField);
}
GetDlgItem(IDC_STRAT)->EnableWindow(FALSE);
this->Enable(TRUE);
}
更多精彩
赞助商链接