[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[问题求助] 代码2提示有错误。这个语法好像有问题。如何修改?

代码2提示有错误。这个语法好像有问题。如何修改?
loop until wshell.appactivate "软件xxx标题(启动和登录界面,标题一样)"


代码1——————————————————————————————
set wshell=createobject("wscript.shell")
wshell.run """C:\软件xxx.EXE""",1
wscript.sleep 10000 '10秒

wshell.appactivate "软件xxx标题(启动和登录界面,标题一样)"

wshell.sendkeys "帐号xx"
wshell.sendkeys "{enter}"

wshell.sendkeys "密码xx"
wshell.sendkeys "{enter}"





代码2——————————————————————————————
set wshell=createobject("wscript.shell")
wshell.run """C:\软件xxx.EXE""",1

do
    wscript.sleep 1000
loop until wshell.appactivate "软件xxx标题(启动和登录界面,标题一样)"


wshell.appactivate "软件xxx标题(启动和登录界面,标题一样)"
wshell.sendkeys "帐号xx"
wshell.sendkeys "{enter}"

wshell.sendkeys "密码xx"
wshell.sendkeys "{enter}"

loop until wshell.appactivate "软件xxx标题(启动和登录界面,标题一样)"
这一句要用方法调用,而不是过程。

TOP

  1. do
  2.     If wshell.AppActivate("软件xxx标题(启动和登录界面,标题一样)") Then Exit Do
  3.     wscript.sleep 1000
  4. loop
复制代码
  1. do While wshell.AppActivate("软件xxx标题(启动和登录界面,标题一样)") = False
  2.     wscript.sleep 1000
  3. loop
复制代码
『千江有水千江月』千江有水,月映千江;万里无云,万里青天。    http://yu2n.qiniudn.com/

TOP

返回列表