【導(dǎo)讀】覽器(如IE)即可運(yùn)行本系統(tǒng)，此系統(tǒng)具有很多優(yōu)點(diǎn),諸如功能完善，操作簡單，經(jīng)過認(rèn)真的考查分析，此系統(tǒng)的功能由四個模塊來具體實(shí)現(xiàn)：學(xué)。生信息管理模塊、學(xué)生成績管理模塊、考試管理模塊和用戶管理模塊。循了經(jīng)濟(jì)、高效、安全、穩(wěn)定、易操作、易維護(hù)和開放的程序設(shè)計原則。ActiveServerPages語言以及JavaScript腳本語言編程技術(shù)。

　　

【正文】 for (var i=0。i。i++){ var e=[i]。 if (==39。text39。){ =。 } } =Insert。 } } 學(xué)生成績查詢 該子模塊的功能由 , ScoreQuery1_1asp, 和ScoreQuery1_2． Asp 網(wǎng)頁來實(shí)現(xiàn)． 在網(wǎng)頁 中，選擇查詢方式，一種為按考試查詢，另一種按科目查詢．若選擇按考試查詢方式，點(diǎn)擊下一步按鈕，頁面轉(zhuǎn)向ScoreQuery1_1asp 網(wǎng)頁．若選擇按科目查詢，點(diǎn)擊下一步按鈕，頁面轉(zhuǎn)向ScoreQuery1_2asp 網(wǎng)頁．操作界面如下： 在網(wǎng)頁 ScoreQuery1_1asp 和網(wǎng)頁 ScoreQuery1_2． Asp分別顯示相應(yīng)查詢方式的查詢結(jié)果． 學(xué)生成績修改 /刪除 該子模塊由網(wǎng)頁, 來完成的 . 首先在網(wǎng)頁 中 ,先要查詢要修改 /刪除的記錄 ,在完成各項輸入后 ,點(diǎn)擊查詢按鈕 ,數(shù)據(jù)以表單的形成通過 POST 方法提交到 頁面 .在該頁面中 ,對數(shù)據(jù)庫進(jìn)行連接 ,根據(jù)接收到的數(shù)據(jù)參數(shù) ,對數(shù)據(jù)庫進(jìn)行查詢 ,返回查詢結(jié)果 ,并且以表格的形式顯示符合查詢條件的學(xué)生記錄 .然后選擇要修改 /刪除的記錄 ,若要對選擇的記錄進(jìn)行修改 ,則點(diǎn)擊修改按鈕 ,頁面轉(zhuǎn)向 ,在 網(wǎng)頁進(jìn)行修改的處理 。若要對選擇的記錄進(jìn)行刪除 ,則點(diǎn)擊刪除按鈕 ,系統(tǒng)提示是否確定刪除 ,若確定則頁面轉(zhuǎn)向 網(wǎng)頁處理 ,若取消 ,則不進(jìn)行操作 .操作界面如下： 實(shí)現(xiàn)修改和刪除學(xué)生成績的代碼是： % Dim Recordset1__MMColParam,Recordset2__MMColParam,Recordset3__MMColParam Dim strSheetName, strStudentNum, strName, strGrade, strClass strSheetName = Request(SheetName) Recordset2__MMColParam = Request(SheetName) Session(txtSheetName)=Request(SheetName) strStudentNum= Request(StudentNum) strGrade=Request(Grade) strClass=Request(ClassSelect) if then Session(strQureyString)= if then Session(strQureyString)= if (strStudentNum ) then Recordset3__MMColParam =strStudentNum else If len(Year(Now()))=2 Then NewYear=20 amp。 Year(Now()) Else NewYear=Year(Now()) End If If len(Month(Now()))=1 Then NewMonth=0 amp。 Month(Now()) Else NewMonth=Month(Now()) End If if NewMonth9 then strStudentNum=NewYearstrGrade1 else strStudentNum=NewYearstrGrade end if if strClass=All then strClass= if Len(strClass)=1 then strClass=0 amp。 strClass end if Recordset3__MMColParam =strStudentNum amp。 strClass end if % % set Recordset2 = () = MM_StudentConn_STRING = SELECT SheetName, TestName FROM TestName WHERE SheetName = 39。 + Replace(Recordset2__MMColParam, 39。, 39。39。) + 39。 = 0 = 2 = 3 () Recordset2_numRows = 0 % % set Recordset3 = () = MM_StudentConn_STRING = SELECT * FROM amp。 strSheetName amp。 WHERE StudentNum like 39。 amp。 Recordset3__MMColParam amp。 %39。 ORDER BY StudentNum = 0 = 2 = 3 () Recordset3_numRows = 0 % % Dim Repeat1__numRows Repeat1__numRows = 1 Dim Repeat1__index Repeat1__index = 0 Recordset3_numRows = Recordset3_numRows + Repeat1__numRows % function unselectall() { if(){ = amp。0。 } } function CheckAll(form) { for (var i=0。i。i++) { var e = [i]。 if ( != 39。chkAll39。) = 。 } } function ConfirmDel() { if(confirm(確定要刪除選中的記錄嗎 ？ 一 旦刪除將不能恢復(fù) ！ )) return true。 else return false。 } 計算總分與排名 該子模塊功能由網(wǎng)頁 , 和 負(fù)責(zé)完成的 . 在網(wǎng)頁 中 ,首先選擇考試 ,班級 ,查詢記錄的排序字段 ,在完成這一操作后 ,點(diǎn)擊確定按鈕 ,數(shù)據(jù)提交 ,并由頁面 負(fù)責(zé)處理 ,在 頁面中根據(jù)提交的數(shù)據(jù) ,進(jìn)行計算總分 ,平均分 ,級排名 ,班排名 .處理完畢之后 ,頁面轉(zhuǎn)向于 ,以表格的形式顯示計算總分和排名結(jié)果 .(如下圖 ) 目標(biāo)分管理 該子模塊的功能由網(wǎng)頁 .在網(wǎng)頁 中 , 首先 輸入查詢條件并選擇要進(jìn)行目標(biāo)分管理的科目 ,在完成此項操作后 ,點(diǎn)擊下一步按鈕 ,在提交數(shù)據(jù)之前 ,要檢查是否已選擇了科目 ,若未選擇 ,則提示進(jìn)行科目選擇 ,提交數(shù)據(jù) 由網(wǎng)頁 負(fù)責(zé)處理 .實(shí)現(xiàn)這一功能的主要代碼為 : function check() { var total=0。 var intmax=。 if(intmax1){ for(var idx=0。idxintmax。idx++){ if(eval([ + idx + ].checked)==true){ total+=1。 } } if(total==0){ alert(您未選擇任何科目 ！ )。 [0].focus()。 return false。 } } else{ if(==false){ alert(您未選擇任何科目 ！ )。 ()。 return false。 } } } 其中，學(xué)生成績查詢不需登錄即可使用，其他模塊 則需要先登錄后才能使用。 (三 )、 考試管理模塊 添加新考試 該子模塊的功能是由 網(wǎng)頁負(fù)責(zé)完成。 在網(wǎng)頁 中 ,輸入要添加新考試的名稱 ,數(shù)據(jù)庫中對應(yīng)的表名以及選擇科目 ,操作完畢之后 ,數(shù)據(jù)以表單的形式提交 ,在提交之前首先對提交的數(shù)據(jù)進(jìn)行檢查 ,檢驗數(shù)據(jù)是否正確 ,是否選擇了科目 .檢驗通過后交由程序MM_editAction 負(fù)責(zé)處理 . 對已有的考試信息進(jìn)行修改 /刪除 此子模塊的功能主要由網(wǎng)頁 . , . 在網(wǎng)頁 /刪除的考試 ,若要對已有的考試信息進(jìn)行修改 ,點(diǎn)擊對應(yīng)項中的修改按鈕 ,頁面轉(zhuǎn)向 ,在網(wǎng)頁 .若要進(jìn)行刪除 ,點(diǎn)擊對應(yīng)項中的刪除按鈕 ,頁面轉(zhuǎn)向 ,在此網(wǎng)頁中 ,若確認(rèn)刪除考試 ,則點(diǎn)擊確認(rèn)按鈕 ,轉(zhuǎn)向 .若不刪除則返回管理頁面 .實(shí)現(xiàn)上述功能的主要代碼為 : % if Request(SheetName) and request(ID) then 39。刪除記錄 MM_editConnection = MM_StudentConn_STRING MM_editQuery = delete from TestName where ID = amp。 request(ID) amp。 Set MM_editCmd = () = MM_editConnection = MM_editQuery 39。 刪除表 MM_DelConnection = MM_StudentConn_STRING MM_SheetName = Request(SheetName) MM_DelQuery = Drop Table amp。 MM_SheetName Set MM_DelCmd = () = MM_DelConnection = MM_DelQuery end if % 對考試科目進(jìn)行添加 /刪除 該子模塊功能由 .如下圖： 在網(wǎng)頁 ,可以進(jìn)行新考試科目的添加和刪除已有的考試科目 ,點(diǎn)擊相就的按鈕 ,通過 POST方法 ,交給程序 MM_editAction負(fù)責(zé)處理 ,進(jìn)行數(shù)據(jù)庫的操作 . (四 )、 用戶管理模塊 添加新用戶 此子模塊功能主要由 . 在網(wǎng)頁 ,進(jìn)行新用戶的添加 .當(dāng)對各項填入完畢之后 ,點(diǎn)擊添加用戶按鈕 ,在數(shù)據(jù)提交數(shù)據(jù)庫 之前 ,先對所填數(shù)據(jù)進(jìn)行檢驗 ,若不符合要求 ,則系統(tǒng)進(jìn)行提示 ,通過則提交數(shù)據(jù)庫 .主要代碼為 : function checkpwd(){ if(==) { alert(用戶名不能為空 ！ )。 ()。 return false。 } if(==) { alert(密碼不能為空 ！ )。 ()。 return false。 } if ( != ) { alert(兩次輸入的密碼不一樣！ )。 ()。 return false。 } } 對已有的用戶進(jìn)行更改用戶名、密碼和權(quán)限（管理員或普通用戶）等操作 此子模塊 功能由網(wǎng)頁 . 在 網(wǎng)頁 ,選擇要修改的已有用戶 ,點(diǎn)擊修改按鈕 ,則頁面轉(zhuǎn)向網(wǎng)頁 ,在此網(wǎng)頁中進(jìn)行修改 ,修改完成后 ,提交數(shù)據(jù)庫 ,提交之前要進(jìn)行檢驗 .其主要代碼為 : % 39。 *** Restrict Access To Page: Grant or deny access to this page MM_authorizedUsers=1 MM_authFailedURL= MM_grantAccess=false If Session(MM_UserName) Then If (false Or CStr(Session(MM_UserAuthorization))=) Or _ (InStr(1,MM_authorizedUsers,Session(MM_UserAuthorization))=1) Then MM_grantAccess = true End If End If If Not MM_grantAccess Then MM_qsChar = ? If (InStr(1,MM_authFailedURL,?) = 1) Then MM_qsChar = amp。 MM_referrer = (URL) if (Len(()) 0) Then MM_referrer = MM_referrer amp。 ? amp。 () MM_authFailedURL = MM_authFailedURL amp。 MM_qsChar amp。 accessdenied= amp。 (MM_referrer) (MM_authFailedURL) End If % % 39。 *** Edit Operations: declare variables MM_editAction = CStr(Request(URL)) If ( ) Then MM_edi