标题: 帮忙看看，这个AU3脚本错在哪里？ [打印本页]

---

作者: hdj20030403     时间: 2007-1-30 01:55    标题: 帮忙看看，这个AU3脚本错在哪里？

#NoTrayIcon
AdlibEnable("AUTODRI")
Func AUTODRI()
     if WinExists("系统设置改变","Windows 已安装完新设备。") then
        Send("!y")
     endif
      WinWait("找到新的硬件向导","欢迎使用找到新硬件向导")      
      If Not WinActive("找到新的硬件向导","欢迎使用找到新硬件向导") Then
      WinActivate("找到新的硬件向导","欢迎使用找到新硬件向导")
      endif
      Send("!n")
      WinWaitActive("找到新的硬件向导","完成找到新硬件向导")
      Send("{enter}")
      
EndFunc
WinWait("系统设置改变","Windows 已安装完新设备。")
WinActivate("系统设置改变","Windows 已安装完新设备。")
Send("!y")

“系统设置改变”的这个，不起作用啊！

---

作者: electronixtar     时间: 2007-1-30 02:09
呵呵，我也喜欢AutoIt，LZ还是在这个论坛第一个讨论AU3脚本呢。

---

作者: hdj20030403     时间: 2007-1-30 23:13
自己解决了：
#NoTrayIcon
$g_szVersion = "AUTODRIVE 1.0"
If WinExists($g_szVersion) Then Exit
AutoItWinSetTitle($g_szVersion)
AdlibEnable("AUTODRI")
Func AUTODRI()
Select
Case WinExists("找到新的硬件向导","欢迎使用找到新硬件向导")              
      WinActivate("找到新的硬件向导","欢迎使用找到新硬件向导")      
      Send("!n")
      WinWait("找到新的硬件向导","完成找到新硬件向导")
      If Not WinActive("找到新的硬件向导","完成找到新硬件向导") then
      WinActive("找到新的硬件向导","完成找到新硬件向导")
      endif
      Send("{enter}")
Case WinExists("系统设置改变")
      WinActivate("系统设置改变")
      Send("!y")
EndSelect
EndFunc
WinWait("仙乃日，欢迎您的到来！")