酒店客房管理系统信息系统与数据库课程设计报告.docx

《酒店客房管理系统信息系统与数据库课程设计报告.docx》由会员分享，可在线阅读，更多相关《酒店客房管理系统信息系统与数据库课程设计报告.docx（11页珍藏版）》请在沃文网上搜索。

1、信息系统与数据库技术技术实践 目录一、系统目标1二、需求分析11.业务需求12.数据处理需1三、数据库设计11.数据库概念设计12.数据流图23.框架功能结构2四、系统开发设计2 1.数据库的逻辑设计2 2.数据库关系图2 3.数据库的物理设计3 4.系统运行结果4五、课程设计总结9六、附录101.参考文献102.程序清单1010信息系统与数据库技术技术实践宾馆客房管理系统设计报告一、 系统目标本系统运用于酒店客房定退和客房管理，帮助酒店更好管理房间。二、 需求分析1.业务需求网上客房信息管理系统需要管理员及时更新客房信息，客户信息和订单信息，达到资源的有效配置。2.数据处理需求本系统涉及的数

2、据源有客房信息表、客户信息表、订单信息表。三、 数据库设计1.数据库概念设计系统的主要实体有两个即客房和客户，他们之间通过“预定”活动联系起来。通过分析定义各实体的属性，建立了如下E-R图。2.数据流图3.框架功能结构四、 系统开发设计1.数据库的逻辑设计客房信息表（房号、房间类型、房间等级、价格、入住情况、备注）订单表（订单号、客户号、预定时间、房号、支付方式、入住时间、退房时间）客户信息表（客户号、姓名、性别、身份证号、手机号码、电子邮箱）2.数据库关系图3数据库物理设计（1）客房信息表T-RoomsInfo字段名称字段说明类型定义属性限定索引关系（外键）RoomCode房号Char(3)

3、Primary Key 主索引RoomType房间类型Varchar(20)Not NullRoomLevel房间等级Varchar(20)Not NullCheckIn入住情况BitDefault 0Price价格MoneyNot NullRemark备注Varchar(50)（2）订单表T-OrderInfo字段名称字段说明类型定义属性限定索引关系（外键）OrderCode订单号Char(8)Primary Key主索引CustomerCode客户号Char(8)Not NullOrderTime预定时间DateTimeNot NullDefault GetDate()RoomCode房号

4、Char(3)Primary Key T-RoomsInfo: RoomCodeCheck-inTime入住时间DateTimeNot NullCheck-outTime退房时间DateTimeNot NullPayType支付方式Varchar(1)Not Null(支付方式PayType取值：“C”为货到现金支付；“I”为信用卡支付。)（3）客户信息表T-CustomersInfo字段名称字段说明类型定义属性限定索引关系（外键）CustomerCode客户号Char(8)Primary Key 主索引T-OrderInfo：CustomerCodeCustomerName姓名Varchar

5、(20)Not NullSex性别Char(2)Not NullIDnumber身份证号Char(18)Not NullCellphoneNumber手机号码Char(11)Not NullEmail电子邮箱Varchar(30)（4）建表代码use hotelgocreate table T_Roomsinfo(roomcode char(3)not null,roomtype varchar(20)not null,roomlevel varchar(20)not null,checkin bit default 0,price money not null,remark varchar(

6、50),constraint roomcodePK primary key(roomcode)create table T_orderinfo(ordercode char(8)not null,customercode char(8)not null,ordertime datetime Default getdate()not null,roomcode char(3)not null,CheckinTime datetime not null,CheckoutTime datetime not null,paytype varchar(1)not null,constraint orde

7、rPK primary key(ordercode,roomcode,customercode)create table T_Customersinfo(customercode char(8)not null,customername varchar(20)not null,sex char(2)not null,IDnumber char(18)not null,cellphonenumber char(11) not null,email varchar(30),constraint customerPK primary key(customercode)4.系统运行结果（1）客房信息查

8、询Imports System.Data.SqlClientPublic Class form3 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim cn As New SqlConnection(Data Source=.;Initial Catalog=hotel;Integrated Security=True) Dim sql As String = select * from T_RoomsInfo _ & whe

9、re roomcode= & TextBox1.Text & Dim ad As SqlDataAdapter = New SqlDataAdapter(sql, cn) Dim ds As New DataSet() ad.Fill(ds, RoomsInfo) DataGrid1.DataSource = ds.Tables(RoomsInfo) End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Me.Clos

10、e() Form2.Show() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click TextBox1.Text = End SubEnd Class（2）客户信息查询Imports System.Data.SqlClientPublic Class form4 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.Eve

11、ntArgs) Handles Button1.Click Dim cn As New SqlConnection(Data Source=.;Initial Catalog=hotel;Integrated Security=True) Dim sql As String = select * from T_CustomersInfo _ & where Customercode= & TextBox1.Text & Dim ad As SqlDataAdapter = New SqlDataAdapter(sql, cn) Dim ds As New DataSet() ad.Fill(d

12、s, CustomersInfo) DataGrid1.DataSource = ds.Tables(CustomersInfo) End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Me.Close() Form2.Show() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

13、Handles Button3.Click TextBox1.Text = End SubEnd Class （3）订单信息管理Imports System.Data.SqlClientPublic Class form5 Inherits System.Windows.Forms.Form Public mybind As BindingManagerBase Private Sub form5_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load SqlDataAdapter

14、1.Fill(DataSet11.T_OrderInfo) mybind = BindingContext(DataSet11, T_OrderInfo) DataGrid1.DataSource = DataSet11.T_OrderInfo End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click mybind.Position = 0 DataGrid1.CurrentRowIndex = mybind.Positi

15、on End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click mybind.Position = mybind.Position - 1 DataGrid1.CurrentRowIndex = mybind.Position End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handl

16、es Button3.Click mybind.Position = mybind.Position + 1 DataGrid1.CurrentRowIndex = mybind.Position End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click mybind.Position = mybind.Count() - 1 DataGrid1.CurrentRowIndex = mybind.Position End

17、Sub Private Sub DataGrid1_Click1(ByVal sender As Object, ByVal e As System.EventArgs) Handles DataGrid1.Click mybind.Position = DataGrid1.CurrentRowIndex End Sub Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click mybind.AddNew() End Sub Privat

18、e Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click mybind.RemoveAt(mybind.Position) End Sub Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click mybind.EndCurrentEdit() SqlDataAdapter1.Update(Da

19、taSet11.T_OrderInfo) End Sub Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click Me.Close() Form2.Show() End Sub Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click mybind.CancelCurrentEdi

20、t() End Sub Private Sub datagrid1_click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataGrid1.Click mybind.Position = DataGrid1.CurrentRowIndex End SubEnd Class添加订单添加成功删除订单删除成功五、 课程设计总结通过对数据库的学习，我也明白了各行各业都离不开数据库，就算是一个小型的超市也离不开它。可见数据库这门课的广泛性，如果能够认真学好它将来必有成就。我就是抱着这种信念去学习数据库的。第一

21、次接触数据库，第一次接触SQL语言，虽然陌生，但是可以让我从头开始学，就算没有基础的人也可以学得很好。刚开始练习 SQL 语言的时候，并不是很难，基本上都是按照老师的步骤来做，还很有成就感。后来学了单表查询和连接查询后，就慢慢发现越学越困难了，每个题目都要思考很久，并且每个题目基本上不止一个答案，所以必须找出最优的答案。后面的删除、插入、修改这些题目都变化蛮大的，书本上的例题根本无法满足我们，好在老师给我们提供了大量的课件，通过这些 PPT，我们可以巩固课内的知识，还可以学习内容相关的知识，更好地完成老师布置的作业。一个完整的数据库系统就是在修改的状态下完成的，给了我很大的反思。第一、一个数据库的完成一定要考虑各方面的因素，包括现实因素。第二、在完成这类作业时，修改是很正常的，不要因此而厌倦。第三、一个完整的数据库一定不能出现错误，否则会在现实生活中带来不必要的麻烦。通过本学期数据库的学习及大作业的完成，很有去作项目的冲动，但深知自己的能力水平有限，还需要更多的学习。六、 附录参考文献【1】信息系统与数据库技术 刘晓强主编 机械工业出版社 2010，6【2】信息系统与数据库技术学习指导及习题解析上海市教育委员会组编 刘晓强、黄雅萍、闫昱编著 机械工业出版社【3】 SQL2005数据库教程程序清单1. hotel数据库2. VB应用程序3. 截图4. 报告