【正文】 p。 amp。 pass1 amp。dbq= amp。 session(teacher) amp。 nick amp。 sex amp。 age amp。 idcard amp。 diploma amp。 39。 39。 39。 39。 amp。 amp。 amp。 5． 4． 2 IPO 圖 輸入（ I）：?jiǎn)螕魧?dǎo)航條“家教信息”鏈接 處理描述（ P）：①?gòu)?teacherinfo 表中查詢家教發(fā)布的信息內(nèi)容，發(fā)布時(shí)間和昵稱 ②分頁(yè)顯示查詢結(jié)果 輸出（ O）：顯示家教信息頁(yè)面 5． 4． 3 名稱 ：家教信息 標(biāo)識(shí) ： 使用的文件或數(shù)據(jù)庫(kù) ： teacherinfo 5． 4． 4 界面設(shè)計(jì) 圖 56 家教信息瀏覽模塊界面 5． 4． 5 程序的設(shè)計(jì)與實(shí)現(xiàn) table width=80% border=1 tr th scope=col求職信息的內(nèi)容 /th th scope=col發(fā)布時(shí)間 /th th scope=col發(fā)布人 /th /tr % Dim db,conn conn=driver={microsoft access driver (*.mdb)}。 td amp。 rs(nick) amp。 /a) % /table p body background=../image/div align=center % if Page1 then (a href=39。 (Page1) amp。 (Page+1) amp。 ()” 39。 (db/) trSql=Select * from teacherdetail where nick=39。 Set rs=(ADODB,Recordset) strSql,conn,1,3 % table width=70% border=0 align=center tr th colspan=2 scope=colspan class=stytel%=nick%個(gè)人信息 /span/th /tr tr td width=19%真實(shí)姓名： /td td width=81% %=rs(name)%/td /tr tr td width=19%性別： /td td width=81% %=rs(sex)%/td /tr tr td width=19%年齡： /td td width=81% %=rs(age)%/td /tr tr td width=19%身份證： /td td width=81% %=rs(idcard)%/td /tr tr td width=19%學(xué)歷： /td td width=81% %=rs(select)%/td /tr tr td width=19%職業(yè)： /td td width=81% %=rs(work)%/td /tr tr td width=19%郵箱： /td td width=81% %=rs(Email)%/td /tr tr td width=19%電話： /td td width=81% %=rs(Tele)%/td /tr tr td width=19%住址： /td td width=81% %=rs(address)%/td /tr tr td width=19%講授科目 1： /td td width=81% %=rs(subject1)%/td /tr tr td width=19% 講授科目 2： /td td width=81% %=rs(subject2)%/td /tr /table 5． 5 學(xué)生信息瀏覽模塊 5． 5． 1 功能描述： 顯示所有尚未找到家教的學(xué)生信。 nick amp。 amp。下一頁(yè) /a ) (a href=39。 上一頁(yè) /a ) end if if Page then (a href=39。首頁(yè) /a ) (a href=39。 amp。 tda href=39。(db\) Set db=() conn strSql=Select content,puttime,nick from teacherinfo order by puttime desc Set rs=(ADODB,Recordset) strSql,conn,1,3 =5 page=1 if Not IsEmpty(Request(Page)) then Page=CIntRequest(Page)) if Page= else =Page end if else Page=1 End if else =Page For i=1 To if then Exit For End If (trtd amp。 39。 39。 39。待聘 39。 amp。 amp。 amp。,amp。,39。,39。 ,39。,39。, 39。_ values(39。) (strsql) session(teacher)=teacher () end if end if end if % （ 2） 本文件顯示一個(gè)表單，用來使注冊(cè)成功的用戶錄入其個(gè)人的詳細(xì)信息。,39。 ＇ Set rs=(strSql) if then (該用戶名已存在 !) else strSql=insert into teacherreg(nick,pass) values (39。其中包括五個(gè)表單元素，如表表53 所示： 表 53 頁(yè)面所使用的表單元素表 名稱 表單元素類型 Value 值 含義 student 文本框 用戶填寫 用戶名 Pass1 密碼框 用戶填寫 密碼 Pass2 密碼區(qū) 用戶填寫 確認(rèn)密碼 St Submit 按鈕 下一步 提交表單 rt reset 按鈕 重置 重置表單 ASP 代碼如下： form name=form1 method=post action= table width=44% height=82 border=0 align=center cellpadding=0 cellspacing=0 tr td colspan=2div align=center家教注冊(cè) /div/td /tr tr td width=49%div align=left用戶名 :/div/td td width=51%input type=text name=teacher/td /tr tr td密碼 :/td tdinput type=text name=pass1/td /tr tr td確認(rèn)密碼 :/td tdinput type=text name=pass2/td /tr tr td colspan=2div align=center input type=submit name=st value=下一步 input type=reset name=Rt value=重置 /div/td /tr /table /form % If (st) then teacher=(teacher) pass1=(pass1) pass2=(pass2) if teacher= then (用戶名不得為空 ) elseif pass1pass2 then (兩次輸入的密碼不同 ,請(qǐng)重新輸入 ) else Dim db,conn conn=driver={microsoft access driver (*.mdb)}。 ) Set rs=(strSql) () % 學(xué)生注冊(cè)模塊 5． 3． 1 功能描述： 學(xué)生用戶在本模塊注冊(cè)用戶名、設(shè)置密碼、錄入自己的詳細(xì)信息。,39。,39。,39。 address amp。 tele amp。_ amp。 amp。 amp。 amp。 amp。 amp。文件中包含的表單元素如表 52 所示： 表 52 頁(yè)面所使用的表單元素表 名稱 表單元素類型 Value 值 含義 Tname 文本框 用戶填寫 注冊(cè)用戶真實(shí)姓名 Sex 單選按鈕組 用戶選擇 性別：男、女 Age 文本框 用戶填寫 年齡 Idcard 文本框 用戶填寫 身份證號(hào) Select 下拉列表框 用戶選擇 學(xué)歷：大學(xué)本科、大學(xué)?？?、碩士研究生 Work 文本框 用戶填寫 職業(yè) Email 文本框 用戶填寫 郵箱 Tele 文本框 用戶填寫 電話 Address 文本框 用戶填寫 地址 Subject1 文本框 用戶填寫 講授的科目 1 Subject2 文本框 用戶填寫 講授的科目 2 Demo 文本框 用戶填寫 備注信息 St Submit 按鈕 提交 提交表單 rt reset 按鈕 重置 重置表單 詳細(xì)代碼如下： % if session(student)= then (您無權(quán)訪問本頁(yè)面 ) else % form name=form1 method=post action= table width=53% height=225 border=0 align=center cellpadding=0 cellspacing=0 tr td colspan=2div align=centerstrong 學(xué)生詳細(xì)信息錄入/strong/div/td /tr tr td width=38%font color=0000FF size=3姓名 :/font/td td width=62%input type=text name=sname/td /tr tr tdfont color=0000FF size=3性別 :/font/td tdinput type=radio name=sex value=radiobutton 男 input type=radio name=sex value=radiobutton 女 /td /tr tr tdfont color=0000FF size=3年齡 :/font/td tdinput type=text name=age/td /tr tr tdfont color=0000FF size=3學(xué)習(xí)程度 :/font/td tdselect name=select option小學(xué)生 /option option初中生 /option option高中生 /option option大學(xué)生 /option /select/td /tr tr tdfont color=0000FF size=3郵箱 :/font/td tdinput type=text name=textfield6/td