酒店管理系統实验报告.docxVIP

酒店管理系统实验报告06808班 6号 朱伟数据字典表英文名：guests 表中文名：客人信息表序号属性名含义关键字类型长度阈值说明输入方式1Roomcode房间号varchar4参照room表客户登记2Name客户名varchar20客户登记3Sex性别varchar1M:男；F:女客户登记4Age年龄Int31~200客户登记5certclassno 证件编码varchar2参照编码表客户登记6Certificiate证件名varchar20客户登记7countryno 国家编码varchar2参照国籍表客户登记8arridate 到达日期Smalldatetime客户登记9leftdate 离开日期Smalldatetimeleftdate arridate 客户登记10remarks备注varchar20客户登记表英文名：roomstate 表中文名：房间状态表1Roomcode房间号房间状态表4参照room表数据库录入2Roomstate房间状态房间状态表2r:可租 z:整理o:故障 l:住人数据库录入、修改表英文名：roomtype 表中文名：房间类型表1typeno分类号varchar2数据库录入2typename 分类名varchar101:豪华套, 2:总统套, 3:标准间, 4: 单人间5: 三人间数据库录入3beds床位数Int1数据库录入4price定价Float数据库录入5remarks备注varchar20数据库录入表英文名：room 表中文名：房间配置表1roomcode 房间号码varchar4数据库录入2typeno 房间分类号varchar2参照roomtype表数据库录入表英文名：countrycodes 表中文名：国籍编码表1countryno国籍编码varchar2两位数字数据库录入2country国籍varchar20数据库录入表英文名：certclasses 表中文名：证件编码表1Certno证件编码varchar2数据库录入2certclass证件名称varchar20数据库录入二、功能说明本实验设计的酒店管理系统的主要完成客户的入店信息登记、资料修改、房间基本查询等项目的基本功能1、Fjcx窗体主要完成窗体主要完成客户在登记时的房间选择DataCombo1用于显示房间类型Datalist1数据框用于显示处于当前选择状态的房间号Private Sub DataCombo1_Change()If Option1.Value = True Then 查询出可租房间str2 = select room.roomcode from room,roomstate where roomstate.roomcode=room.roomcode and roomstate.roomstate=r and typeno= DataCombo1.BoundText Set rsRoom = New ADODB.RecordsetrsRoom.Open str2, cnn, adOpenKeyset, adLockOptimisticSet DataList1.RowSource = rsRoomDataList1.ListField = roomcodeElseIf Option2.Value = True Then 查询出已住人的房间str2 = select room.roomcode from room,roomstate where roomstate.roomcode=room.roomcode and roomstate.roomstate=l and typeno= DataCombo1.BoundText Set rst2 = New ADODB.Recordsetrst2.Open str2, cnn, adOpenKeyset, adLockOptimisticSet DataList1.RowSource = rst2DataList1.ListField = roomcodeElseIf Option3.Value = True Then 查询出故障房间str2 = select room.roomcode from room,roomstate where roomstate.roomcode=room.roomcode and roomstate.roomstate=o and typeno= DataCombo1