【文章內容簡介】 日期 ，入黨時間，所屬支部 等。 制度表數(shù)據庫庫的字段有：序號 , 制度名稱 , 等。 黨支部數(shù)據庫 的字段有： 支部 編號， 支部名稱，所屬院系 等。 物理設計 物理結構設計是為數(shù)據模型在設備上選定合適的存儲結構和存儲方法用以獲得數(shù)據庫的最優(yōu)效率，通常包括庫文件的組織形式，存儲介質的分配，存取路徑的選擇，數(shù)據塊大小的確 定。物理結構的設計是系統(tǒng)得以實施的主要方式因此也是十分重要的步驟，我們需要對此進行認真的設定以 使系統(tǒng)有一個合理而且高效的設置。 金陵科技學院學士學位論文 第 4 章 數(shù)據庫設計 12 數(shù)據庫詳細 介紹 本系統(tǒng)共涉及 5 張表，分別為 黨員信息表，黨支部表，制度表，支部風采表，密碼表 。 黨員信息 表 管理員 信息表記錄了有關 管理員信息的相關資料 。 其字段設置如表 34 所示 : 字段名 類型 長度 是否允許空 是否主鍵 姓名 varchar 11 否 是 性別 varchar 32 否 否 民族 varchar 32 是 否 出生日期 varchar 32 是 否 入黨時間 varchar 20 是 否 所屬支部 varchar 20 否 否 學歷 varchar 11 是 否 表 34 管理員信息表 密碼 表 此表用來存放 正登陸用戶賬號和密碼，以及 管理員權限 。其字段如表 35 所示 : 字段名 類型 長度 是否允許空 是否主鍵 賬號 varchar 20 否 是 密碼 varchar 20 否 否 權限 標志位 varchar 10 是 否 表 35 密碼 表 黨支部 表 黨支部表記錄了有關支部信息 的相關資料 。 字段設置如表 36 所示 : 字段名 類型 長度 是否允許空 是否主鍵 支部編號 varchar 11 否 是 支部名稱 varchar 36 是 否 所屬院系 varchar 20 是 否 表 36黨支部 表 制度 表 制度表記錄了黨支部有關規(guī)章制度的相關資料 。 其字段設置如表 37 所示 : 字段名 類型 長度 是否允許空 是否主鍵 序號 varchar 11 否 是 制度名稱 varchar 20 是 否 內容 二進制備注型 4 是 否 金陵科技學院學士學位論文 第 4 章 數(shù)據庫設計 13 表 37制度 表 支部風采 表 支部風采 表記錄了近階段各個支部所開展的活動及其主要內容 。 其字段設置如表 38所示 : 字段名 類型 長度 是否允許空 是否主鍵 序號 varchar 11 否 是 活動名稱 varchar 32 否 否 內容 二進制備注型 4 是 否 組織單位 varchar 32 是 否 活動 時間 varchar 20 是 否 參加人員 二進制備注型 4 否 否 表 38 支部風采 表 金 陵科技學院學士學位論文 第 5 章 系統(tǒng)詳細設計 14 第 4 章 系統(tǒng) 詳細設計 本章以說明附圖片的形式，清晰的展示了系統(tǒng)各個模塊的實際效果圖。從注冊登錄到黨員資料查詢打印 ，從管理員登錄到 每一步操作，都有詳細的說明。另注有部分關鍵代碼，以便參考。 系統(tǒng) 模塊功能及界面 的程序設計 系統(tǒng)啟動 與登錄 系統(tǒng)啟動時，顯示黨員信息管理系統(tǒng)的啟動界面 (如圖 51)。 圖 41系統(tǒng)啟動 系統(tǒng)經過啟動界面之后，自動彈出登錄界面，通過下拉菜單自動顯示所有的賬號，以供操作人員選擇，操作人員通過選擇自己的賬號，并且在密碼框中輸入相應的密碼，系統(tǒng)自動通過儲存于密碼表中的賬號密碼進行匹配，并且通過此賬號的權限標志位，來確定操作者的權限。如果賬號與密碼匹配，則進入下一層界面 — 黨員信息管理系統(tǒng)主界面。 圖 42 用戶登錄 金 陵科技學院學士學位論文 第 5 章 系統(tǒng)詳細設計 15 locate all for alltrim(密碼表 .賬號 )==alltrim() if found() if alltrim()==alltrim(密碼表 .密碼 ) x=1 do case case alltrim(密碼表 .權限標志位 )==1 Do FORM 系統(tǒng)主表單 case alltrim(密碼表 .權限標志位 )==0 Do FORM 系統(tǒng)主表單 2 endcase else messagebox(口令不正確！請重新輸入 !,48,登錄信息 ) = endif endif 系統(tǒng)主表單 用戶正確登錄后，可以看到系統(tǒng)主界面， 如圖 44： 圖 44 系統(tǒng)主界面 金 陵科技學院學士學位論文 第 5 章 系統(tǒng)詳細設計 16 主界面的功能主要是顯示快捷按鈕，以及系統(tǒng)菜單，具體代碼如下： do E:\黨員信息管 理系統(tǒng) \MENUS\主界面菜單 .mpr with this,.t. =ttoc(datetime()) 用戶信息增加與刪除 選擇 “ 系統(tǒng)設置 ”→“ 新增 用戶 ” 命令，即可打開 “ 新增用戶 ” 窗體。 首先檢查用戶名是否為空或者已經存在，然后 通過兩次密碼確認相同，則把輸入的用戶名、密碼和權限輸入密碼表。 如圖 53： 圖 53 新增用戶 if empty() messagebox (用戶名不能為空！ ,48+0,添加新用戶 ) else locate for upper(密碼表 .賬號 )=upper(allt()) if found() messagebox(用戶名已經存在，請輸入其他用戶名！ ,48+0,添加新用戶 ) else if == if empty()=.f. a=messagebox(39。確定要添加記錄嗎？ 39。,32+4,39。系統(tǒng)提示 39。) if a=6 Insert Into 密碼表 。 (賬號 ,密碼 ,權限標志位 )。 金 陵科技學院學士學位論文 第 5 章 系統(tǒng)詳細設計 17 Values(alltrim(),alltrim(),alltrim()) endif else messagebox(39。請輸入支部編號 39。,16,39。系統(tǒng)提示 39。) endif messagebox(成功添加新 用戶！ ,64+0,添加新用戶 ) release thisform else messagebox(請輸入相同密碼！ , 48+0,添加新用戶 ) endif endif endif 管理員可以通過“刪除用戶”操作，來實現(xiàn)取消某一用戶的操作賬號， 實現(xiàn)此功能需要管理員權限。 具體操作如圖 54 。 . 圖 54刪除用戶 use 密碼表 if empty()=.f. a=messagebox(39。確定要刪除記錄嗎？ 39。,32+4,39。系統(tǒng)提示 39。) 金 陵科技學院學士學位論文 第 5 章 系統(tǒng)詳細設計 18 if a=6 then delete from 密 碼表 where 賬號 = and 密碼= and 權限標志位 = pack = = = endif endif 數(shù)據庫備份與恢復 在系統(tǒng)的使用過程中，難免會遇到系統(tǒng)崩潰，病毒篡改系統(tǒng)等情況。在遇到這些突發(fā)狀況時，系統(tǒng)備份與恢復就顯得尤其重要。本系統(tǒng)提供系統(tǒng)數(shù)據庫的完整備份與恢復。數(shù)據備份操作頁面如下圖 55。 . 圖 55數(shù)據庫備份 數(shù)據備份代碼如下： Set safety off Set talk off If empty() Messagebox(請選擇要備份的數(shù)據。 ,64+0,數(shù)據備份 ) Else If empty() Messagebox(請選擇數(shù)據備份去向。 ,64+0,數(shù)據備份 ) Else 金 陵科技學院學士學位論文 第 5 章 系統(tǒng)詳細設計 19 If 全部 _fpt=allt(juststem())+.FPT _cdx=allt(juststem())+.CDX If file(sys(5)+curdir()+\+_fpt) and file(sys(5)+curdir()+\+_cdx) Copy file sys(5)+curdir()+\+justfname(allt()) to allt() Copy file sys(5)+curdir()+\+_fpt to justpath(allt())+\+_fpt Copy file sys(5)+curdir()+\+_cdx to justpath(allt())+\+_cdx Messagebox(juststem(allt())+備份成功！ ,64+0,數(shù)據備份 ) Else If file(sys(5)+curdir()+\+_fpt) Copy file sys(5)+curdir()+\+justfname(allt()) to allt() Copy file sys(5)+curdir()+\+_fpt to justpath(allt())+\+_fpt Messagebox(juststem(allt())+備份成功！ ,64+0,數(shù)據備份 ) Else If file(sys(5)+curdir()+\+_cdx) Copy file sys(5)+curdir()+\+justfname(allt()) to allt() Copy file sys(5)+curdir()+\+allt(juststem())+.CDX to justpath()+\+allt(juststem())+.CDX Messagebox(juststem(allt())+備份成功！ ,64+0,數(shù)據備份 ) Else Copy file sys(5)+curdir()+\+justfname(allt()) to allt() Messagebox(juststem(allt())+備份成功！ ,64+0