[FUNC]测试是否联网

Address = "smtp.qq.com"
;~ Address = "10.12.34.6"   
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 := ""
returnAddress = "smtp.qq.com"
;~ Address = "10.12.34.6"