这一行好像不能退删的，因为下面WSAStartup(0x202, @WsaData)要调用这个参数的，
我把WsaData  = REPLICATE(0h00,398)直接复制到命令行里，也是报错。。，你试试。。

我这在那都无异常。
是不是你的浏览器问题，可以看看复制的文本，如：
? STRCONV("WsaData  = REPLICATE(0h00,398)", 15) 看看字符内码是否正确
? LEN("WsaData  = REPLICATE(0h00,398)") 看看串长如何

? STRCONV("WsaData  = REPLICATE(0h00,398)", 15)
函数参数的值、类型、或数目无效。

? LEN("WsaData  = REPLICATE(0h00,398)")
30

你的VFP有问题? 自己动手输入试试。

不会是不支持6.0吧。。

不好意思！确是VFP9下的代码。

这个PING对我们来说，没什么用，
但对那些不太懂电脑网络的用户来说，有点用，可以用来测试客户端与服务器，是不是网络通的。。。

佩服。。大神的代码，一复制就能用，并且还好用。。