【正文】 RI Null IDENTITY(1,1) 主鍵，遞增 Uname Varchar Not Null Null 用戶名 Ped Varchar Not Null Null 密碼 Email Varchar Not Null Null 電子郵件 Idate Datetime Not Null Null 注冊(cè)日期 Cname Varchar Not Null Null 企業(yè)名稱(chēng) Trade Varchar Not Null Null 所屬行業(yè) Rstel Varchar Not Null Null 電話 Renshi Varchar Not Null Null 人事主管 Address Varchar Not Null Null 企業(yè)地址 下表為 zp 招聘職位表，存放企業(yè)所招聘的職位信息： Field Type Null Key Default Extra Comment Id Varchar Not Null PRI Null IDENTITY(1,1) 主鍵，遞增 Usid Varchar Not Null Null 用戶編號(hào) Uname Varchar Not Null Null 用戶名 Job Varchar Not Null Null 職位名稱(chēng) Zptext Datetime Not Null Null 職位信息 Click Int Not Null 0 點(diǎn)擊數(shù) Idate Datetime Not Null Null 發(fā)布日期 Zpnum Text Not Null Null 招聘人數(shù) Nianlings Varchar Null Null 年齡要求 Edus Varchar Null Null 學(xué)歷要求 Languages Varchar Null Null 語(yǔ)言要求 Jobtypes Varchar Null Null 工作類(lèi)型 Computers Varchar Null Null 計(jì)算機(jī)水平 Sexs Varchar Null Null 性別要求 Youxiaos Varchar Null Null 有效時(shí) 間 Marrys Varchar Null Null 婚姻狀況要求 Zyes Varchar Null Null Moneys Varchar Null Null 工作待遇 Gzdd Varchar Null Null Cname Varchar Null Null Addtime Datetime Null Null Cypic Varchar Null Null 公用模塊的編寫(xiě) ① 數(shù)據(jù)庫(kù)連接文件 數(shù)據(jù)庫(kù)連接文件 中 定義了數(shù)據(jù)庫(kù)連接對(duì)象，并開(kāi)啟數(shù)據(jù)連 接備用，同時(shí)打開(kāi)一個(gè)記錄集，取出一些系統(tǒng)所需常數(shù)并保存在本地變量中， 文件的內(nèi)容如下所示： 數(shù)據(jù)庫(kù)連接文件 % Set conn = () Driver={Microsoft Access Driver (*.mdb)}。 (database/) set rs=createobject() sql=select * from system sql,Conn if not then title=rs(title) homename=rs(homename) homeurl=rs(homeurl) copyen=rs(copyen) notice=rs(notice) tel=rs(tel) top=rs(top) link1=rs(link1) link11=rs(link11) link2=rs(link2) link22=rs(link22) link3=rs(link3) link33=rs(link33) link4=rs(link4) link44=rs(link44) link5=rs(link5) link55=rs(link55) link6=rs(link6) link66=rs(link66) ymail=rs(ymail) smail=rs(smail) address=rs(address) copy=rs(copy) pics1=rs(pics1) piclinks1=rs(piclinks1) pics2=rs(pics2) piclinks2=rs(piclinks2) pics3=rs(pics3) piclinks3=rs(piclinks3) pics4=rs(pics4) piclinks4=rs(piclinks4) end if set rs=createobject() sql=select * from link sql,Conn if not then piclink0=rs(piclink0) piclink00=rs(piclink00) piclink1=rs(piclink1) piclink11=rs(piclink11) piclink2=rs(piclink2) piclink22=rs(piclink22) piclink3=rs(piclink3) piclink33=rs(piclink33) piclink4=rs(piclink4) piclink44=rs(piclink44) piclink5=rs(piclink5) piclink55=rs(piclink55) piclink6=rs(piclink6) piclink66=rs(piclink66) piclink7=rs(piclink7) piclink77=rs(piclink77) piclink8=rs(piclink8) piclink88=rs(piclink88) piclink9=rs(piclink9) piclink99=rs(piclink99) piclinka=rs(piclinka) piclinkaa=rs(piclinkaa) piclinkb=rs(piclinkb) piclinkbb=rs(piclinkbb) piclinkc=rs(piclinkc) piclinkcc=rs(piclinkcc) banner=rs(banner) banners=rs(banners) banner1=rs(banner1) banner1s=rs(banner1s) scjj=rs(scjj) p0n=rs(p0n) p1n=rs(p1n) p2n=rs(p2n) p3n=rs(p3n) p4n=rs(p4n) p5n=rs(p5n) p6n=rs(p6n) p7n=rs(p7n) p8n=rs(p8n) p9n=rs(p9n) pan=rs(pan) pbn=rs(pbn) end if % 將經(jīng)常用到的程序變量保存在本地變量中，以便后續(xù)程序使用，這種方 法在開(kāi)發(fā)中經(jīng)常用到，有如下兩個(gè)好處： ? 在編寫(xiě)程序時(shí)減少工作量。 ② 頁(yè)面頭文件 由于頁(yè)面的頭部導(dǎo)航部分都是類(lèi)似的，因此可以將起單獨(dú)放在一個(gè)文件 中，并在需要使用的地方使用 include 指令來(lái)引入文件，使得程序模式化。其中在顯示廣告橫幅時(shí)調(diào)用了在 文件中從數(shù)據(jù)庫(kù)中取出并復(fù)制到本地變量中的廣告圖片數(shù)據(jù)。 ④ 登陸判定 當(dāng)個(gè)人擁護(hù)進(jìn)行例如發(fā)布簡(jiǎn)歷、修改個(gè)人信息等操作時(shí)，程序需要驗(yàn)證用戶是否已經(jīng)登陸作為前提條件，如果用戶沒(méi)有登陸，則不應(yīng)該訪問(wèn)這些頁(yè)面，因此需要制作一個(gè)判斷用戶是否登陸并加以處理的模塊。在本系統(tǒng)中，以對(duì)個(gè)人用戶是否登陸的判定例示講解對(duì)于登陸的判定方法，對(duì)個(gè)人用戶是否登陸的判斷是通過(guò)在 inc/ 文件中的代 碼實(shí)現(xiàn)的，如下所示： inc/ 文件中用戶登陸判定代碼 % if session(cuid) and session(puid) then SCRIPT language=VBScriptalert(39。)。../39。操作超時(shí)，請(qǐng)重新登錄！ 39。 =39。/SCRIPT end if Set conn = () Driver={Microsoft Access Driver (*.mdb)}。 (../database/) set rs=createobject() sql=select * from system sql,Conn if not then title=rs(title) homename=rs(homename) homeurl=rs(homeurl) copyen=rs(copyen) notice=rs(notice) tel=rs(tel) top=rs(top) link1=rs(link1) link11=rs(link11) link2=rs(link2) link22=rs(link22) link3=rs(link3) link33=rs(link33) link4=rs(link4) link44=rs(link44) link5=rs(link5) link55=rs(link55) link6=rs(link6) link66=rs(link66) ymail=rs(ymail) smail=rs(smail) address=rs(address) copy=rs(copy) pics1=rs(pics1) piclinks1=rs(piclinks1) pics2=rs(pics2) piclinks2=rs(piclinks2) pics3=rs(pics3) piclinks3=rs(piclinks3) pics4=rs(pics4) piclinks4=rs(piclinks4) end if % % set rs=createobject() sql=select * from link sql,Conn if not then piclink0=rs(piclink0) piclink00=rs(piclink00) piclink1=rs(piclink1) piclink11=rs(piclink11) piclink2=rs(piclink2) piclink22=rs(piclink22) piclink3=rs(piclink3) piclink33=rs(piclink33) piclink4=rs(piclink4) piclink44=rs(piclink44) piclink5=rs(piclink5) piclink55=rs(piclink55) piclink6=rs(piclink6) piclink66=rs(piclink66) piclink7=rs(piclink7) piclink77=rs(piclink77) piclink8=rs(piclink8) piclink88=rs(piclink88) piclink9=rs(piclink9) piclink99=rs(piclink99) piclinka=rs(piclinka) piclinkaa=rs(piclinkaa) piclinkb=rs(piclinkb) piclinkbb=rs(piclinkbb) piclinkc=rs(piclinkc) piclinkcc=rs(piclinkcc) p0n=rs(p0n) p1n=rs(p1n) p2n=rs(p2n) p3n=rs(p3n) p4n=rs(p4n) p5n=rs(p5n) p6n=rs(p6n) p7n=rs(p7n) p8n=rs(p8n) p9n=rs(p9n) pan=rs(pan) pbn=rs(pbn) banner=rs(banner) banners=rs(banners) scjj=rs(scjj) end if % 程序首先獲得 session 中保存用戶編號(hào)的值，如果這個(gè)值為空則會(huì)提示用戶登陸非法，并同時(shí)跳轉(zhuǎn)回主頁(yè)，達(dá)到屏蔽用戶訪問(wèn)的目的，如果不為空，則說(shuō)明用戶已經(jīng)登陸，此時(shí)程序打開(kāi)一個(gè)記錄集，并取出系統(tǒng)社頂信息及友情連接信息，存放在臨時(shí)變量中。 ⑤ 管理員登陸模塊 在本系統(tǒng)中，設(shè)計(jì)了管理員