获取网络连接状态

Address = "smtp.qq.com"
wmi := ComObjGet("winmgmts:")
queryEnum := wmi.ExecQuery(""
        . "Select * from Win32_PingStatus where Address=" . Address)
        ._NewEnum()
if queryEnum[process] && process.ResponseTime
    MsgBox connection success
else
    MsgBox connection fail
wmi := queryEnum := process := ""
return

给TA捐赠
共{{data.count}}人
人已捐赠
案例

系统命令调用

2020-9-23 21:23:55

其他案例

在输入文字时如何禁用屏蔽笔记本电脑的触摸板输入2020年10月07日

2020-10-7 10:04:14

3 条回复 A文章作者 M管理员
  1. 星星雨

    感谢提供

  2. 可心儿

    怎么运行呢

    • dome

      复制到本地===>更改后缀名字为ahk=====>直接运行就行了

个人中心
购物车
优惠劵
今日签到
有新私信 私信列表
搜索