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 = Date.Today.day To days
s + = "' ' As " & mon & "月" & j & "日,"
Next
s = "Select [_Identify], ' ' As 房间号 ," & s.trim(",") & " from {客房信息表} order by 排序 "
Dim dt As DataTable = DataTables("房态表_Table1")
dt.Fill( s , "zcltoursql2005", True)
上面的select语法有错误,zcltousql2005是外部mssql数据源。
我估计是 " & s.trim(",") & " 写的不对,因为把这段删掉,可以列出表。
有关fill的详细语法解释在哪里? 这个select的结果应该是把房间号作为房态表_table1的行, s作为列吧?