【文章內容簡介】
證件號碼證件名稱 標志退宿提醒 the ER chart of registration information table在此系統(tǒng)中,客房是一個重要的實體,客房實體包含了客房的基本配置信息,以及當前房間狀態(tài) ,:客房房間號房間類型價格標志營業(yè)日期房態(tài)配置使用設置 the ER chart of registration rooms table客人退房時需要對退房信息進行登記,退房登記實體包含人的基本信息以及對房費進行結算登記的信息,:住宿時間住宿日期退宿日期憑證號碼 摘要退房登記住宿天數(shù)客房價格實收宿費姓名客房類型房間號詳細地址證件號碼證件名稱 預收宿費退還宿費 the ER chart of check registration table4數(shù)據(jù)庫設計 office Access2003簡介Microsoft Access是一種關系式數(shù)據(jù)庫,是由微軟公司開發(fā)的。關系式數(shù)據(jù)庫由一系列表組成,表又由一系列行和列組成,每一行是一個記錄,每一列是一個字段,每個字段有一個字段名,字段名在一個表中不能重復。表與表之間可以建立關系(或稱關聯(lián),連接),以便查詢相關聯(lián)的信息。Access數(shù)據(jù)庫以文件形式保存,文件的擴展名是MDB。Access 數(shù)據(jù)庫由六種對象組成,它們是表、查詢、窗體、報表、宏和模塊。表(Table)是數(shù)據(jù)庫的基本對象,是創(chuàng)建其他5種對象的基礎。表由記錄組成,記錄由字段組成,表用來存貯數(shù)據(jù)庫的數(shù)據(jù),故又稱數(shù)據(jù)表。查詢(Query)可以按索引快速查找到需要的記錄,按要求篩選記錄并能連接若干個表的字段組成新表。窗體(Form) 提供了一種方便的瀏覽、輸入及更改數(shù)據(jù)的窗口。還可以創(chuàng)建子窗體顯示相關聯(lián)的表的內容。窗體也稱表單。報表(Report) 的功能是將數(shù)據(jù)庫中的數(shù)據(jù)分類匯總,然后打印出來,以便分析。宏(Macro) 相當于DOS中的批處理,用來自動執(zhí)行一系列操作。模塊(Module) 的功能與宏類似,但它定義的操作比宏更精細和復雜,用戶可以根據(jù)自己的需要編寫程序。該系統(tǒng)使用了Access數(shù)據(jù)庫,其各表的功能和具體設計結構如下:(tb_user)功能是保存系統(tǒng)的用戶數(shù)據(jù),: table of user information字段名稱數(shù)據(jù)類型字段大小操作員文本10密碼文本50(tb_djb)功能是用來保存客人住宿時的住宿登記信息,: table of registration information字段名稱數(shù)據(jù)類型字段大小憑證號碼文本20姓名文本50證件名稱文本20證件號碼文本20詳細地址文本50房間號文本20客房類型文本10客房價格貨幣8住宿日期日期/時間8住宿時間日期/時間8住宿天數(shù)數(shù)字雙精度型應收宿費貨幣8預收金額貨幣8提醒日期日期/時間8退宿日期日期/時間8備注文本50標志文本1日期日期/時間8時間日期/時間8退宿時間日期/時間8提醒時間日期/時間8摘要文本200BZ數(shù)字雙精度型(tb_kf)功能是用來保存客房基礎信息,: table of rooms information字段名稱數(shù)據(jù)類型字段大小房間號文本30房間類型文本50價格貨幣8房態(tài)文本4標志是/否1備注文本100配置文本100使用設置文本10營業(yè)日期日期/時間8(tb_tfd)功能是用來保存客人退宿登記信息,: 參考文獻信息表 table of check rooms information字段名稱數(shù)據(jù)類型字段大小憑證號碼文本20姓名文本50證件名稱文本20證件號碼文本20詳細地址文本50房間號文本20客房類型文本10客房價格貨幣8住宿日期日期/時間8住宿時間日期/時間8住宿天數(shù)數(shù)字雙精度型應收宿費貨幣8金額總計貨幣8預收宿費貨幣8退還宿費貨幣8退房日期日期/時間8退房時間日期/時間8備注文本50BZ數(shù)字雙精度型5系統(tǒng)詳細設計與實現(xiàn) 在系統(tǒng)中使用公共模塊,可節(jié)省系統(tǒng)資源,實現(xiàn)代碼重用。在本系統(tǒng)中新建一個Module模塊,此模塊主要用于共享數(shù)據(jù)庫邊接。其中ESQL()函數(shù)用于打開到數(shù)據(jù)庫的連接,StrCnn()函數(shù)用于返回于一個連接串。公共模塊代碼如下:Public adocon As New 39。Public adoRs As New 39。Public Sub Main() 39。打開數(shù)據(jù)庫連接 Provider=。Data Source= amp。 amp。 \。Persist Security Info=FalseEnd SubPublic Function ESQL(ByVal sql As String) As 39。定義函數(shù) Dim n As 39。定義連接 Dim rs As 39。定義記錄集 Set n = New 39。創(chuàng)建連接 StrCnn 39。打開連接 Set rs = New Trim(sql), n, adOpenKeyset, adLockOptimistic Set ESQL = rsEnd FunctionPublic Function StrCnn() 39。返回一個數(shù)據(jù)庫連接 StrCnn = Provider=。Data Source= amp。 amp。 \。Persist Security Info=FalseEnd Function在登錄窗體對話框中輸入正確的操作員和操作員密碼后才能進到主窗體。: Login form dialog box其中“確定”與“取消”按扭。主要代碼如下:Private Sub Image1_Click()Static itimes As Integer (4).Text = = select * from tb_user where 操作員=39。 + + 39。39。驗證操作員及密碼 If 0 Then 39。如果記錄數(shù)大于零 If = (密碼) Then 39。驗證密碼 Load Main Unload Me Else If (密碼) Then MsgBox 密碼錯誤,請重新輸入!, vbCritical, 系統(tǒng)提示 itimes = itimes + 1 = End If End If Else MsgBox 操作員不存在,請重新輸入!, vbCritical, 系統(tǒng)提示 itimes = itimes + 1 = = End If If itimes = 3 Then 39。錯誤3次,退出系統(tǒng) MyMsg = MsgBox(輸入錯誤,請向系統(tǒng)管理員查詢!, vbCritical, 系統(tǒng)提示) If MyMsg = vbOK Then End End IfEnd Sub程序啟動后,在系統(tǒng)登錄界面驗證完操作員和操作員密碼后,將進入程序主窗體。在程序主窗體中通過選擇菜單命令或單擊工具欄中的按鈕,可調用相應程序窗體或進行相應操作;可根據(jù)操作員不同,確定操作員的相應權限,在主窗體狀態(tài)欄中顯示了系統(tǒng)時間和當前系統(tǒng)操作員。: 主窗體界面Fig. The Main form interface該系統(tǒng)主窗體主要通過菜單命令實現(xiàn)調出各個窗體或執(zhí)行相應操作。同時在主窗體和添加一個Toolbar控件,作為工具欄。通過Toolbar控件的Click事件,也可實現(xiàn)調出相應窗體或執(zhí)行相應操作。使用Button對象的Key屬性標識被單擊的按鈕。例如,在主窗體模塊中