以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]求个网络中断的解决方法  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89476)
--  作者：covechen
--  发布时间：2016/8/22 22:11:00
--  [求助]求个网络中断的解决方法
是这样的， 我写个代码，是实时让本地数据库与远程数据库的某个字段做对比的， 用定时功能 ，0.5秒查询一次本地数据库，如果出现新的数据，就将新的数据与远程数据库作对比。
由于网络问题（或多或少总会出现，今天就出现过两次了），查询不到远程数据库，就会以每秒两次的速度弹出一个出错提示“打不开某表。。”，关都关不了，只能在任务管理器里关了foxtable进程

问下， 如果网络问题无法避免，怎么让提示只出一次。。


Dim cn As New  Data.Oledb.OledbConnection("连接字符串")
Try
    cn.open()
    cn.Close()
     Messagebox.show("通") 
Catch ex As Exception
    Messagebox.show("不通") 
End Try


上面这段是论坛上扒来的，狐狸他爹写的。。。
--  作者：大红袍
--  发布时间：2016/8/22 22:48:00
--  

Dim cn As New  Data.Oledb.OledbConnection("连接字符串")

static pflag As String = "通"
Try
    cn.open()
    cn.Close()
   
    If pflag = "不通" Then
        Messagebox.show("通")
    End If
   
    pflag = "通"
Catch ex As Exception
    If pflag = "通"
        Messagebox.show("不通")
    End If
    pfalg = "不通"
End Try
--  作者：covechen
--  发布时间：2016/8/22 23:24:00
--  
不懂大红袍所写的
你的意思是，让我每次对比时，都先判断一次网络状态，，如果可以打开远程数据库，就不提示，如果打不开就跳出个确定框？

0.5秒判断一次？
--  作者：Hyphen
--  发布时间：2016/8/23 8:34:00
--  
2楼的意思是，当出现状态变化（通=》不通，或不通=》通）的时候才提示。