VBScripts run method 사용 시 wait 효과 주기

Set objShell = CreateObject(“Shell.Application) 

Set wsObjShell = WScript.CreateObject(“WScript.Shell”)  

intReturn = wsObjShell.Run(“…\startProc.bat”)  

WScript.Sleep 360000 ‘ wait end wsObjShell.SendKeys “{TAB}”, True …

혹은

return = wsObjShell.Run (“…\startProc.kix”, 1,TRUE)

 

혹은

srtCmd1 = “start /wait msiexec.exe /i c:\a.msi”

srtCmd2 = “start /wait msiexec.exe /i c:\b.msi”

srtCmd3 = “c:\c.bat”

objShell = CreateObject(“WScript.Shell”)

objShell.Run srtCmd1, 1, True

objShell.Run srtCmd2, 1, True

objShell.Run srtCmd3, 1, True

 

 

서진우

슈퍼컴퓨팅 전문 기업 클루닉스/ 상무(기술이사)/ 정보시스템감리사/ 시스존 블로그 운영자

You may also like...