【文章內(nèi)容簡(jiǎn)介】 Public Sub UpdateNews(nid) strSql = Update News Set NTitle=39。 amp。 NTitle amp。 39。,NContent=39。 amp。 NContent amp。 _ 39。 Where NewsId= amp。 nid (strSql) End Sub 39。刪除新聞信息 Public Sub DeleteNews(nids) strSql = Delete From News Where NewsId In ( amp。 nids amp。 ) (strSql) End Sub End Class % 在類 News 中為表 Bulletin 的每個(gè)字段也定義了一個(gè)同名的成員變量，變量rs 是 對(duì)象，用于保存批量查詢返回的結(jié)果集。 所有數(shù)據(jù)庫(kù)操作類都保存在 class 目錄下，下面是這些類中定義的函數(shù)。 （ 1） news 類 news 類用來管理表 news 的數(shù)據(jù)庫(kù)操作，類的成員函數(shù)如表 38 所示。 函數(shù)名 具體說明 GetNewsInfo(nid) 讀取指定的新聞紀(jì)錄，參數(shù) nid表示要讀取的新 聞?dòng)涗浀木幪?hào)。 GetNewslist 返回所有新聞?dòng)涗浶畔?，結(jié)果保存在公共變量 rs 中。 rs 是 對(duì)象。 GetRecentBulletinlist 獲取最近 7天發(fā)布的新聞信息，結(jié)果保存在公共變量 13 rs 中。 rs 是 對(duì)象。 Deletenews(nids) 批量刪除指定的新聞?dòng)涗?。參?shù) nid 表示要?jiǎng)h除的記 錄的編號(hào)列表。 InsertNews 插入新的新聞?dòng)涗洝? UpdataNews(nid) 修改指定的新聞?dòng)涗?。參?shù) nid 表示要修改的記錄編 表 News 類成員函數(shù)表 （ 2） Person 類 Person 類用來管理表 Person 的數(shù)據(jù)庫(kù)操作，類的成員函數(shù)如表 39所示。 函數(shù) 具體說明 GetPersonInfo(uname) 讀取指定的個(gè)人記錄。參數(shù) uname 表示要讀取記錄編號(hào)。 GetPersonlist 返回所有個(gè)人記錄信息，結(jié)果保存在公共變量 rs 中。 rs 是 對(duì)象。 HaveGoodsType(name) 判斷指定的商品類別名稱是否存在，參數(shù)name 表示商品類別名稱。 DeletePerson(uname) 刪除指定的個(gè)人記錄。參數(shù) uname 表示要?jiǎng)h除的用戶名。 HavePerson(uname) 判斷指定的用戶名是否存在，如果存在則返回 ture，否則返回 false。參數(shù) uname 表示用戶 名。 HaveUser 判斷當(dāng)前用戶指定的用戶名和密碼是否存在，如果存在則返回 ture，否則返回 false。 InsertPerson 插入新的個(gè)人紀(jì)錄 。 UpdataPassword 修改用戶密碼。 UpdataPerson(uname) 修改指定的個(gè)人記錄，參數(shù) uname 表示要修改的用 戶名。 14 表 Person 類成員函數(shù)表 （ 3） Skill 類 Skill 類用來管理表 Skill 的數(shù)據(jù)庫(kù)操作，類的成員函數(shù)如表 310所示。 函數(shù)名 具體說明 GetSkillInfo(uname) 讀取指定用戶的技能記錄。參數(shù) uname 表示用戶名。 GetSkilllist 返回所有技能記錄信息，結(jié)果保存在公共變量 rs 中。 rs 是 對(duì)象。 HaveUserName(uname) 判斷指定的用戶是否存在技能信息，參數(shù)uname 表示用戶名。 DeleteSkill(sid) 刪除指定的技能記錄。參數(shù) sid 表示要記錄編號(hào)。 InsertSkill 插入新的技能記錄。 UpdataSkill(uname) 修改指定的技能記錄，參數(shù) uname 表示要修改的用戶 名。 表 Skill 類成員函數(shù)表 （ 4） Company 類 Company 類用來管理表 Company 的數(shù)據(jù)庫(kù)操作，類的成員函數(shù)如表 311所示。 函數(shù) 具體說明 GetCompanyInfo(cid) 讀取指定的公司記錄。參數(shù) cid 表示企業(yè)用戶名。 GetCompanylist 返回所有公司記錄信息，結(jié) 果保存在公共變量 rs 中。 rs 是 對(duì)象。 HaveUser 判斷指定的用戶名和密碼是否存在，如果存在則返回 ture，否則返回 false。 DeleteCompany(cid) 刪除指定的公司記錄。參數(shù) cid 表示要?jiǎng)h除 15 的公司編號(hào)。 HaveCompany(cid) 判斷指定的企業(yè)用戶是否存在，如果存在則返回 ture，否則返回 false。參數(shù) cid 表示用戶名。 InsertCompany 插入新的公司記錄。 UpdataPassword(cid) 修改指定用戶的密碼，參 數(shù) cid 表示企業(yè)用戶名。 UpdataICompany(cid) 管理員修改指定的公司記錄，包括用戶名和密碼等信息，參數(shù) cid 表示要修改的企業(yè)用戶名。 UpdataCompany(cid) 企業(yè)用戶修改自己公司的記錄，參數(shù) cid 表示要修改的企業(yè)用戶名。 表 Company 類成員函數(shù)表 （ 5） JobInfo 類 JobInfo 類用來管理表 JobInfo 的數(shù)據(jù)庫(kù)操作，類的成員函數(shù)如表 312所示。 GetJobInfo(jid) 讀取指定的職位記錄。參數(shù) jid 表示記錄編號(hào)。 GetDetail(uname,jid) 返回指定公司的指定職位記錄信息，結(jié)果保存 在 公 共 變 量 rs 中。 rs 是 對(duì)象。參數(shù) uname表示企業(yè)用戶名， jid 表示職位記錄編號(hào)。 GetJoblist(uname) 返回指定公司的所有職位記錄信息，結(jié)果保存 在 公 共 變 量 rs 中。 rs 是 對(duì)象。參數(shù) uname表示企業(yè)用戶名。 GetJobSearch(schsql) 根據(jù)查詢條件返回所有職位記錄信息，結(jié)果保 存 在 公 共 變 量 rs 中。 rs 是 對(duì)象。參數(shù) schsql 16 表示定義查詢條件的 SELECT 語句。 HaveCID(cid) 判斷指定的企業(yè)是否存在職位信息，參數(shù) cid表示企業(yè)用戶名。 DeleteJob(jid) 刪除指定的職位記錄。參數(shù) jid 表示要?jiǎng)h除的記錄編號(hào)。 nsertJob 插入新的職位記錄。 UpdataJob(cid) 修改指定的職位記錄，參數(shù) cid 表示要修改的記錄編號(hào)。 表 JobInfo 類成員函數(shù)表 （ 6） Applications 類 Applications 類用來管理表 Applications 的數(shù)據(jù)庫(kù)操作，類的成員函數(shù) 如表 313所示。 函數(shù) 具體說明 GetApplicationInfo(aid) 讀取指定的應(yīng)聘記錄。參數(shù) aid 表示記錄編號(hào)。 GetDetail(uname) 返回指定個(gè)人的所有應(yīng)聘記錄信息，結(jié)果保存 在 公 共 變 量 rs 中。 rs 是 對(duì)象。參數(shù) uname表示個(gè)人用戶名。 GetApplicationlist 返回所有應(yīng)聘記錄信息，結(jié)果保存在公共變量 rs 中。 rs 是 對(duì)象。 DeleteRespone(aid,uname) 刪除指定的職位記錄。參數(shù) aid 表示要?jiǎng)h除的記錄編號(hào) ,uname 表示用戶名。 InsertApplication 插入新的應(yīng)聘記錄。 UpdataPassword(cid) 修改指定用戶的密碼，參數(shù) cid 表示企業(yè)用戶名。 UpdatResponse(aid) 修改指定的應(yīng)聘記錄，參數(shù) aid 表示要修改 17 的記錄編號(hào)。 UpdataCompany(cid) 企業(yè)用戶修改自己公司的記錄，參數(shù) cid 表示要修改的企業(yè)用戶名。 表 Applications 類成員函數(shù)表 （ 7） Admin 類 Admin 類用來管理表 Admin 的 數(shù)據(jù)庫(kù)操作，類的成員函數(shù)如表 314 所示。 函數(shù) 具體說明 GetAdminInfo(aid) 讀取指定的管理員記錄。參數(shù) aid 表示管理員用戶名。 GetAdminlist 返回所有管理員用戶記錄信息，結(jié)果保存在公 共 變 量 rs 中。 rs 是 對(duì)象。 GetAdmin 判斷指定管理員用戶名和密碼是否存在，如果存在則返回 ture，否則返回 false。 DeleteAdmin(aid) 刪除指定的管理員用戶記錄。參數(shù) aid 表示要?jiǎng)h除的管理員用戶名。 InsertAdmin 插入新的 管理員用戶記錄。 UpdataPassword(aid) 修改指定用戶的密碼，參數(shù) aid 表示管理員用戶名。 表 Admin 類成員函數(shù)表 18 第 4 章 詳細(xì)設(shè)計(jì) 及編碼 公共模塊功能實(shí)現(xiàn) 圖 41 系統(tǒng)主頁(yè)面 除了 Admin 用戶外，企業(yè)用戶和個(gè)人用戶都要通過系統(tǒng)主頁(yè)面登錄，才能完 成自己的特定功能。 個(gè)人 用戶功能 實(shí)現(xiàn) 個(gè)人用戶登錄后，可以直接進(jìn)入個(gè)人用戶主界面。在個(gè)人主界面中，可以見到“ 個(gè)人 簡(jiǎn)歷 ”“ 技能信息 ”“ 職位申請(qǐng) ”“ 密碼修改 ”“退出管理” 的超鏈接，用戶可以填寫自己的 簡(jiǎn) 歷、創(chuàng)建多份簡(jiǎn)歷、查看公司信息、搜索工作、查看職位信息、申請(qǐng)職位。 19 圖 42 個(gè)人用戶注冊(cè)界面 定義表單代碼如下： form name=form1 method=POST action=?action=add onsubmit=return CheckFlds() 當(dāng)提交數(shù)據(jù)后，將執(zhí)行 CheckFlds()函數(shù)，對(duì)用戶輸入數(shù)據(jù)進(jìn)行檢查。用戶名、密碼和真實(shí)姓名是必須輸入的。通過檢查后，將執(zhí)行 ，保存?zhèn)€人簡(jiǎn)歷。參數(shù) action 表示當(dāng)前 的操作狀態(tài)， action=add 表示添加記錄。 也可以用來保存修改的個(gè)人簡(jiǎn)歷。 20 圖 個(gè)人信息管理界面 在個(gè)人管理頁(yè)面中，右側(cè)網(wǎng)頁(yè)默認(rèn)顯示當(dāng)前個(gè)人用戶的個(gè)人簡(jiǎn)歷信息，用戶可以編輯自己的簡(jiǎn)歷，頁(yè)面為 resume\，其主要代碼如下： % Set per = New Person (Session(UserName)) If Not Then’ ?? % 程序?qū)⒏鶕?jù) Session (“ UserName”）的值從表 Person 中讀取當(dāng)前用戶的個(gè)人簡(jiǎn)歷數(shù)據(jù)，示在頁(yè)面中。當(dāng)用戶單擊“提交”按鈕時(shí)，將執(zhí)行 ，保存數(shù)據(jù)。 21 圖 查看個(gè)人信息 程序?qū)⒏鶕?jù)參數(shù) uid 的值從表 Person 中讀取指定用戶的個(gè)人簡(jiǎn)歷數(shù)據(jù)，并顯示在頁(yè)面中 .代碼如下： % Dim uid uid = (uid) Set per = New Person Set sk = New Skill (uid) If Not Then (uid) % 22 圖 個(gè)人 技能編輯 頁(yè)面 程序根據(jù) Session 變量 UserName 讀取當(dāng)前登錄個(gè)人用戶的技能信息，代碼如下： Set sk = New Skill (Session(UserName)) If Not Then Title = (AppTitle) English = (English) Computer = (Computer) Main = (MainSkill) End If 然后各項(xiàng)技能數(shù)據(jù)顯示在頁(yè)面的指定位置。 當(dāng)用戶提交數(shù)據(jù)時(shí)，將首先調(diào)用 CheckFlds()函數(shù)，對(duì)數(shù)據(jù)的有效性進(jìn)行檢查。如果通過檢查則執(zhí)行 。 23 圖 職位申請(qǐng)查看頁(yè)面 在職位申請(qǐng)列表中，可以通過單擊“企業(yè)名稱”和“申請(qǐng)職位”鏈接查看具體的相關(guān)信息，也可以在反饋欄中查看到企業(yè)的反饋信息。讀取并顯示申請(qǐng)信息的代碼如下： % Set app = New Applications (Session(UserName)) ’在表格中顯示申請(qǐng)信息 % 單擊每條記錄后面的刪除鏈接，將執(zhí)行 ，刪除當(dāng)前記錄。參數(shù) aid 表示要?jiǎng)h除職位申請(qǐng)記錄的編號(hào)。刪除申請(qǐng)記錄的代碼如下： % Dim aid aid = (aid) Set app = New Applications aid,Session(UserName) % 24 企業(yè)用戶功能實(shí)現(xiàn) 企業(yè)用戶登錄后，可以直接進(jìn)入企業(yè)用戶主界面。在企業(yè)主界面中，可以見到“ 企業(yè)信息”“招聘信息”“應(yīng)聘信息”“ 密碼修改”“退出管理” 的超鏈接。企業(yè)用戶登錄成功后， 可以填寫公司基本信息， 發(fā)布職位， 搜索人才簡(jiǎn)歷、 查