msgbox % "可以连接到: " internetConnected("ftp://10.0.0.10:10002")

internetConnected(url:="") {
  if (!dllCall("Wininet.dll\InternetCheckConnection","Str",url,"Uint",1,"Uint",0))
    MsgBox, 16, 检查更新, 网络异常,将无法更新！, 5
  else
    return 1
}

Sourceurl:="ftp://10.0.0.10:10002"
If (!DllCall("Wininet.dll\InternetCheckConnection", "Str", Sourceurl, "UInt", 0x1, "UInt", 0x0, "Int")) {
  MsgBox, 16, 检查更新, 网络异常,将无法更新！, 5
  ExitApp
}

 

声明：站内资源为整理优化好的代码上传分享与学习研究，如果是开源代码基本都会标明出处，方便大家扩展学习路径。请不要恶意搬运，破坏站长辛苦整理维护的劳动成果。本站为爱好者分享站点，所有内容不作为商业行为。如若本站上传内容侵犯了原著者的合法权益，请联系我们进行删除下架。