17702.html
来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 23 行
HTML
23 行
<html> <head> <title>Re: 请问一般要如何判断使用者是否保持在 Internet 连线状态?</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>Re: 请问一般要如何判断使用者是否保持在 Internet 连线状态?</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by dino on August 23, 1999 at 01:57:10:<p>In Reply to: <a href="17700.html">请问一般要如何判断使用者是否保持在 Internet 连线状态?</a> posted by Abner on August 23, 1999 at 01:26:03:<p>若不想用inet,可利用<br>WSOCK32.DLL与icmp.dll来test status<p>declare如下:<br>Public Declare Function IcmpCreateFile Lib "icmp.dll" () As Long<p><br>Public Declare Function IcmpCloseHandle Lib "icmp.dll" _<br> (ByVal IcmpHandle As Long) As Long<p><br>Public Declare Function IcmpSendEcho Lib "icmp.dll" _<br> (ByVal IcmpHandle As Long, _<br> ByVal DestinationAddress As Long, _<br> ByVal RequestData As String, _<br> ByVal RequestSize As Integer, _<br> ByVal RequestOptions As Long, _<br> ReplyBuffer As ICMP_ECHO_REPLY, _<br> ByVal ReplySize As Long, _<br> ByVal Timeout As Long) As Long<p><br>Public Declare Function WSAGetLastError Lib "WSOCK32.DLL" () As Long<p><br>Public Declare Function WSAStartup Lib "WSOCK32.DLL" _<br> (ByVal wVersionRequired As Long, _<br> lpWSADATA As WSADATA) As Long<p><br>Public Declare Function WSACleanup Lib "WSOCK32.DLL" () As Long<p><br>Public Declare Function gethostname Lib "WSOCK32.DLL" _<br> (ByVal szHost As String, _<br> ByVal dwHostLen As Long) As Long<p><br>Public Declare Function gethostbyname Lib "WSOCK32.DLL" _<br> (ByVal szHost As String) As Long<p><br>Public Declare Sub RtlMoveMemory Lib "kernel32" _<br> (hpvDest As Any, _<br> ByVal hpvSource As Long, _<br> ByVal cbCopy As Long)<p><br>当然还有其他自己要coding,若有兴趣.我再mail<br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 17702--></ul><!--end: 17702--><br><hr size=7 width=75%><p></body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?