【正文】 collegeInfoRs(collegeName) amp。 39。 amp。add39。 39。specialFieldName= amp。 /tdtda href=39。 /tdtd amp。 FONTFAMILY: 宋體專業(yè)信息管理/td/trtrtd學(xué)院/tdtd專業(yè)/tdtd操作/td/tr% sql = select * from specialFieldInfo set specialFieldRs = (sql) while not trtd amp。/script end if end if % style type=text/css! import url()。添加成功39。)。) (sql) if 0 then scriptalert(39。 collegeName amp。,39。 specialFieldName amp。/script end if elseif action = add then specialFieldName = Request(specialFieldName) collegeName = Request(collegeName) sql = insert into specialFieldInfo(specialFieldName,collegeName) values (39。刪除成功!39。 39。 amp。)。 set studentInfoRs = (sql) if not then scriptalert(39。 specialFieldName amp。取得要?jiǎng)h除的專業(yè)名稱 sql = select * from studentInfo where studentSpec = 39。input type=reset value=取消/td/tr input type=hidden name=evaluationId value=%=rs(evaluationId)% /form/tablebr/BODY/HTML：（實(shí)現(xiàn)系統(tǒng)退出功能）! include file= %session(username)= %：（專業(yè)設(shè)置代碼）!include file=% on error resume next dim action,specialFieldName,collegeName action = Request(action) 39。amp。textarea cols=40 rows=5 name=evaluation%=rs(evaluation)%/textarea/td/tr trtd colspan=2 align=centerinput type=submit name=submit value=更新amp。amp。 size=10分(滿分100分)/td/tr trtd width=100 align=right對(duì)該生評(píng)價(jià):/tdtdamp。input type=text name=practiceScore value=39。amp。 size=10分(滿分100分)/td/tr tr class=a3td width=100 align=right創(chuàng)新與實(shí)踐素質(zhì)分:/tdtdamp。input type=text name=humanityScore value=39。amp。 size=10分(滿分100分)/td/tr tr class=a3td width=100 align=right人文素質(zhì)分:/tdtdamp。input type=text name=healthScore value=39。amp。 size=10分(滿分100分)/td/tr tr class=a3td width=100 align=right身體素質(zhì)分:/tdtdamp。input type=text name=theoryScore value=39。amp。 size=10分(滿分100分)/td/tr tr class=a3td width=100 align=right專業(yè)理論素質(zhì)分:/tdtdamp。input type=text name=moralScore value=39。amp。%=rs(termName)%/td/tr tr class=a3td width=100 align=right思想道德素質(zhì)分:/tdtdamp。amp。%=rs(studentName)%/td/tr trtd width=100 align=right學(xué)期:/tdtdamp。amp。%=rs(studentNumber)%/td/tr trtd width=100 align=right姓名:/tdtdamp。amp。fontsize:14px colspan=8img src=images/ border=0 hspace=2 align=absmiddle綜合測(cè)評(píng)信息修改 font size=1(帶*號(hào)的為必填項(xiàng))/font/th /tr trtd width=100 align=right學(xué)號(hào):/tdtdamp。fontsize:12px。 evaluationId set rs = (sqlString)%table width=600 border=0 cellpadding=0 cellspacing=0 align=center form action= method=post name=form1 onsubmit=return chkForm()。 charset=gb2312style type=text/css! import url()。測(cè)評(píng)信息更新成功!39。信息更新時(shí)發(fā)生了錯(cuò)誤!39。 where evaluationId= amp。 evaluation amp。 ,evaluation=39。 ,integrateScore= sqlString = sqlString amp。 ,practiceScore= sqlString = sqlString amp。 ,humanityScore= sqlString = sqlString amp。 ,healthScore= sqlString = sqlString amp。 ,theoryScore= sqlString = sqlString amp。然后將學(xué)生綜合測(cè)評(píng)信息加入到數(shù)據(jù)庫(kù)中 sqlString = update [evaluationInfo] set moralScore= sqlString = sqlString amp。取得對(duì)該學(xué)期該生的評(píng)價(jià) 39。取得人文素質(zhì)分?jǐn)?shù) practiceScore = CSng(Request(practiceScore)) 39。取得專業(yè)理論分?jǐn)?shù) healthScore = CSng(Request(healthScore)) 39。取得該考評(píng)記錄編號(hào) moralScore = CSng(Request(moralScore)) 39。對(duì)不起，當(dāng)前沒(méi)有符合條件的測(cè)評(píng)信息供/center end if%(學(xué)生信息維護(hù))% if session(username)= then end if%!include file=% dim evaluationId,moralScore,theoryScore,healthScore,praticeScore,integrateScore,evaluation,sqlString dim errMessage 39。%=rs(evaluation)%/td /tr % end if % trtd colspan=3 height=20/td/tr% if Then Exit For end if Next %/table% if ipageCount then%hr align=center width=90% size=1 noshade class=NOPRINT !分頁(yè)div class=PageNext/div% end if Next else center class=39。%=rs(integrateScore)%/td /tr % if rs(evaluation) then % tr td colspan=3對(duì)該生評(píng)價(jià):amp。%=rs(termName)%/td td colspan=2綜合素質(zhì)分:amp。%=rs(specialFieldName)%/td /tr tr td所評(píng)學(xué)期:amp。%=rs(studentName)%/td td專業(yè):amp。%=rs(studentNumber)%/td td姓名:amp。當(dāng)前第%=i%頁(yè)/共%=%頁(yè)/td/tr % = i for j=1 to % tr td學(xué)號(hào):amp。amp。設(shè)置每頁(yè)查詢的學(xué)生信息條數(shù) pageCount = For i = 1 To pageCount % brtable width=600 border=0 align=center cellpadding=2 cellspacing=0 class=tabp trtd colspan=3 align=right每頁(yè)%=%條記錄/共%=%條記錄amp。 39。 amp。 end if if Request(specialFieldName) then sqlString = sqlString amp。 Request(keyword) amp。 like 39。 and amp。 specialFieldInfo(specialFieldName) amp。 39。 amp。nbsp。nbsp。 th height=30 style=color:ffffff。 bordercolor=F0F0F0 class=NoPrint tr class=a1 style=color:ffffff。 cellspacing=39。 align=center cellpadding=39。 }}/script/headBODYtable width=600 border=39。 i 。/stylescriptfunction menu(t){var aChildren = eval()。input type=submit value=查詢 /td /tr /form/table %else% tr td align=center colspan=6 對(duì)不起，還沒(méi)有記錄！ /td %end if% /tr/tablebr/BODY/HTML:(學(xué)生測(cè)評(píng)信息查詢)% if session(username) = then end if%!include file=HTMLHEAD Title測(cè)評(píng)信息查詢大學(xué)生綜合素質(zhì)測(cè)評(píng)信息管理系統(tǒng)/Title META equiv=ContentType content=text/html。顯示輸入頁(yè)數(shù)框并將pageno參數(shù)傳遞下去% input type=hidden name=searchWay value=%=Request(searchWay)% input type=hidden name=keyword value=%=Request(keyword)% 第%=currentpage%頁(yè)/共%=%頁(yè) 總記錄:%=% /td /tr /form/tabletable align=center width=600 border=0 cellspacing=0 cellpadding=0 form action= tr td colspan=2信息查詢: select name=searchway option value=請(qǐng)選擇查詢方式請(qǐng)選擇查詢方式/option option value=studentNumber按學(xué)號(hào)查詢/option option value=studentName按姓名查詢/option /select 關(guān)鍵字:input type=text