主题：请问用的是sql2008数据库，提示查询数据超时已过期怎么办？

请问用的是sql2008数据库，提示查询数据超时已过期怎么办？用了一年多都挺好的，这两天突然出现“查询数据超时已过期”，只有查询其中一个表的数据没法加载，其他表都正常。

急，在线等！

代码如下

Dim y As Integer = dty.Year
Dim m As Integer = dty.Month
Dim d As Integer = dty.Day
If d < 26
    If m > 1
        Dim dt1 As New Date(y, m-1, 26)
        Dim dt2 As New Date(y, m, 25) '获取本月的最后一天

DataTables("sheet2").LoadFilter = "czcj = '" & _UserName & "'  And  jcrq >= '" & dt1 & "' And jcrq <= '" & dt2 & "'"
DataTables("sheet2").Load()

end if

无法加载提示超时已过期？会不会是你的数据量太大导致的加载超时？

如果你没有保存表格或者项目，数据库还有。保存以后，数据库就没有没有了。

那如果这样写呢？

DataTables("sheet2").LoadFilter = "1=2"
DataTables("sheet2").Load()
msgbox(123)