【正文】 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 注冊日期 Cname Varchar Not Null Null 企業(yè)名稱 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 用戶編號 Uname Varchar Not Null Null 用戶名 Job Varchar Not Null Null 職位名稱 Zptext Datetime Not Null Null 職位信息 Click Int Not Null 0 點擊數(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 語言要求 Jobtypes Varchar Null Null 工作類型 Computers Varchar Null Null 計算機水平 Sexs Varchar Null Null 性別要求 Youxiaos Varchar Null Null 有效時 間 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 公用模塊的編寫 ① 數(shù)據(jù)庫連接文件 數(shù)據(jù)庫連接文件 中 定義了數(shù)據(jù)庫連接對象，并開啟數(shù)據(jù)連 接備用，同時打開一個記錄集，取出一些系統(tǒng)所需常數(shù)并保存在本地變量中， 文件的內(nèi)容如下所示： 數(shù)據(jù)庫連接文件 % 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ù)程序使用，這種方 法在開發(fā)中經(jīng)常用到，有如下兩個好處： ? 在編寫程序時減少工作量。 ② 頁面頭文件 由于頁面的頭部導(dǎo)航部分都是類似的，因此可以將起單獨放在一個文件 中，并在需要使用的地方使用 include 指令來引入文件，使得程序模式化。其中在顯示廣告橫幅時調(diào)用了在 文件中從數(shù)據(jù)庫中取出并復(fù)制到本地變量中的廣告圖片數(shù)據(jù)。 ④ 登陸判定 當(dāng)個人擁護進行例如發(fā)布簡歷、修改個人信息等操作時，程序需要驗證用戶是否已經(jīng)登陸作為前提條件，如果用戶沒有登陸，則不應(yīng)該訪問這些頁面，因此需要制作一個判斷用戶是否登陸并加以處理的模塊。在本系統(tǒng)中，以對個人用戶是否登陸的判定例示講解對于登陸的判定方法，對個人用戶是否登陸的判斷是通過在 inc/ 文件中的代 碼實現(xiàn)的，如下所示： inc/ 文件中用戶登陸判定代碼 % if session(cuid) and session(puid) then SCRIPT language=VBScriptalert(39。)。../39。操作超時，請重新登錄！ 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 中保存用戶編號的值，如果這個值為空則會提示用戶登陸非法，并同時跳轉(zhuǎn)回主頁，達到屏蔽用戶訪問的目的，如果不為空，則說明用戶已經(jīng)登陸，此時程序打開一個記錄集，并取出系統(tǒng)社頂信息及友情連接信息，存放在臨時變量中。 ⑤ 管理員登陸模塊 在本系統(tǒng)中，設(shè)計了管理員