Check for Certain Apps and then remove them...
Hello folks,
I am looking for a VB script that checks for certain applications through the registry and if it finds them, removes them...
Your help would be greatly appreciated...
Regards,
RePackman
I am looking for a VB script that checks for certain applications through the registry and if it finds them, removes them...
Your help would be greatly appreciated...
Regards,
RePackman
0 Comments
[ + ] Show comments
Answers (6)
Please log in to answer
Posted by:
cblake
13 years ago
http://itninja.com/question/distribution-message556
That might be along the lines of what you seek.
That might be along the lines of what you seek.
Posted by:
Repackman
13 years ago
Here's what I am doing:
I am installing 5 applications with revisions...What I want to do is have the script uninstall using the GUID then reinstall the same apps with the revisions in them...I have the revision install working through the script...What I want is the script to check for the said apps installed and if it finds them, uninstalls them, and if it doesn't find them, then just move on to install them...
I am installing 5 applications with revisions...What I want to do is have the script uninstall using the GUID then reinstall the same apps with the revisions in them...I have the revision install working through the script...What I want is the script to check for the said apps installed and if it finds them, uninstalls them, and if it doesn't find them, then just move on to install them...
Posted by:
Repackman
13 years ago
What am I missing here? It uninstalls previous versions just fine but pisses out when reinstalling...Am I missing something here?
Sub Main()
' Get current location Path
Dim strCurrentPath : strCurrentPath = GetCurrentFolder()
Dim blnReturn : blnReturn = CheckProductInstallState(strOldProductCode)
If blnReturn Then
strcode = UnInstallProductWithPrductCode(strOldProductCode) : CheckErrorLogEvent strcode , "UnInstall: " & strOldProductName
End If
blnReturn = ""
blnReturn = CheckProductInstallState(strDistillrProductCode)
If blnReturn Then
strcode = UnInstallProductWithPrductCode(strDistillrProductCode) : CheckErrorLogEvent strcode , "UnInstall: " & strDistillrProductName
End If
blnReturn = ""
blnReturn = CheckProductInstallState(strPPCMgrProductCode)
If blnReturn Then
strcode = UnInstallProductWithPrductCode(strPPCMgrProductCode) : CheckErrorLogEvent strcode , "UnInstall: " & strPPCMgrProductName
End If
blnReturn = ""
blnReturn = CheckProductInstallState(strNSEXSetupProductCode)
If blnReturn Then
strcode = UnInstallProductWithPrductCode(strNSEXSetupProductCode) : CheckErrorLogEvent strcode , "UnInstall: " & strNSEXProductName
End If
' Install 503920_w01.msi
strcode = InstallProductWithTransform(strCurrentPath & Chr(92) & strNewProductMSI, strNewProductMST) : CheckErrorLogEvent strcode , "Install: 503920_w01.msi"
' Install Distillr.msi
strcode = InstallProductWithTransform(strCurrentPath & Chr(92) & strDistillrMSI, strDistillrMST) : CheckErrorLogEvent strcode , "Install: Distillr.msi"
' Install ProductPointClientManager.msi
strcode = InstallProductWithTransform(strCurrentPath & Chr(92) & strPPCMgrMSI, strPPCMgrMST) : CheckErrorLogEvent strcode , "Install: ProductPointClientManager.msi"
' Install NSEXSetup.msi
strcode = InstallProductWithTransform(strCurrentPath & Chr(92) & strNSEXSetupMSI, strNSEXSetupMST) : CheckErrorLogEvent strcode , "Install: NSEXSetup.msi"
' Install exceladdin_en-us.msi
strcode = InstallProductWithTransform(strCurrentPath & Chr(92) & strexceladdinMSI, strexceladdinMST) : CheckErrorLogEvent strcode , "Install: exceladdin_en-us.msi"
End Sub
Posted by:
anonymous_9363
13 years ago
Through my crystal ball, I see..............bugger! Nothing!
It's no good. You're going to have to tell us: does the 'InstallProductWithTransform' function include verbose logging in its command line? If it doesn't, no-one will have the first clue as to what failed. If it does, fancy sharing the relevant part of the log with us?
It's no good. You're going to have to tell us: does the 'InstallProductWithTransform' function include verbose logging in its command line? If it doesn't, no-one will have the first clue as to what failed. If it does, fancy sharing the relevant part of the log with us?
Posted by:
Repackman
13 years ago
It's done...I was missing a very minor thing...An Argument of all things...
Thanks for your replies guys...Appreciate it...
Thanks for your replies guys...Appreciate it...
Rating comments in this legacy AppDeploy message board thread won't reorder them,so that the conversation will remain readable.