本帖最后由 PPTBS 于 2015-10-15 11:24 编辑 #Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_Compile_Both=y
#PRE_UseX64=y
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#include <file.au3> ;调用公共函数 文件操作
Dim $hs ;定义文件行数
;@AutoItExe ;定义当前目录
Dim $ip
#include <INet.au3>
For $i = 1000 to 1 Step -1
Run ("rasdial.exe /disconnect") ;断开连接
Sleep(1000)
Run ("rasdial 宽带连接 宽带账户 宽带密码") ;宽带连接
Sleep(10000)
$ip = _GetIP()
Sleep(2000)
$file = FileOpen("test.txt", 1)
FileWrite($file, $ip)
FileWrite($file, "|")
FileClose($file)
Next
|