我把计算机的 睡眠状态 设置了 30分钟
发现在定时加载数据的代码执行会提示错误，这个该怎么处理呢？
代码如下
If TryConnectHost("192.168.44.100") Then
If Forms("会议_修改").Opened OrElse Forms("会议_增加").opened OrElse Forms("日程 _修改").Opened OrElse Forms("日程_增加").opened Then
Else
Vars("lastrow") = DataTables("日程明细").Compute("max(_Identify)")
'重新加载
DataTables("日程明细").LoadFilter =""
DataTables("日程明细").Load
endif
Dim drrcmx As DataRow = DataTables("tbfcpclist").Find("username = '" & Vars("user") & "'")
If drrcmx IsNot Nothing Then
drrcmx("日程明细") = DataTables("日程明细").Compute("max(_Identify)")
drrcmx.Save
End If
endif
加好友 
发短信
Post By：2015/11/12 13:54:00 [显示全部帖子]
