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 [128-bit AES Encryption]") Then WinActivate("VNC 验证: 192.168.1.252 [128-bit AES Encryption]");激活指定窗口 Send("123456") Send("{enter}");回车 WinWait("NEWYEAR-08");程序暂停到指定窗口为止 WinActivate("NEWYEAR-08");激活指定窗口 Send("123456") Send("{enter}");回车 $ver = 2 EndIf Until $ver = 2
举报
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-2-25 17:01 , Processed in 0.085790 second(s), 19 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2024 Discuz! Team.