【文章內(nèi)容簡(jiǎn)介】 =trim((mm)) strsql=insert into yhxx(yhm,mm) values(39。 amp。 syhmamp。 39。,39。 amp。 smm amp。 39。) 39。 strsql (strsql) else 請(qǐng)把信息填寫(xiě)完整 161。 重新填寫(xiě) end if % 4． 1． 2 用戶(hù)登錄 模塊詳細(xì)設(shè)計(jì) 1. 登錄名稱(chēng)：用戶(hù)登錄 模塊標(biāo)識(shí)： 模塊功能：通過(guò)表單將輸入的用戶(hù)名和密碼加入到用戶(hù)數(shù)據(jù)庫(kù)（ ）表中（ yhxx）表的用戶(hù)名不能為空；登錄成功后回到首頁(yè) (). 編程語(yǔ)言： VBScript 2 模塊接口： 調(diào)用模塊名： 被調(diào)用的模塊名： 輸入的文件： 輸出的文件： (yhxx) 使用的文件或數(shù)據(jù)庫(kù)標(biāo)識(shí)： 使用主要內(nèi)存變量的名稱(chēng)與類(lèi)型： yhm,mm 3 處理概要 ： 通過(guò) 中的表單輸入數(shù)據(jù)，若其中的 用戶(hù) 內(nèi)容、 用戶(hù) 不為空，建立記錄集對(duì)象，指定相關(guān)屬性，打開(kāi)記錄集，通過(guò)記錄集對(duì)象的記錄和數(shù)據(jù)庫(kù)表中條件比較，然后返回 。 : % dim db,strsql,rs,strsql1,rs1 set db=() driver={microsoft Access driver (*.mdb)}。dbq= amp。() if trim(request(yhm1)) and trim(request(mm1)) then strsql1=select * from yhxx where yhm=39。amp。request(yhm1)amp。39。 and mm=39。amp。request(mm1)amp。39。 set rs1=(strsql1) if not and not then session(id)=rs1(id) else 對(duì)不起，密碼不正確，請(qǐng)重新輸入 end if end if % tr th width=164 height=204 align=left valign=top scope=colform action= method=post name=bd id=bd table width=96% height=153 border=1 align=center cellpadding=0 cellspacing=0 bordercolor=0084A5 bgcolor=F4F4F4 tr bordercolor=F4F4F4 td colspan=2div align=center class=style1 style1 style31 style19用戶(hù)登錄/div/td /tr tr bordercolor=F4F4F4 td width=34%div align=right class=style32姓名： /div/td td width=66%input name=yhm1 type=text id=yhm1 size=12/td /tr tr bordercolor=F4F4F4 tddiv align=right class=style32密碼： /div/td tdinput name=mm1 type=password id=mm1 size=12/td /tr tr bordercolor=F4F4F4 td colspan=2div align=right /div div align=center input name=tj2 type=submit id=tj22 value=提交 input name=ct2 type=reset id=ct22 value=重填 /div/td /tr /table /form /th 4． 1． 3 管理員登錄 模塊 模塊詳細(xì)設(shè)計(jì) 1 登錄名稱(chēng)：管理員登錄 模塊標(biāo)識(shí) ： 模塊功能：通過(guò)表單將輸入的用戶(hù)名和密碼加入到管理員數(shù)據(jù)庫(kù)（ ）表中（ gly）表的用戶(hù)名不能為空；登錄成功后回到管理員頁(yè)(). 編程語(yǔ)言： VBScript 2 模塊接口： 調(diào)用模塊名： 被調(diào)用的模塊名： ( , 輸入的文件： 輸出的文件： ( (gly) 使用的文件或數(shù)據(jù)庫(kù)標(biāo)識(shí)： 使用主要內(nèi)存變量的名稱(chēng)與類(lèi)型： yhm,mm ： 4 處理概要 ： 通過(guò) 中的表單輸入數(shù)據(jù)，若其中的 用戶(hù) 內(nèi)容、 密碼 不為空，建立記錄集對(duì)象，指定相關(guān)屬性，打開(kāi)記錄集，通過(guò)記錄集對(duì)象的記錄和數(shù)據(jù)庫(kù)表中條件比較，然后返回 。 : % dim db,strsql,rs set db=() driver={microsoft Access driver (*.mdb)}。dbq= amp。() if trim(request(yhm)) and trim(request(mm)) then strsql=select * from kly where yhm=39。amp。request(yhm)amp。39。 and mm=39。amp。request(mm)amp。39。 set rs=(strsql) if not and not then session(id)=rs(id) else 對(duì)不起，密碼不正確，請(qǐng)重新輸入 end if end if form action= method=post name=bd id=bd table width=71% height=160 border=0 align=center cellpadding=0 cellspacing=0 bgcolor=4AB6F0 tr td colspan=2div align=center class=style1 style1管理員登 錄 /div/td /tr tr td width=34%div align=right class=style2姓名： /div/td td width=66%input name=yhm type=text id=yhm2 size=12/td /tr tr tddiv align=right class=style2密碼： /div/td tdinput name=mm type=password id=mm2 size=12/td /tr tr td colspan=2div align=right /div div align=center input name=tj type=submit id=tj2 value=提交 input name=ct type=reset id=ct3 value=重填 a href= class=style2取消 /a/div/td /tr /table /form /div/th /tr /table /td 4． 1． 4 學(xué)生信息系統(tǒng)編輯 模塊 模塊詳細(xì)設(shè)計(jì) 主要代碼： % dim db set db=() driver={microsoft Access driver (*.mdb)}。dbq= amp。() dim strsql,rs strsql=select * from xsxx set rs=(strsql) % /tr tr tddiv align=center class=style17學(xué)號(hào) /div/td tddiv align=center class=style17姓名 /div/td tddiv align=center class=style17性別 /div/td tddiv align=center class=style17出生日期 /div/td tddiv align=center class=style17班級(jí) /div/td tddiv align=center class=style17民族 /div/td tddiv align=center class=style17政治面貌 /div/td tddiv align=center class=style17家庭地址 /div/td tddiv align=center class=style17電話 /div/td tddiv align=center class=style17簡(jiǎn)介 /div/td tddiv align=center class=style17刪除 /div/td tddiv align=center class=style17修改 /div/td /tr % do while not % tr td height=18div align=center class=style17%=rs(xh)%/div/td tddiv align=center class=style17%=rs(xm)%/div/td tddiv align=center class=style17%=rs(xb)%/div/td tddiv align=center class=style17%=rs(born)%/div/td tddiv align=center class=style17%=rs(bh)%/div/td tddiv align=center class=style17%=rs(mz)%/div/td tddiv align=center class=style17%=rs(zzmm)%/div/td tddiv align=center class=style17%=rs(jd)%/div/td tddiv align=center class=style17%=rs(dh)%/div/td tddiv align=center class=style17%=rs(jl)%/div/td tddiv align=center class=style17a href=刪除 /a/div/td tddiv align=center class=style17a href=修改 /a/div/td /tr % loop % 4． 1． 5 學(xué)生信息系統(tǒng)添加 模塊 模塊詳細(xì)設(shè)計(jì) 1. 添加名稱(chēng)：學(xué)生信息添加 模塊標(biāo)識(shí)： 模塊功能：通過(guò)表單將添加的學(xué)生信息加入到學(xué)生信息數(shù)據(jù)庫(kù)（ ）表中（ xsxx）表的用戶(hù)名不能為空；添加成功后回到學(xué)生信息頁(yè) (). 編程語(yǔ)言： VBScript 2 模塊接口： 調(diào)用模塊名： 被調(diào)用的模塊名： 輸入的文件： 輸出的文件： (xsxx) 使用的文件或數(shù)據(jù)庫(kù)標(biāo)識(shí)： 使 用 主 要 內(nèi) 存 變 量 的 名 稱(chēng) 與 類(lèi) 型 ：xh,xm,xb,born,zy,zzmm,mz,jd,dh,jl,mm 3 處理概要 ： 通過(guò) 中的表單輸入數(shù)據(jù)，若其中的姓名、性別、出生日期、學(xué)號(hào)、家庭地址、專(zhuān)業(yè)、班級(jí)、電話、政治面貌、個(gè)人簡(jiǎn)介、密碼都不為空，建立記錄集對(duì)象，指定相關(guān)屬性，打 開(kāi)記錄集，通過(guò)記錄集對(duì)象的添加記錄到數(shù)據(jù)庫(kù)表中，然后返回 。 ： % option explicit % html head % if (xh) and (xm) and (xb) and (born) and (bh) and (mz) and (zzmm) and (jd)then dim db set db=() driver={microsoft access driver (*.mdb)}。dbq= amp。() dim sbh,sxb,sxh,sxm,smz,sborn,szzmm,sjd,sdh,sjl,strsql sxh=trim((xh)) sxm=trim((xm)) sbh=trim((bh)) sxb=trim((xb)) sborn=trim((born)) smz=trim((mz)) szzmm=trim((zzmm)) sjd=trim((jd)) sdh=trim((dh)) sjl=trim((jl)) strsql=insert into xsxx(xh,xm,xb,born,bh,mz,zzmm,jd,dh,jl) values(39。 amp。 sxhamp。 39。,39。 amp。 sxm amp。 39。,39。 amp。 sxb amp。 39。, 39。amp。sbornamp。39。 ,39。 amp。 sbh amp。 39。,39。 amp。 smz amp。 39。,39。 amp。 szzmm amp。 39。,39。 amp。 sjd amp。 39。,39。 amp。 s