基于.NET宾馆酒店预订管理系统(6)

来源:xiaoniu168.com 作者:本站原创 添加时间:2012-04-24 点击数:21665

计算机毕业设计介绍:

4.2预订信息的管理
预订信息管理在实现登记客人信息的同时,还完成了预订入住和取消预订等功能,并将显示订房客人信息和空闲房间信息在页面上。当用户录入客户信息并点击保存信息时,客户信息显示在已订房间Datagrid中,同时减少可选择的房间数量,将该房间的状态更新为预订。该模块中,“取消预订”功能实现取消已经订了房间的功能,将房间的状态设为空闲,同时删除“顾客信息表”中相应的记录。“预订入住”功能实现把订了的房间转为入住状态,同时把对应的顾客信息的状态改为“入住” ,预订日期为当前日期。
程序初始化,从房间表中选择状态为空闲的房号,类型, 房价,状态返回到Datagrid1控件体现出来,从“顾客信息表”中返回状态为预订的客人信息如姓名,房号,押金,预订日期。
“保存信息”功能的实现和登记窗体中的类似,为避免累赘在此就不在重复介绍了。
“取消预订”主要由以下代码实现:
Private Sub btcancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btcancel.Click
‘首先判断是否真的要取消预订
‘以下将取消的房间状态设为"空闲",“顾客信息表”中客人的状态改为“退房”
Dim comstr1 As String="update 房间表 set 状态='空闲'where房号='" & DataSet21.顾客信息表.Rows(DataGrid2.CurrentRowIndex).Item(1) & "'"
Dim comstr2 As String="update 顾客信息表set状态='退房'where房号='"&DataSet21.顾客信息表.Rows(DataGrid2.CurrentRowIndex).Item(1)&"'"
 Dim sqlcom1 As New SqlCommand(comstr1, SqlConnection1)
 Dim sqlcom2 As New SqlCommand(comstr2, SqlConnection1)
 SqlConnection1.Open()
 sqlcom1.ExecuteNonQuery()
 sqlcom2.ExecuteNonQuery()
 DataSet21.顾客信息表.Rows(DataGrid2.CurrentRowIndex).Delete()
 SqlDataAdapter3.Update(DataSet21, "顾客信息表")
 Ds1.Clear()
 SqlDataAdapter1.Fill(Ds1, "房间表")
‘清窗数据集重新填充,把空闲的房间重新显示出来
    Catch
        Finally
 SqlConnection1.Close()
End Try
End Sub
“预订入住”主要由以下代码实现:
Private Sub btbook_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btbook.Click
‘判断是否真的要办理入住
‘以下改变"房间表"和"顾客信息表"的状态
 Dim comstr1 As String = "update 房间表 set 状态 = '营业中' where 房号 = '" & DataSet21.顾客信息表.Rows(DataGrid2.CurrentRowIndex).Item(1) & "'"
以下把状态改为"入住",预订日期改为当前时间
Dim comstr2 As String = "update 顾客信息表 set 状态 = '入住',入住日期='"&Now()&"'where入住日期='"& DataSet21.顾客信息表. Rows(DataGrid2.CurrentRowIndex).Item(3) & "'"

〖资料来源:计算机毕业论文 www.xiaoniu168.com

第7页为计算机毕业论文部分......

【联系方式】

【本站信誉】

用心做计算机毕业设计论文网