主题：请问用的是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