VBS定时执行idea程序的Testng文件的方法
(编辑：jimmy 日期: 2024/12/22 浏览：2)
背景:
Windows环境cmd命令行执行TestNG文件，会报一些jar包路径问题，所以改用vbs打开idea程序的通过点击快捷键执行testng.xml文件。
vbs代码如下：
'第一部分：定义变量
Dim RunTime
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
'第二部分：输入等待的分钟数(默认：180分钟)，等待结束后，会执行第三部分
RunTime = InputBox("Please enter how long to execute:", "Time(单位：Minutes)", 180)
WScript.Sleep (RunTime*1000*60)
'第三部分：打开idea，并激活idea窗口(主要是为了获取焦点，否则快捷键无法执行)
WshShell.Run "IDEA.lnk"
WScript.Sleep 60000
WshShell.AppActivate "UITest"
'第四部分：通过快捷键Shift+F10，执行testng
WScript.Sleep 1000
WshShell.SendKeys "+{F10}"
WScript.Sleep 1000
WScript.Quit
注1：vbs执行程序，保存格式ANSI，否则中文标题显示为乱码。
注2：vbs执行程序，程序的安装路径不能有空格，所以可以建一个快捷方式放到vbs同一个目录下执行即可。
注3：激活idea应用窗口步骤，需要确保名称正确(不用写全标题名称，只写前几个字符即可)
注4：确保打开的idea，默认是选择的testng.xml
如何查看vbs是否在后台运行
上一篇：拖拽文件显示文件路径的vbs代码