没有知道 发表于 2009-2-8 21:39:35

为什么会这样


$a=InputBox("Ping工具","输入IP","","",1,1)
If @error=1 Or $a="" Then
Exit
EndIf
Run ("cmd.exe")
WinWaitActive("C:\WINDOWS\system32\cmd.exe")
Send("ping "&$a&" -t")
Send("{ENTER}")


请高手们看下那里写错了,为什么脚本运行输入IP后有时候正常,有时候会出现下面的情况.
出现这种情况后按下脚本上的取消后在AU3打开的CMD下再手工输入PING IP -T回车后原来关掉的脚本又出来了
偶自己估计脚本是在最后按下Send("{ENTER}")有问题,有什么办法可以解决吗?

[ 本帖最后由 没有知道 于 2009-2-9 18:06 编辑 ]

luckscy 发表于 2009-2-8 22:47:57

运行CMD不要用这个方法啊
Run(@ComSpec & ' 这儿写上的你命令就行了', "", @SW_HIDE)
send经常出错来着

没有知道 发表于 2009-2-9 16:05:33

用你的办法是直接PING固定IP,可是我ping的IP不是固定一个的
Run(@ComSpec & " /k ping -t 192.168.0.251")这样写是可以,
但换成这样
Run(@ComSpec & " /k ping -t "&$a)就不成了
还是会出现想上面的错误

顽固不化 发表于 2009-2-9 16:19:55

不知道咋会事，多次试验，LZ的和2楼的在我这里都能用。

没有知道 发表于 2009-2-9 16:47:49

我发给别人用有的人能用,有的不能,但多数是不能,还望高手指点

bin0131 发表于 2009-2-9 18:00:39

$a=InputBox("Ping工具","输入IP","","",1,1)
If @error=1 Or $a="" Then
Exit
EndIf
Run ("#r")
WinWaitActive("运行")
Send("ping "&$a&" -t")
Send("{ENTER}")
这样应该可以实现

没有知道 发表于 2009-2-9 18:04:44

感谢大家回答,原因我已经找到了:face (29):

cls822001 发表于 2009-2-9 18:16:13

这个也许比你按键好用

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 410, 168, 319, 214)
$Label1 = GUICtrlCreateLabel("您要PING的IP:", 24, 24, 120, 30)
$mstscip = GUICtrlCreateInput("", 136, 24, 241, 21)
$Button1 = GUICtrlCreateButton("开始", 48, 104, 113, 57, 0)
$Button2 = GUICtrlCreateButton("退出", 240, 104, 129, 57, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
      $nMsg = GUIGetMsg()
      Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        $ip = GUICtrlRead($mstscip)
                     Run(@ComSpec & " /c start ping -t " & $ip,"",0)
                Case $Button2
                        Exit
      EndSwitch
WEnd

没有知道 发表于 2009-2-9 20:25:49

很好,很强大

javarike 发表于 2009-2-9 22:11:44

不错，可以用得上了。。
页: [1]
查看完整版本: 为什么会这样