我所在公司电脑如果要上外网 是需要通过公司的一个网页填写上网账号后才有外网，每天晚上0:00就会被服务器踢下线，到第二天需要上网，必须再一次登录上网认证页面填写账号与密码电脑才可以上外网。  我想写一个程序来监测是否断网，在网上找了一些代码，经过实际测试，已经断网还是显示有网，通过ping命令测试拼不通IP地址，除非把本地连接断开，就显示网络异常，该公司有100多台内网的主机，请路过的高手指点一下就近问题出现在哪儿？

Private Declare Function timeGetTime Lib "winmm.dll" () As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)



Private Sub Form_Load()
Command1.Visible = False
End Sub

Private Sub Timer1_Timer()
Winsock1.Close                  '不管状态，先关闭当前连接
    DoEvents                        '确保关闭操作完成
    Winsock1.Connect "183.2.172.185", 80     '连接百度服务器
End Sub
Private Sub Timer2_Timer()
Command1_Click
End Sub
Private Sub Command1_Click()
If Winsock1.State = sckConnected Then
     Label1.Caption = "网络正常"
Else
     Label1.Caption = "网络异常"
End If
End Sub

主要是在电脑上安装了花生壳软件，把该电脑作为了服务器用，一旦断网就无法访问了，多数是0点 少数乱的，所以就想搞个监测有没有断网的东东

只有用最原始的办法 拼IP后在C盘产生一个记事本，然后再读取关键字来判断。