在计划管理里有一段代码,在固定的时间内执行某一个按键的操作,程序一直开着没关闭,但是偶尔会报"连接被终止"的异常,一直查不到原因。如果单独执行那个按钮是正常的,不报这个连接终止的错误,产生的数据也是正常的。
就是不知道是有什么情况会造成这个异常?
计划管理里的代码如下:
以下内容为程序代码:
1 Static dt_Last As Date '静态变量,用于保存上次备份的时间
2 Dim tp As TimeSpan
3 tp = Date.Now - dt_Last
4
5 If tp.TotalHours >= 1 AndAlso Date.Now.Hour = 12 Then '如果距离上次备份已经超过一个小时,并且是12点
6 dt_Last = Date.Now
7 If Forms("主界面").Opened Then
8 Dim btnBom As WinForm.Button = Forms("主界面").Controls("btnExWp")
9 btnBom.PerformClick()
10 End If
11 End If