Solved

# I need a VBscript to run an msi after clicking on an ok button.

Posted on 2009-05-08
771 Views
I need a VBscript to run an msi after clicking on an ok button.  I need our users to see a message that will inform them to close a program before they click an ok button and install runs.  I have the msi working but I am just learning VB scripting.  Thanks.
0
Question by:automaton64
• 2
• 2

LVL 13

Expert Comment

ID: 24336722
See below

option explicit
on error resume next
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")

0

LVL 13

Expert Comment

ID: 24336740
to run the MSi you can use the below;

WshShell.Run "c:\windows\system32\msiexec /i ""program.msi"" /qn"
0

Author Comment

ID: 24338865
This is great.  Thank you. However, when I am testing it out with my msi which uses a transform file nothing seems to happen after the message window.  Here is what I am trying.
option explicit
on error resume next
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "C:\ln85\msiexec /i ""Lotus Notes 8.5.msi"" TRANSFORMS=""Lotus Notes 8.5.mst"""

0

LVL 12

Accepted Solution

zoofan earned 250 total points
ID: 24341494

Edit line 8 to the name of the app to close
Edit line 9 to the full command line for the msi install

save as filename.vbs

run it.

zf
Option Explicit
Dim WshShell
Dim Intresult
Dim strAppName
Dim strCommand

strAppName = "TheApptoClose" ' edit thename of the app you want the user to close.
strCommand = "msiexec.exe /i \\server\share\NameOf.msi" 'edit to the command line to execute the msi.

Intresult = MsgBox("Please close " & strAppName & " before installing this application.",vbOKCancel,"MSI installation")

If Intresult = vbOK Then
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run strCommand,1,True
Else
MsgBox "The installation has been cancelled",vbOKOnly,"MSI Installation"
End If
WScript.Quit(0)

0

Author Closing Comment

ID: 31579478
Yes.  This is just what I need. Thank you.
0

## Featured Post

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

### Suggested Solutions

One of the most frequently asked questions on EE in the "Windows Installer" zone is how to eliminate self-triggered installation of some product.  The problem occurs when, suddenly, whenever a certain application is launched, or even when a folder i…
I have been scripting applications way too long and can never remember how to create an ISS file.  So I decided to write this article to act as my own knowledge base for future reference, and hope you will also benefit. An ISS file is a response …
Progress
Exchange organizations may use the Journaling Agent of the Transport Service to archive messages going through Exchange. However, if the Transport Service is integrated with some email content management application (such as an antispam), the admini…