【正文】 user_numberamp。)/script else rs1(user_number)=user_number rs1(user_name)=user_name rs1(user_dep)=user_dep rs1(user_major)=user_major rs1(user_class)=user_class rs1(testno)=testno rs1(subject)=subject rs1(total_ach)=total_ach set rs1=nothing script language=39。 sql,conn,1,3 % % rs(user_number)=user_number rs(user_name)=user_name rs(user_dep)=user_dep rs(user_major)=user_major rs(user_class)=user_class rs(testno)=testno rs(subject)=subject rs(ach)=ach set rs=nothing % % set rs1=() sql1=select * from total_ach where user_number=39。 charset=gb2312 meta name=GENERATOR content=Microsoft FrontPage meta name=ProgId content= title添加考試成績 /title link rel=stylesheet href= /head body topmargin=0 !include file= div align=center center table width=750 height=35 align=center bgcolor=EEFFFF td a href=考試成績列表 /a a href=添加考試成績 /a a href=添加考試場次 /a a href= 考 試 成 績 查 詢 /a a href=補(bǔ)考重修查詢 /a a href=單科成績排序 /a a href= 總 分 成 績 排 序 /a a href=考試成績分析 /a/table /center /div div align=center center table border=0 width=500 cellspacing=0 cellpadding=0 tr td width=100% form method=POST name=frm_post action= table width=750 border=0 align=center cellpadding=5 cellspacing=0 bordercolorlight=000000 bordercolordark=FFFFFF bgcolor=D9ECFF tr bgcolor=B9DCFF td width=750 colspan=2 p align=center添加考試成績 /td /tr tr bgcolor=C8E3FF td width=750 colspan=2 p align=center(注意：請先選擇系部、專業(yè)、班級，然后輸入其他信息 )/td /tr tr td width=375 align=right學(xué)號： /td td width=375 align=leftinput type=text name=user_number size=20/td /tr tr td width=375 align=right姓名： /td td width=375 align=leftinput type=text name=user_name size=20/td /tr tr td width=375 align=right系部： /td td width=375 align=left %set rs3=()% %sql3=select * from dep% % sql3,conn,1,1% select size=1 name=stdep onchange=change() option 請選擇 /option % do while not % option % if trim(request(stdep))=trim(rs3(stdep)) then selected end if % value=%=rs3(stdep)%%=rs3(stdep)%/option %% %loop% %% /select/td /tr tr td width=375 align=right專業(yè)： /td td width=375 align=left % if request(stdep) then % select size=1 name=stmajor onchange=change1() option 請選擇 /option %do while not % option %if trim(request(stmajor))=trim(myrs(stmajor)) then selected end if % value=%=myrs(stmajor)%%=myrs(stmajor)%/option % loop else set rs3=()% % sql3=select * from major % % sql3,conn,1,1%select size=1 name=stmajor option 請選擇 /option %do while not % option value=%=rs3(stmajor)%%=rs3(stmajor)%/option %% %loop% % end if % /select/td /tr tr td width=375 align=right班級： /td td width=375 align=left % if request(stmajor) and request(qq)=2 then if not then % select size=1 name=stclass onchange=change1() option 請選擇 /option %do while not % option %if request(stclass)=myrs1(stclass) then selected end if % value=%=myrs1(stclass)%%=myrs1(stclass)%/option % loop end if else set rs3=()% %sql3=select * from class% % sql3,conn,1,1%select size=1 name=stclass option 請選擇 /option %do while not % option value=%=rs3(stclass)%%=rs3(stclass)%/option %% %loop% % end if % /select/td /tr tr td width=375 align=right學(xué)期： /td td width=375 align=leftinput type=text name=testno size=20/td /tr tr td width=375 align=right課程： /td td width=375 align=leftinput type=text name=subject size=20/td /tr tr td width=375 align=right成績： /td td width=375 align=leftinput type=tex