Board logo

标题: [问题求助] [已解决]发送组合键ctrl+n的vbs代码，如何写？谢谢 [打印本页]
作者: ygqiang    时间: 2015-5-28 07:06     标题: [已解决]发送组合键ctrl+n的vbs代码，如何写？谢谢

本帖最后由 ygqiang 于 2015-5-28 07:16 编辑

[已解决]发送组合键ctrl+n的vbs代码，如何写？谢谢
  1. '定义主程序 

  2. Dim Program1,a,b 

  3. Program1 = "C:\TheWorld1\TheWorld.exe"

  4. 

  5. Set WshShell=createobject("wscript.shell") 

  6. 

  7. '运行主程序 

  8. Set oExec=WshShell.Exec(Program1) 

  9. WScript.Sleep 2000 

  10. 

  11. '发送组合键ctrl+n

  12. WshShell.SendKeys "^n"

  13. 

  14. '输入网址 

  15. wshShell.SendKeys "www.baidu.com" 

  16. WshShell.SendKeys "{ENTER}" 

  17. WScript.Sleep 2000 
复制代码




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