以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  [求助]获得ping返回问题  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=75053)
--  作者：modaihuoying
--  发布时间：2015/1/27 16:38:41
--  [求助]获得ping返回问题

我在VBA中可以用代码 application.system("cmd /k"  &"ping www.baidu.com")

来知道网络是否畅通，我现在需要这样的结果，就是如果能连通，返回1，不能连通，返回0，请问这个程序要怎么编写啊？
--  作者：王锋
--  发布时间：2015/1/27 16:41:32
--  
这个是做不到的,你得自己用C++写ACTIVEX控件了
--  作者：qingni0000
--  发布时间：2015/1/30 11:40:18
--  
简单的办法是你写个单独运行的批处理，如果ping的通就创建一个标志文件，ping不通就删除这个文件。vba中检测是否存在这个文件。