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