本帖最后由 phenix 于 2009-11-16 16:41 编辑 #include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ###
$Form1_1 = GUICreate("远程连接工具V1.0", 568, 299, 292, 127)
$Input1 = GUICtrlCreateInput("", 96, 30, 49, 21)
$Button1 = GUICtrlCreateButton("Auto", 472, 28, 51, 25, 0)
$Label1 = GUICtrlCreateLabel("连接", 32, 32, 35, 17)
$Input2 = GUICtrlCreateInput("", 96, 94, 49, 21)
$Label2 = GUICtrlCreateLabel("连接", 32, 96, 35, 17)
$Input3 = GUICtrlCreateInput("4899", 280, 94, 41, 21)
$Label3 = GUICtrlCreateLabel("port", 192, 96, 22, 17)
$Button2 = GUICtrlCreateButton("Manual", 472, 92, 51, 25, 0)
GUISetState(@SW_SHOW)
GUISetBkColor (0xe6e6fa) ;背景颜色
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Button1
Run("radmin.exe /connect:" & GUICtrlRead($Input1) & ":4899")
If WinWaitActive("输入密码") Then
Send("*********")
Send("{ENTER}")
EndIf
Case $Button2
Run("radmin.exe /connect:" & GUICtrlRead($Input2) & ":" & GUICtrlRead($Input3))
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
这个是用来连接远程服务器的小工具。
但是出现一个问题,
按第一个按钮,如果是正确的服务器、端口进行连接,这个窗口没问题,但是服务器或者端口错误输入,会提示radmin的错误连接信息,然后点击第一个按钮,第二个按钮,以及关闭窗口都没有任何反应,只能用退出脚本的方法;
按第二个按钮,服务器或者端口输入错误,也会提示radmin的错误连接信息,但此时窗口中的按钮,以及关闭窗口都是可以的
请教各位,怎样让第一个按钮能在错误的情况下继续操作其他按钮
原因是在
If WinWaitActive("输入密码") Then
Send("*********")
Send("{ENTER}")
这个地方如果出错,WinWaitActive进程一直就在等待不释放,改为
If WinWaitActive("输入密码","",3) Then
Send("*********")
Send("{ENTER}")
就可以了 |