【正文】 假如初步錄取了3個人（他們的賬號分別為aaa，bbb和ccc），則session（“namelist”）的值為：‘a(chǎn)aa’,’bbb’,’ccc’。根據(jù)user的參數(shù)值為“kkk”顯示的個人的記錄。該頁面接受一個參數(shù)值user。 頁]amp。nbsp else [第 amp。 i amp。 39。?page= amp。其中姓名提供一個鏈接，點擊該鏈接，可以查看個人的具體信息。 39。 amp。 39。 amp。 39。 amp。 39。 amp。 39。 _ amp。 39。 amp。 單位情況登記 單位信息編輯（）該文件的作用是為用戶提供修改單位注冊資料的表單，并且根據(jù)提交表單的內(nèi)容對數(shù)據(jù)庫的info表相應(yīng)的記錄進行修改。 39。 amp。招聘單位填寫注冊詳細資料的表單后提交到本頁面進行處理。 39。 amp。 page amp。 39。 amp。點擊左窗口的“本人應(yīng)聘情況”，則在右窗口顯示該頁面。 amp。/FORM%if (_method)=POST then if (txtsearch)= then 請?zhí)顚懖樵儣l件 else //根據(jù)查詢條件查詢符合條件的單位 select=(txtsearch) set md=() =dsn=findjob //find為帶參數(shù)的存儲查詢 =find //為該存儲查詢輸入?yún)?shù)的值 set mprama=(strsearch,200,1,40,select) mprama //執(zhí)行查詢 set mrs=%TABLE border=1 cellPadding=1 cellSpacing=1 width=90% TR TD公司名稱/TD TD公司地址/TD TD需求人才類型/TD /TR % while not //用表格的形式列出所有符合查詢條件的單位% TR TDSTRONGFONT color=mediumorchid face=FONT % a href=?id= amp。查詢結(jié)果顯示的單位信息有單位名稱、單位地址和單位需要的人才類型，其中在單位名稱提供了一個鏈接如下：？id=ant點擊該鏈接可以查看單位的具體信息。在“單位招聘的人才類型”中填入相應(yīng)的字符串，如“計算機”，點擊“查詢”按鈕，顯示查詢結(jié)果。 39。 amp。 此外還提供一個信息發(fā)送框，可以填寫發(fā)送信息給單位。根據(jù)參數(shù)值從數(shù)據(jù)庫的info表中提取相應(yīng)的公司記錄。/P/BODY/HTML 單位詳細信息（），查看單位的具體信息，顯示該頁面。nbsp end ifnext set rec=nothing%/FORMPamp。 i amp。 頁/a]amp。第 amp。 i amp。 rec(name)% /A /FONT /FONT/STRONGFONT/FONT/TD TDSTRONGFONT color=mediumorchid face=FONT %=rec(wanted)% /FONT /FONT/STRONGFONT/FONT/TD /TR % next % /TABLEP/P%for i=1 to if trim((page))trim(i) then [a href=39。 rec(id) amp。% Language=VBScript %HTMLHEADMETA NAME=GENERATOR Content=Microsoft Visual Studio /HEADBODYTABLE WIDTH=75% BORDER=1 CELLSPACING=1 CELLPADDING=1 TR TDFONT color=palevioletred face= size=4FONT face=幼圓公司名稱/FONT/FONTFONT face=幼圓/FONT/TD TDFONT color=palevioletred face= size=4FONT face=幼圓需要人才類型/FONT/FONTFONT face=幼圓/FONT/TD /TR%39。如一個單位賬號為ant，則在該單位名稱下提供的鏈接為；？id=ant，id=ant是傳遞的參數(shù)和值。 ?message=修改數(shù)據(jù)成功??！ else%……中間代碼略……%end if% 查看所有單位（）該文件的作用是分頁顯示所有招聘單位的簡要信息（單位名稱與需要的人才類型）。 求職者登記 個人資料編輯（）該文件的作用是為用戶提供修改個人注冊資料的表單，并且根據(jù)提交表單的內(nèi)容對書庫的userinfo表相應(yīng)的記錄進行修改。 39。 amp。如果資料已經(jīng)登記，則提示用戶已經(jīng)登記，只能進行修改。點擊該鏈接，在右窗口顯示該頁面。 WIDTH: 577px width=577p align=centertable align=center bgColor=lightgoldenrodyellow border=1 cellPadding=1 cellSpacing=1 height=72 style=HEIGHT: 72px。 fontsize: 9pt} .white { color: FFFFFF} .line { lineheight: 20px} .title { fontsize: 14px }/stylehtmlheadmeta NAME=GENERATOR Content=Microsoft Visual Studio /headbody%//根據(jù)不同的用戶類型顯示鏈接if session(onlinetype)=user then//以下顯示用戶為個人時的鏈接%pfont size=5 face=隸書功能導航/font/ppfont face size=2a href= target=mainFrame個人求職登記/a/font/ppa href= target=mainFramefont face size=2個人信息修改/a/font/ppa href=?page=1 target=mainFramefont face size=2查看招聘單位/a/font/ppa href= target=mainFramefont face size=2查詢招聘單位/a/font/ppa href=?page=1 target=mainFramefont face size=2/fontfont size=2本人應(yīng)聘情況/font/a/p%else//以下顯示用戶為單位時的鏈接%pa href= target=mainFramefont face size=2單位招聘登記/a/font/ppa href= target=mainFramefont face size=2單位招聘修改/a/font/ppa href=?page=1 target=mainFramefont face size=2查看個人信息/a/font/ppa href= target=mainFramefont face size=2錄 用 個 人/a/font/ppa href=?page=1 target=mainFramefont face size=2單位錄用統(tǒng)計/a/font/pfont face size=2pa href=?page=1 target=mainFramefont face size=2查看應(yīng)聘者消息/a/font/p%end if%a href= target=_topfont face size=2退出/重新登錄/font/a p/pp/p/font/body/html 。 fontsize: 9pt。 color:black} input { fontfamily: 宋體。 color:white} :link,:visited { textdecoration:none。 color: 3333FF} :link,:visited { textdecoration:none。：% Language=VBScript %style type=text/css! a:visited,a:link { textdecoration: none。其中，登陸者為個人（求職者）時的鏈接有：個人求職登記、個人信息修改、查看招聘單位、查詢招聘單位、本人應(yīng)聘情況和退出/重新登陸。 session(online)=(uid) set sqlresult=(strsql) if and then //帳號和口令不對，返回登錄頁面 ?message=帳號和口令不對,請重新輸入 else //session變量username不為空，表示使用該帳號的用戶已經(jīng)登記了個人的資料 session(name)=sqlresult(name) end if end ifend if set conn=nothingend if%htmlheadtitleUntitled Document/titlemeta equiv=ContentType content=text/html。 (psw) amp。 and psw=39。 (uid) amp。) (strsql) session(name)= else //該帳號已經(jīng)被使用，返回登錄頁面重新新建用戶帳號 ?message=該帳號已被使用，請選擇其他帳號 end if else //已有帳號的公司用戶進入系統(tǒng) strsql=select name from info where id=39。 (psw) amp。,39。 (uid) amp。 set sqlresult=(strsql) if and then //該帳號還沒有被使用，創(chuàng)建該帳號 strsql=insert into info (id,psw) values (39。 (uid) amp。 session(useronline)=(uid) set sqlresult=(strsql) if and then //帳號和口令不對，返回登錄頁面 ?message=帳號和口令不對,請重新輸入 else //session變量username不為空，表示使用該帳號的用戶已經(jīng)登記了個人的資料 session(username)=sqlresult(username) end if end ifelse //以下為處理登錄公司/單位的請求 session(onlinetype)= session(online)=(uid) if (submit)=新建 then //新建公司/單位用戶帳號 strsql=select id from info where id=39。 (psw) amp。 and userpsw=39。 (uid) amp。) (strsql) session(username)= else //該帳號已經(jīng)被使用，返回登錄頁面重新新建用戶帳號 ?message=該帳號已被使用，請選擇其他帳號 end if set sqlresult=nothing else //已有帳號的用戶進入系統(tǒng) strsql=select username from userinfo where user=39。 (psw) amp。,39。 (uid) amp。 set sqlresult=(strsql) if and then //該帳號還沒有被使用，創(chuàng)建該帳號 strsql=insert into userinfo (user,userpsw) values (39。 (uid) amp。部分代碼如下：%if (_method)=POST thenset conn=()=D