主题：求房态图的做法

 

 

可以得到 行是房间号 列是日期的表格，还需要在表格中填入， 某房间在某天是哪个客人预订的以及入住状态

狐爸说过，开发版的用户，也可以下载商业版，安装后，就可以打开试用版了。

你打不开试用版，我打不开开发版。

从你贴出的几张表，客人与房间号联系不上嘛。

客户信息表和客户行程表是通过客户ID关联的。

 

客户行程表中记录的是客户ID，日期，房间号。 同一个客户ID在这个行程表中有多条记录，比如在8月1日住201,8月2日还是201,8月3日调房到202了。

 

我装了个试用版可以打开开发版文件了。

 

 

此主题相关图片如下：客房信息表.jpg


此主题相关图片如下：客户信息表.jpg


此主题相关图片如下：客户行程表.jpg

你用试用版，做个例子传上来。

8月15号，不同的客人住进了同一个房间，怎么算？

试用版的，请帮忙看看。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:客房管理房态.rar

 

 

 

不同的客人住到同一个房间的问题，

这个也是后面要解决的问题， 目前连怎么查询得到房态表都还不会呢。

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:房态表.table

多谢帮助,而且是如此快速,

我先研究研究读懂代码,再扩展修改我要的.

出现错误,我估计是和使用外部MSSQL作为数据源, 语法上出现错误

 

怀疑是  这段代码里的, 下划线部分需要修改.请高手明示.

 

 

Dim mon As Integer = Date.Today.Month
Dim days As Integer = Date.DaysInMonth(Date.Today.Year,Date.Today.Month)
Dim s As String
For j As Integer = 1 To days
    s + = "'' As " & mon & "月" & j & "日,"
Next
s = "Select '' As 房间号," & s.trim(",") & " from {客房信息表}"
Dim dt As DataTable = DataTables("房态图_Table1")
dt.Fill(s,True)

此主题相关图片如下：错误.jpg