【文章內(nèi)容簡介】 if shengsj=trim(rs1(sheng)) then selected end if amp。rs1(sheng)amp。/option next end if % /select /fontamp。nbsp。select name=dq id=dq % 39。如果是第一次打開就將默認(rèn)的省值賦值給變量shengsj if shengsj= and edit= then dim rs4 sql=select * from sheng set rs4=() sql,conn,1,1 if not and not then shengsj=rs4(sheng) end if set rs4=nothing end if dim rs3 sql=select * from dq where sheng=39。amp。shengsjamp。39。 set rs3=() sql,conn,1,1 do while not option value=amp。rs3(dq) if dqsj then if dqsj=trim(rs3(dq)) then selected end if amp。rs3(dq)amp。/option loop set rs3=nothing % /selectamp。nbsp。 select name=shi id=shi % 39。如果是第一次打開就將默認(rèn)的省值賦值給變量dqsj if dqsj= and edit= then sql=select * from dq where sheng=39。amp。shengsjamp。39。 set rs4=() sql,conn,1,1 if not and not then dqsj=rs4(dq) end if set rs4=nothing end if sql=select * from shi where sheng=39。amp。shengsjamp。39。 and dq=39。amp。dqsjamp。39。 set rs3=() sql,conn,1,1 do while not option value=amp。rs3(shi) amp。rs3(shi)amp。/option loop set rs3=nothing %/selectamp。nbsp。 script language=vbscript sub sheng_onchange() dim frmtmp set frmtmp= =yes () end sub sub dq_onchange() dim frmtmp set frmtmp= =yes () end sub /scriptinput type=hidden name=shengbz input type=hidden name=dqbz /td /tr tr td width=38% height=22 align=right valign=middle姓amp。nbsp。amp。nbsp。 名：/td td width=1% align=right valign=middle　/td td width=61% height=22 align=left valign=middleinput name=xm type=text id=xm size=9 maxlength=8 font color=FF0000**/font/td /tr tr td height=22 align=right valign=middle性amp。nbsp。amp。nbsp。 別：/td td height=22 align=right valign=middle　/td td height=22 valign=middle align=leftfont color=FF0000 select name=xb size=1 option value=男男/option option value=女女/option /select ** /font/td /tr tr td height=22 align=right valign=middle考生考號：/td td height=22 align=right valign=middle　/td td height=22 valign=middle align=leftinput name=ygh type=text id=gwmc4 size=20 maxlength=8 font color=FF0000**即學(xué)號，為兩位，如010/font/td /tr tr td height=22 align=right valign=middle考生密碼：/td td height=22 align=right valign=middle　/td td height=22 valign=middle align=leftinput name=ksmm type=password id=gwmc3 size=20 maxlength=10 font color=FF0000**/font/td /tr tr td height=22 align=right valign=middle確認(rèn)密碼：/td td height=22 align=right valign=middle　/td td height=22 valign=middle align=leftinput name=ksmm1 type=password id=gwmc4 size=20 maxlength=10 font color=FF0000**/font/td /tr tr td height=22 align=right valign=middle身份證號碼：/td td height=22 align=right valign=middle　/td td height=22 valign=middle align=leftinput name=sfzh type=text id=gwmc2 size=30 maxlength=18 font color=FF0000**為15位或18位/font/td /tr tr td height=22 align=right valign=middle入學(xué)年份：/td td height=22 align=right valign=middle　/td td height=22 valign=middle align=leftinput name=rslf type=text id=gwmc1 size=20 maxlength=4 font color=FF0000**/font/td /tr tr td height=23 align=right valign=middlediv align=right 所考科目：/div/td td height=23 align=right valign=middle　/td td height=23 valign=middle align=leftfont color=FF0000 select size=1 name=gwmc % set gwmcrs=() gwmcsql=select * from gwmc gwmcsql,conn,1,1 if not and not then for i=1 to if then exit for option value=amp。gwmcrs(gwmc) amp。gwmcrs(gwmc)amp。/option next end if set gwmcrs=nothing % /select **/font/td /tr tr td height=23 align=right valign=middle聯(lián)系電話：/td td height=23 align=right valign=middle　/td td height=23 valign=middle align=leftinput name=zz type=text id=gwmc0 size=30 maxlength=50 font color