這篇文章給大家介紹使用VBS怎么定時(shí)執(zhí)行Testng文件，內(nèi)容非常詳細(xì)，感興趣的小伙伴們可以參考借鑒，希望對(duì)大家能有所幫助。

創(chuàng)新互聯(lián)專注于美蘭企業(yè)網(wǎng)站建設(shè),響應(yīng)式網(wǎng)站,商城網(wǎng)站定制開(kāi)發(fā)。美蘭網(wǎng)站建設(shè)公司,為美蘭等地區(qū)提供建站服務(wù)。全流程按需定制，專業(yè)設(shè)計(jì)，全程項(xiàng)目跟蹤，創(chuàng)新互聯(lián)專業(yè)和態(tài)度為您提供的服務(wù)

Windows環(huán)境cmd命令行執(zhí)行TestNG文件，會(huì)報(bào)一些jar包路徑問(wèn)題，所以改用vbs打開(kāi)idea程序的通過(guò)點(diǎn)擊快捷鍵執(zhí)行testng.xml文件。

vbs代碼如下：

'第一部分：定義變量
Dim RunTime
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
 
'第二部分：輸入等待的分鐘數(shù)(默認(rèn)：180分鐘)，等待結(jié)束后，會(huì)執(zhí)行第三部分
RunTime = InputBox("Please enter how long to execute:", "Time(單位：Minutes)", 180)
WScript.Sleep (RunTime*1000*60)
 
'第三部分：打開(kāi)idea，并激活idea窗口(主要是為了獲取焦點(diǎn)，否則快捷鍵無(wú)法執(zhí)行)
WshShell.Run "IDEA.lnk"
WScript.Sleep 60000
WshShell.AppActivate "UITest"
 
'第四部分：通過(guò)快捷鍵Shift+F10，執(zhí)行testng
WScript.Sleep 1000
WshShell.SendKeys "+{F10}"
WScript.Sleep 1000
WScript.Quit

注1：vbs執(zhí)行程序，保存格式ANSI，否則中文標(biāo)題顯示為亂碼。

注2：vbs執(zhí)行程序，程序的安裝路徑不能有空格，所以可以建一個(gè)快捷方式放到vbs同一個(gè)目錄下執(zhí)行即可。

注3：激活idea應(yīng)用窗口步驟，需要確保名稱正確(不用寫(xiě)全標(biāo)題名稱，只寫(xiě)前幾個(gè)字符即可)

注4：確保打開(kāi)的idea，默認(rèn)是選擇的testng.xml

 如何查看vbs是否在后臺(tái)運(yùn)行

關(guān)于使用VBS怎么定時(shí)執(zhí)行Testng文件就分享到這里了，希望以上內(nèi)容可以對(duì)大家有一定的幫助，可以學(xué)到更多知識(shí)。如果覺(jué)得文章不錯(cuò)，可以把它分享出去讓更多的人看到。

本文名稱：使用VBS怎么定時(shí)執(zhí)行Testng文件-創(chuàng)新互聯(lián)
網(wǎng)站URL：http://weahome.cn/article/jsgjd.html