call batch silently from vbscript

[Briandr]

I am having a devil of a time getting this line to call my batch silently. Any ideas?

CreateObject("Wscript.Shell").Run chr(34) & "cmd.exe /c %TEMP%\AltirisCleanup\AACleanup.bat" & chr(34) & " /silent",0,true

 

[Geates]

quotes go around the path

CreateObject("Wscript.Shell").Run "cmd.exe /c" & chr(34) & "%TEMP%\AltirisCleanup\AACleanup.bat" & chr(34) , 0, true

-Geates

http://ns7.webmasters.com/caspdoc/html/vbscript_language_reference.htm

 

[guitarzan]

Something like this maybe:
CreateObject("Wscript.Shell").Run("cmd.exe /c " & chr(34) & "%TEMP%\AltirisCleanup\AACleanup.bat" & chr(34) & " /silent"),0,true

 

[Briandr]

Hi Geates,

It worked, but the batch file is still showing up in a command window. I think the issue might be is a batch file is being called from within a batch file. So while the VB command hides the first one, the second one is not being hidden. I think at least.

 

[guitarzan]

Posted at the same time... Same basic idea as Geates. Mine has parenthesis around the Run statement, which may not be necessary

 

[guitarzan]

Geates command skipped the "/silent" switch (which I recommend until you get it working anyway). Just add it back and it should work

 

[Briandr]

Since this batch behaves in ways I am not expecting (came from Symantec) I have begun to try and rewrite with the help of a colleague to vbscript. Can you help with the missing pieces?

Batch

REM Get the Altiris Agent install path

FOR /F "tokens=2*" %%A IN ('REG.EXE QUERY "HKLM\Software\Altiris\Altiris Agent" /V "installdir"') DO SET AgentDir=%%B set tempbat=%temp%\AgentClean.bat"

REM Create temporary batch file to execute while the agent restarts echo "%AgentDir%\aexagentutil" /stop > %tempbat% echo rmdir "%AgentDir%\TaskManagement\cache" /s /q >> %tempbat% echo rmdir "%AgentDir%\TaskManagement\status" /s /q >> %tempbat% echo rmdir "%AgentDir%\TaskManagement\statusXml" /s /q >> %tempbat%

REM echo rmdir "%AgentDir%\TaskManagement\lti" /s /q >> %tempbat% -- remove away the REM, from this line only if you are running on 7.1 and above

echo ping localhost -n 30 >> %tempbat%

echo "%AgentDir%\aexagentutil" /start >> %tempbat% echo exit >> %tempbat% REM Executes temporary batch file start "" /MIN %tempbat%

VB

ON ERROR RESUME NEXT
DIM SRCPath, WshShell, fso
DIM CLEANUPCOMPLETED = FALSE

Set fso = CreateObject("Scripting.FileSystemObject")
Set WshShell = WScript.CreateObject("WScript.Shell")

SRCPath = WshShell.RegRead("HKLM\Software\Altiris\Altiris Agent\installdir")

Return = WshShell.Run(CHR(34) & SRCPath & "\AeXAgentUtil.exe" & CHR(34) & " /stop", 0 , TRUE)

fso.DeleteFolder(SRCPath & "\TaskManagement\cache")
fso.DeleteFolder(SRCPath & "\TaskManagement\status")
fso.DeleteFolder(SRCPath & "\TaskManagement\status")
fso.DeleteFolder(SRCPath & "\TaskManagement\statusXml")
fso.DeleteFolder(SRCPath & "\TaskManagement\lti")
WScript.Sleep 5000
Return = WshShell.Run(CHR(34) & SRCPath & "\AeXAgentUtil.exe" & CHR(34) & " /start", 0 , TRUE)

'*****************************************************
Public SUB filechk()

CLEANUPCOMPLETED = FALSE

If fso.FileExists("C:\windows\system32\cleanupcompleted.txt") Then CLEANUPCOMPLETED = TRUE : Exit SUB

END SUB


Any and all help graciously appreciated.

 

[guitarzan]

For starters, remove the "on error resume next" line, or you will never see run time errors, or be able to fix them