关于判断的问题！~`
本帖最后由 idic754 于 2009-6-23 15:30 编辑Run("V.exe");运行
WinWait("VNC Viewer : 连接详细资料");程序暂停到指定窗口为止
WinActivate("VNC Viewer : 连接详细资料");激活指定窗口
Send("192.168.1.252");自动输入IP
Send("{enter}");回车
Dim $ver
$ver = 1
Do
If WinExists("VNC Viewer: 警告") Then ;判断是否有指定窗口
WinActivate("VNC Viewer: 警告");激活指定窗口
Send("{TAB}");TAB切换
Send("{enter}");回车
EndIf
If WinExists("VNC 验证: 192.168.1.252 ") Then
WinActivate("VNC 验证: 192.168.1.252 ");激活指定窗口
Send("123456")
Send("{enter}");回车
WinWait("NEWYEAR-08");程序暂停到指定窗口为止
WinActivate("NEWYEAR-08");激活指定窗口
Send("123456")
Send("{enter}");回车
$ver = 2
EndIf
Until $ver = 2
MsgBox(0, "", "连接成功!")-----------------------------------------------
一个远程的软件，我想做成自动的！~测试过好几次，第一次远程会出现一个（VNC Viewer: 警告）要点是才能继续下去！以后的运行不会出现（VNC Viewer: 警告）这一步，现在就是想做个判断，可是测试了好几次都不成功！~有知道问题出在那的能不能指点下！~谢谢！~
--------------------------------------------
谢谢（都市浪子666 ）的指教！问题解决了！~`````现在上面是正确代码！只要更换自己的密码个IP就可以用了！~` VNC 可以直接命令行连接把 VCN 是可以直接连接，但是第一次连接多个提示！在机器不重启的情况下第二次连接少这个（VNC Viewer: 警告）提示！如果脚本不修改第二次连接的时候会出现卡在输入密码那！~ 用这个判断是否有窗口
if WinExists("窗口标题","窗口文本") Then
MsgBox(0,"有窗口","有窗口")
Else
MsgBox(0,"没有窗口","没窗口")
EndIf
测试还是不成功！~不知道是那写错了！~ 窗口文本是什么意思？ 试试这个,应该可以了
Run("V.exe");运行
WinWait("VNC Viewer : 连接详细资料");程序暂停到指定窗口为止
WinActivate("VNC Viewer : 连接详细资料");激活指定窗口
Send("192.168.1.252");自动输入IP
Send("{enter}");回车
dim $ver
$ver=1
do
ifWinExists("VNC Viewer: 警告") Then;判断是否有指定窗口
WinActivate("VNC Viewer: 警告");激活指定窗口
Send("{TAB}");TAB切换
Send("{enter}");回车
EndIf
if WinExists("VNC 验证: 192.168.1.252 ") Then
WinActivate("VNC 验证: 192.168.1.252 ");激活指定窗口
Send("123456")
Send("{enter}");回车
WinWait("NEWYEAR-08");程序暂停到指定窗口为止
WinActivate("NEWYEAR-08");激活指定窗口
Send("123456")
Send("{enter}");回车
$ver=2
EndIf
Until $ver=2
MsgBox(0,"","貌似OK了")
:face (29):OK了！~谢谢指教！```
页:
[1]