【正文】 /div/tdtddiv align=left class=style7。163。198。161。/div/tdtddiv align=left class=style7input name=xh type=text id=xh/div/td/trtrtddiv align=right class=style7209。163。186。161。/td/trtrtddiv align=right class=style1 style8209。/tdtd width=52 rowspan=11 valign=topamp。/tdtd width=219amp。/span/th/trtrtd width=133amp。188。179。201。209。178。nbsp。nbsp。211。237。194。216。161。234。180。238。162。197。208。249。171。235。)39。scj4 amp。,39。skc4amp。,39。scj3amp。,39。skc3amp。,39。scj2amp。,39。skc2amp。,39。scj1amp。,39。skc1amp。,39。sxqamp。,39。sxhamp。()dim sxh,sxq,skc1,scj1,skc2,scj2,skc3,scj3,skc4,scj4,strsqlsxh=trim((xh))sxq=trim((xq))skc1=trim((kc1))scj1=trim((cj1))skc2=trim((kc2))scj2=trim((cj2))skc3=trim((kc3))scj3=trim((cj3))skc4=trim((kc4))scj4=trim((cj4))strsql=insert into cjxx(xh,xq,kc1,cj1,kc2,cj2,kc3,cj3,kc4,cj4) values(39。：%if (xh) and (xq) and (kc1)and (cj1) and (kc2) and (cj2)and (kc3)and (cj3)and (kc4)and (cj4) thendim dbset db=() driver={microsoft access driver (*.mdb)}。()dim strsql,rsstrsql=select * from cjxxset rs=(strsql)%tr tddiv align=center class=style17學(xué)號/div/td tddiv align=centerspan class=style17學(xué)期/span/div/td tddiv align=center class=style17課程1/div/td tddiv align=center class=style17成績1/div/td tddiv align=center class=style17課程2/div/td tddiv align=center class=style17成績2/div/td tddiv align=center class=style17課程3/div/td tddiv align=center class=style17成績3/div/td tddiv align=center class=style17課程4/div/td tddiv align=center class=style17成績4/div/td tddiv align=center class=style17刪除/div/td tddiv align=center class=style17修改/div/td /tr % do while not % tr tddiv align=center class=style17%=rs(xh)%/div/td tddiv align=center class=style17%=rs(xq)%/div/td tddiv align=center class=style17%=rs(kc1)%/div/td tddiv align=center class=style17%=rs(cj1)%/div/td tddiv align=center class=style17%=rs(kc2)%/div/td tddiv align=center class=style17%=rs(cj2)%/div/td tddiv align=center class=style17%=rs(kc3)%/div/td tddiv align=center class=style17%=rs(cj3)%/div/td tddiv align=center class=style17%=rs(kc4)%/div/td tddiv align=center class=style17%=rs(cj4)%/div/td tddiv align=center class=style17a href=?=%=rs(id)%刪除/a/div/td tddiv align=center class=style17a href=?=%=rs(id)%修改/a/div/td /tr % loop % /table4．1．10學(xué)生的成績添加1. 添加名稱：學(xué)生課程添加模塊標(biāo)識： 模塊功能：通過表單將添加的學(xué)生的成績加入到學(xué)生的成績數(shù)據(jù)庫（）表中（cjxx）表的用戶名不能為空；添加成功后回到學(xué)生信息頁().編程語言：VBScript2 模塊接口：調(diào)用模塊名： 被調(diào)用的模塊名： 輸入的文件： (kcxx)使用的文件或數(shù)據(jù)庫標(biāo)識：使用主要內(nèi)存變量的名稱與類型：xh,xq,kc1,cj1,kc2,cj2,kc3,cj3,kc4,cj4 3 處理概要：，若其中的ＩＤ，班號、課程成績１、課程成績課程成績課程成績4。(strsql)%學(xué)生的成績頁%dim dbset db=() driver={microsoft Access driver (*.mdb)}。sidamp。()dim sid,strsqlsid=(id)strsql=delete from kcxx where id like 39。：% option explicit %%=truedim dbset db=() driver={microsoft Access driver (*.mdb)}。 39。 amp。 39。 amp。dbq= amp。nbsp。nbsp。39。 amp。dbq= amp。/a/div/td /tr /table /form/th4．1．8學(xué)生課程的修改1. 修改名稱：學(xué)生課程修改模塊標(biāo)識：模塊功能：通過表單將添加的學(xué)生信息加入到學(xué)生信息數(shù)據(jù)庫（）表中（kcxx）表的用戶名不能為空；添加成功后回到學(xué)生信息頁().編程語言：VBScript2 模塊接口：調(diào)用模塊名： 被調(diào)用的模塊名： 輸入的文件： (kcxx)使用的文件或數(shù)據(jù)庫標(biāo)識：使用主要內(nèi)存變量的名稱與類型：bh,xq,kc1,kc2,kc3,kc43 處理概要：，若其中的ＩＤ，班號、課程課程課程課程4都不為空，建立記錄集對象，指定相關(guān)屬性，打開記錄集，通過記錄集對象的修改記錄到數(shù)據(jù)庫表中。187。 a href=189。/div/td td align=left input name=kc4 type=text id=kc4 /td /tr tr td colspan=2div align=center class=style1 input type=submit name=Submit value=204。4163。179。/div/td td align=left input name=kc3 type=text id=kc3 /td /tr tr tddiv align=right class=style1191。3163。179。/div/td td align=left input name=kc2 type=text id=kc2 /td /tr tr tddiv align=right class=style1191。2163。179。/div/td td align=left input name=kc1 type=text id=kc1 /td /tr tr tddiv align=right class=style1191。1163。179。/div/td td align=left input name=xq type=text id=xq /td /tr tr tddiv align=right class=style1191。163。198。/div/td td align=left input name=bh type=text id=bh /td /tr tr tddiv align=right class=style1209。163。188。/span/th /tr tr tddiv align=right class=style1176。179。191。188。204。/p table width=364 height=291 border=1 cellpadding=0 cellspacing=1 bordercolor=FFFFFF tr th colspan=2 scope=colspan class=style1199。/p pamp。 end if%th width=617 scope=colform name=form1 method=post action= pamp。188。204。208。 214。163。213。205。208。204。207。208。211。203。189。 strsql(strsql)