【正文】 nsert into student(studentname,studentpassword) values(39。 amp。 cstr(trim(request(studentname))) amp。 39。,39。 amp。 cstr(trim(request(studentpassword))) amp。 39。) sql if 0 then 數(shù)據(jù)庫(kù)操作出錯(cuò): + else % script language=vbscript msgbox 操作成功!新用戶(hù) %=trim(request(studentname))% 的信息添加成功! /script %end ifend ifif request(action)=del then 39。刪除用戶(hù) sql=delete from student where id= amp。request(id) sql if 0 then 數(shù)據(jù)庫(kù)操作錯(cuò)誤： + else % script language=vbscript msgbox 操作成功!用戶(hù) %=trim(request(studentname))% 的信息已刪除! /script% end ifend if%htmlheadtitle管理學(xué)生在基于Internet考試系統(tǒng)/titlescript language=javascriptfunction SureDel(id){ if ( confirm(您確定要?jiǎng)h除該用戶(hù)嗎？)) { = ?action=delamp。id= +id }} 圖48 學(xué)生管理頁(yè)面 % dim isedit 39。是否在編輯狀態(tài)dim color 39。表格顏色dim id,name39。定義變量，用戶(hù)的iddim sql,rs,rsccolor=1isedit=falseif request(action)=edit then isedit=trueend ifif request(action)=edit then 39。修改管理員 if trim(request(password))= then 錯(cuò)誤!密碼不能為空! a href=返回/a end if sql=update admin set name=39。 amp。 cstr(trim(request(name))) amp。 39。,password=39。 amp。 cstr(trim(request(password))) sql if 0 then 數(shù)據(jù)庫(kù)操作出錯(cuò): + else % script language=vbscript msgbox 操作成功!管理員%=trim(request(name))%的信息已經(jīng)更新! /script %end ifend ifif request(action)=add then 39。添加新管理員 if trim(request(name))= or trim(request(password))= then 錯(cuò)誤!用戶(hù)名或密碼不能為空! a href= onclick=39。javascript:(1)39。返回/a end if set rs=() 39。檢查學(xué)生是否重名 select * from admin where name=39。 amp。 cstr(trim(request(name))) amp。 39。,conn,1,1 if 0 then 數(shù)據(jù)庫(kù)出錯(cuò) else if not and not then 錯(cuò)誤!該管理員存在! a href= onclick=39。javascript:(1)39。返回/a end if end if set rs=nothing sql=insert into admin(name,password) values(39。 amp。 cstr(trim(request(name))) amp。 39。,39。 amp。 cstr(trim(request(password))) amp。 39。) sql if 0 then 數(shù)據(jù)庫(kù)操作出錯(cuò): + else % script language=vbscript msgbox 操作成功!新管理員%=trim(request(name))%的信息添加成功! /script %end ifend ifif request(action)=del then 39。刪除管理員 sql=delete from admin where id= amp。request(id) sql if 0 then 數(shù)據(jù)庫(kù)操作錯(cuò)誤： + else % script language=vbscript msgbox 操作成功!管理員%=trim(request(name))% 的信息已刪除! /script% end ifend if% 圖49 管理員管理頁(yè)面 % dim isedit 39。是否在編輯狀態(tài)dim id,subjectname39。定義變量，科目的iddim sql,rs,rscisedit=falseif request(action)=edit then isedit=trueend ifif request(action)=modify then 39。修改用戶(hù) if trim(request(subjectname))= or trim(request(testtime))= or trim(request(multinumber))=or trim(request(multiper))=or trim(request(singlenumber))=or trim(request(singleper))=then 錯(cuò)誤!請(qǐng)正確填寫(xiě)各項(xiàng)，且不能為空! a href=返回/a end if sql=update subject set subjectname=39。 amp。 cstr(trim(request(subjectname))) amp。 39。,testtime= amp。 cstr(trim(request(testtime)))amp。,amp。cstr(trim(request(singlenumber))) amp。 , amp。 cstr(trim(request(singleper))) amp。 , amp。 cstr(trim(request(multinumber))) amp。 , amp。 cstr(trim(request(multiper))) sql if 0 then 數(shù)據(jù)庫(kù)操作出錯(cuò): + else % script language=vbscript msgbox 操作成功!%=trim(request(subjectname))%科目的信息已經(jīng)更新! /script %end ifend ifif request(action)=add then 39。添加新用戶(hù) if trim(request(subjectname))= or trim(request(testtime))= or trim(request(multinumber))=or trim(request(multiper))=or trim(request(singlenumber))=or trim(request(singleper))=then 錯(cuò)誤!科目名或密碼以及其余各項(xiàng)不能為空! a href= onclick=39。javascript:(1)39。返回/a end if set rs=() 39。檢查科目名是否重名 select * from subject where subjectname=39。 amp。 cstr(trim(request(subjectname))) amp。 39。,conn,1,1 if 0 then 數(shù)據(jù)庫(kù)出錯(cuò) else if not and not then 錯(cuò)誤!該科目已經(jīng)存在! a href= onclick=39。javascript:(1)39。返回/a end if end if set rs=nothing sql=insert into subject(subjectname,testtime,singlenumber,singleper,multinumber,multiper) values(39。 amp。 cstr(trim(request(subjectname))) amp。 39。, amp。 cstr(trim(request(testtime))) amp。 , amp。 cstr(trim(request(singlenumber))) amp。 , amp。 cstr(trim(request(singleper))) amp。 , amp。 cstr(trim(request(multinumber))) amp。 , amp。 cstr(trim(request(multiper))) amp。 ) sql if 0 then 數(shù)據(jù)庫(kù)操作出錯(cuò): + else % script language=vbscript msgbox 操作成功!新科目%=trim(request(subjectname))%的信息添加成功! /script %end ifend ifif request(action)=del then 39。刪除用戶(hù) sql=delete from subject where id= amp。request(id) sql if 0 then 數(shù)據(jù)庫(kù)操作錯(cuò)誤： + else % script language=vbscript msgbox 操作成功!科目%=trim(request(subjectname))%的信息已刪除! /script% end ifend if%htmlheadmeta equiv=ContentType content=text/html。charset=gb2312title管理科目基于Internet考試系統(tǒng)/titlescript language=javascriptfunction SureDel(id){ if ( confirm(您確定要?jiǎng)h除該科目嗎？)) { = ?action=delamp。id= +id }} 圖410 科目管理頁(yè)面 基于Internet考試系統(tǒng)經(jīng)過(guò)系統(tǒng)功能分析，可行性研究，需求分析三個(gè)階段，基本了解了該系統(tǒng)的功能要求及設(shè)計(jì)的可行性。通過(guò)總體設(shè)計(jì)、詳細(xì)設(shè)計(jì)、編碼三個(gè)階段，基本實(shí)現(xiàn)了考試系統(tǒng)遠(yuǎn)程注冊(cè)，考試，系統(tǒng)管理等預(yù)定要求，最后將所有模塊組裝成一個(gè)完整的系統(tǒng)。經(jīng)過(guò)測(cè)試，系統(tǒng)實(shí)現(xiàn)了需求分析中的所有要求，運(yùn)行正常，操作界面簡(jiǎn)潔。 結(jié)束語(yǔ)經(jīng)過(guò)近2個(gè)月的畢業(yè)課題的設(shè)計(jì)， 我從其中學(xué)到許多在真正實(shí)際的軟件開(kāi)發(fā)過(guò)程中才能夠涉及到的各種各樣簡(jiǎn)單的也有復(fù)雜的問(wèn)題。在這次畢業(yè)課題的設(shè)計(jì)過(guò)程中，我不僅僅只是單純的拓寬了我的專(zhuān)業(yè)知識(shí)面，更重要的是它提高了我各方面的能力。當(dāng)我在進(jìn)行程序設(shè)計(jì)時(shí)，忽然涉及到了我從來(lái)都不了解的問(wèn)題，甚至是根本就沒(méi)有聽(tīng)說(shuō)過(guò)的新概念或者是新技術(shù)，這時(shí)我必須去教科書(shū)或是一些相關(guān)的電子書(shū)店查找與這個(gè)問(wèn)題相關(guān)的圖書(shū)資料，也會(huì)通過(guò)國(guó)際互聯(lián)網(wǎng)查找我所需要的內(nèi)容。在這一過(guò)程中，慢慢的鍛煉了我在多如大海的各種類(lèi)型的資料中查詢(xún)我所需要的材料的能力。在以前學(xué)習(xí)課程的時(shí)間里，我很少會(huì)這樣體驗(yàn)如何去查找自己需要的資料，如今才知道在浩瀚的知識(shí)里要想找到我真正需要的東西也并非是一件易事。本系統(tǒng)的設(shè)計(jì)是我真正獨(dú)自負(fù)責(zé)了一個(gè)實(shí)際項(xiàng)目從需求分析、設(shè)計(jì)到系統(tǒng)完成測(cè)試、編寫(xiě)論文的整個(gè)軟件開(kāi)發(fā)過(guò)程。 參考文獻(xiàn)[1] 葛艷玲 .《網(wǎng)頁(yè)制作基礎(chǔ)教程（Dreamweaver ）（第二版）》.電子工業(yè)出版社， 2009 [2] 科教工作室.《學(xué)以致用：Access 2007數(shù)據(jù)庫(kù)應(yīng)用》.清華大學(xué)出版社，2008[3] 季久