Calling a Batch File Through VB Script
Created: 14 Apr 2008 | Updated: 15 Apr 2008 | 8 comments
There would be some situations where we need to call Batch file from Scripts. Here the script to call INSTALL.bat
- Copy the below code to Notepad.
Function Tilak() dim shell set shell=createobject("wscript.shell") shell.run "INSTALL.bat" set shell=nothing End Function - Save the file as .VBS
- Then use this VBscript in Wise Package Studio's CustomActions pane.
About Endpoint Management Community Blog
The Endpoint Management Community Blog is the perfect place to share short, timely insights including product tips, news and other information relevant to the Endpoint Management community. Any authenticated Connect member can contribute to this blog. Filter by:
Blog Tags
Altiris Client Management Suite Configuring Altiris Deployment Solution Symantec Management Platform (Notification Server) Wise Packaging Basics Altiris Server Management Suite Best Practice Compatibility Altiris IT Asset Management Tip/How to Helpdesk Solution Workflow Solution 7.x Installing Ghost Solution Suite Reporting Windows Performance ServiceDesk IT Management Suite Upgrade Mobile Management 7.x SMP 7.x
Comments 8 Comments • Jump to latest comment
Nice code.....It really hepls ....
Thanks
Prasanna Kumar Raja
Sr.Application Packager
Anovatek
Prasanna Kumar Raja
Sr.Application Packager
Anovatek
For the Run method:
shell.run "INSTALL.bat"
It's good to trap any potential errors into a variable and to tell the method not to execute the next line until the current process is complete.
errTrap = shell.run("INSTALL.BAT", 1, True)
This will return any error codes into errTrap. From there you can log the error or act on it accordingly in the script.
"True" tells wscript/cscript to "Wait until this command is complete before running the next line." The "1" is just the window style. Not that important.
Whenever you are returning values you have to put the arguments into parenthesis.
Whenever we are executing vbscripts using Altiris, it is a best practice to return Exit Codes/Return Codes to the Altiris. Following is the template that not only return an Exit code but also writes to the Event Log.
Note: Place the executable and script in one place
'-------------------------------------------------- 'GET CURRENT FOLDER PATH path = FileSystemObject.GetParentFolderName(WScript.ScriptFullName) If Right(path, 1) <> "\" Then path = path & "\" End If errTrap = shell.Run(path, 1 ,True) If (errTrap = 0) Or (errTrap = 3010) Then 'WRITE EXIT CODE [0-success/3010-success&requires reboot] TO EVENTLOG shell.LogEvent vbLogSuccess, sLogHeader & "Installation completed successfully." & VbCrLf & "Exit code: " & errTrap WScript.Quit (errTrap) Else 'WRITE EXIT CODE TO EVENTLOG shell.LogEvent vbLogError, sLogHeader & "Installation failed." & VbCrLf & "Exit code: " & errTrap WScript.Quit (errTrap) End If Set FileSystemObject = Nothing Set Shell = Nothing '--------------------------------------------------I hope this may help.
Thanks,
Eshwar
Thanks, Eshwar
One needs to define sLogHeader variable so that the hedder of the event log will written with this name, befor the following line in the above script
(shell.LogEvent vbLogSuccess, sLogHeader & "Installation completed successfully." & VbCrLf & "Exit code: " & errTrap).
Example
sLogHeader = "Install batch file"
Preferably sLogHeader name should be task name that you are running so that it will be essy identify in event log.
I hope this may help.
Thanks
Sid
I found really helpful your tip, just a question about the command line :
[quote]set shell=nothing[/quote]
What is the meaning for this line in this case ?
Thanks,
Paolo
Its just to clear the cache memory which is being used by the variable shell. It frees the memory once the script completes its execution.
Cheers'
Vijay
Microsoft MVP [Setup-Deploy]
Weblog: www.msigeek.com
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run chr(34) & "C:\Batch Files\syncfiles.bat" & Chr(34), 0
Set WshShell = Nothing
Cheers Tillu
I am trying to package a .p12 certificate.I tried to use capicom.dll and wrote the batch file.Called the batch file using the vbs u have given. But the certificate is not appearing in the certificate manager. I also tried using another vbs which installs the certificate to the certificate manager,but gives error 1720 at end of installation.Any suggestions where im goin wrong?
.bat file:
@echo off
echo Importing digital licence...
rem Define the file locations as environment variables
set DLLFILE="C:\Program Files\Microsoft CAPICOM 2.1.0.2 SDK\Lib\X86\capicom.dll"
set CSTOREFILE="C:\Program Files\Microsoft CAPICOM 2.1.0.2 SDK\Samples\vbs\CStore.vbs"
set CERTFILE="C:\Users\User\AppData\Local\Temp\MNPCertificate\Cert.p12"
set CERTPASS=****
rem Import the Cert.p12 certificate with the supplied password
cscript /nologo %CSTOREFILE% import %CERTFILE% %CERTPASS%
.vbs to call .bat from custom action:
Option Explicit
Dim objShell
Set objShell = CreateObject("WScript.Shell")
objShell.run "C:\path to file.bat"
WScript.Quit
Would you like to reply?
Login or Register to post your comment.