Board logo

标题: [问题求助] 关于vbs的sendkeys没有响应的问题 [打印本页]
作者: rmd06    时间: 2017-6-12 23:01     标题: 关于vbs的sendkeys没有响应的问题

有两种脚本:
第一种可以运行
  1. set WS=createobject("wscript.shell")

  2. WS.Run ("""C:\Program Files\MATLAB\R2016a\bin\matlab.exe""")'打开matlab编程软件

  3. WScript.Sleep 18000

  4. WS.AppActivate("Matlab R2016a")'激活窗口

  5. WS.SendKeys "% "发送alt空格

  6. WScript.Sleep 500

  7. WS.SendKeys "x"'发送x:这样最大化窗口

  8. WScript.Sleep 500

  9. WS.SendKeys "^0"'发送Ctrl+0,定位光标到命令框

  10. WScript.Sleep 500

  11. WS.SendKeys "paraS@#$%^&*trCell"'发送命令

  12. WScript.Sleep 500

  13. WS.SendKeys "+{ENTER}"'回车,运行命令

  14. WScript.Sleep 500
复制代码
第二种
  1. Set objShell = CreateObject("Shell.Application")

  2. objShell.ShellExecute "C:\Program Files\MATLAB\R2016a\bin\matlab.exe", "", "", "runas", 1

  3. set objShell = nothing

  4. set WS=createobject("wscript.shell")

  5. WScript.Sleep 18000

  6. WS.AppActivate("Matlab R2016a")

  7. WS.SendKeys "% "

  8. WScript.Sleep 500

  9. WS.SendKeys "x"

  10. WScript.Sleep 500

  11. WS.SendKeys "^0"

  12. WScript.Sleep 500

  13. WS.SendKeys "paraS@#$%^&*trCell"

  14. WScript.Sleep 500

  15. WS.SendKeys "+{ENTER}"

  16. WScript.Sleep 500 收起
复制代码
第二种打开matlab后,就没反应了.后面的一系列sendkeys都不知道跑哪里去了.

会不会和管理员权限有关系?
作者: yu2n    时间: 2017-6-13 08:09

以管理員模式執行腳本，在腳本中直接使用 CreateObject("WScript.Shell").Run 啟動 Matlab 程式。



欢迎光临 批处理之家 (http://bathome.net./) Powered by Discuz! 7.2