摘要:VB源码,网络相关,网络连接检查

　　VB网络连线检查的程序源代码，主要是使用Ping命令实现，运行后生成BAT文件，官方提示说只能运行于Windows98系统中，不过测试时候，在XP系统下也正常运行了，而且检测结果并无异常。基本原理是：建立一个Bat 档，在这个Bat 档中，设定：

　　随便 Ping 一个在 Internet 上的 Server 二次，将结果写入文字档 Test.txt

　　在这伫, 我们以Ping www.hinet.net 为例进行Ping的检查。

　　开始检查是否连线，执行我们建立的 Bat 档 --> Ping

　　TestString = "command.com /c " & App.Path & "Test.bat"

　　Shell (TestString), vbHide

　　如果 Ping 成功, 写入文字档 Test.txt 的字串长度至少会大于 200

　　不过由于 Ping 的动作会延迟几秒钟，所以，我们让程式等待 5 秒钟。

-Summary: VB source, network-related, the network connection to check the VB network connection check program source code, mainly using the Ping command to achieve the BAT file generated after running the official suggested that it can only run in a Windows98 system, but the test time, XP system under normal operation, and no abnormal test results. The basic principle is: the establishment of a Bat file Bat file settings: casual Ping on the Internet Server twice, and writes the results to a text file Test.txt in this queue, we have to Ping www.hinet.net Ping check is an example. Start checking connections, the implementation we have created the Bat file->　the Ping TestString = " command.com/c"　&　App.Path &　" Test.bat"　Shell (TestString) vbHide if Ping is successful, write a text file Test a. txt string length at least greater than 200 but due to the Ping action will be delayed a few seconds, so we let the program wait for 5 seconds.