文档介绍:pb实现pingIP地址方法
pb实现ping IP地址方法
模拟ping,只对IP地址有效
//用PB创建结构
type icmp_echo_reply from structure
unsignedlong addrepb实现pingIP地址方法
pb实现ping IP地址方法
模拟ping,只对IP地址有效
//用PB创建结构
type icmp_echo_reply from structure
unsignedlong address
unsignedlong status
unsignedlong roundtriptime
unsignedlong datasize
unsignedlong reserved[3]
character data[250]
end type
//声明函数
Function ulong IcmpCreateFile () Library ""
Function long IcmpSendEcho (ulong IcmpHandle, ulong DestinationAddress, string RequestData,long
RequestSize, long RequestOptions, Ref icmp_echo_reply ReplyBuffer, long ReplySize, long
Timeout )
Library "" Alias for "IcmpSendEcho"
Function long IcmpCloseHandle (ulong IcmpHandle) Library "" Function ulong inet_addr (string cp) Library "" Alias for "inet_addr"
//==================================================================== // 函数: wf_ping
//-------------------------------------------------------------------- // 描述: 判断指定的IP地址是否能PING通,此函数还没有判断IP格式是否正确,
// 实际上还应该加上这一功能,才比较完善
//-------------------------------------------------------------------- // 参数:
// value string as_ipaddress 只能判断IP地址,不能判断机器名
// value string as_echomsg 随便一个值都可以
//-------------------------------------------------------------------- // 返回值: boolean
ULong lul_address, lul_handle