Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

VBS - warten bis Aufruf(Installation) abgearbeitet wurde

Frage Entwicklung VB for Applications

Mitglied: gdnmarc

gdnmarc (Level 1) - Jetzt verbinden

25.02.2009, aktualisiert 13:21 Uhr, 8011 Aufrufe, 4 Kommentare

Hallo Ihr Lieben,

ich habe ein ganz kleines Problem. Ich habe ein Script geschrieben welches überprüft, ob ein RegValue existiert. Wenn dieser existiert, wird er gelöscht und danach eine Deinstallation eines Programms gestartet. Das einzige Problem, dass ich habe, das das Script die Deinstallationsroutine erfolgreich startet und dann das Script über script.quit beendet wird. Die Deinstallation läuft im Hintergrund weiter. Kann ich das ändern, dass das Script erst beendet wird wenn der msiexec mit der Deinstallation auch fertig ist?

DANKE!!!!!!!!



Option Explicit

On error resume next

dim objShell,objFSO, objFolder, regRDP, regTDP, RDP, TDP, strRegKey, strComputer, strSubKeyName, strEntryName, objReg, intRet, deleteValue,wshshell, strmsiexec
Const HKLM = &H80000002
set wshshell = Wscript.createobject("Wscript.shell")
Set objShell = CreateObject("WScript.Shell")

strComputer="."
strSubKeyName = "SOFTWARE\Microsoft\PCHealth\ErrorReporting\DW\Products"
strEntryName = "{375E26BD-2A8B-4DC5-84A1-9B43D504EDF9}"
strMsiexec = "C:\WINDOWS\system32\msiexec.exe /x {91710409-8000-11D3-8CFE-0150048383C9} REINSTALL="""" REINSTALLMODE=""omus"" /l*v C:\WINDOWS\Temp\ManageSoft\AERuninstall.log /qb"

Set objReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")

If RegEntryExists(strSubKeyName, strEntryName) <> 0 Then
' wscript.echo "The registry key was not found. Nothing to do "
wscript.quit
Else
deleteValue = objReg.DeleteValue(HKLM, strSubKeyName, strEntryName)
Wshshell.Run(strmsiexec)
End If

WScript.Quit

Function RegEntryExists(RegPath, theEntry)
intRet = objReg.GetDWORDValue(HKLM, RegPath, theEntry)
RegEntryExists=intRet
End Function
Mitglied: Logan000
25.02.2009 um 14:07 Uhr
Moin Moin

Die Run Funktion kennt noch Parameter. Versuchs mal mit folgendem Aufruf:
01.
... 
02.
Wshshell.Run strmsiexec,1, True 
03.
...
Gruß L.
Bitte warten ..
Mitglied: gdnmarc
25.02.2009 um 15:12 Uhr
DANKE, das war einfach Viele Grüße
Bitte warten ..
Mitglied: Logan000
25.02.2009 um 15:24 Uhr
Moin

Freut mich das ich Dir helfen konnte. Sei doch so gut und setze den Beitrag auf erledigt.

Danke & Gruß L.
Bitte warten ..
Mitglied: dieablo
02.06.2009 um 16:02 Uhr
Guten Tag,

ich habe zu dem Thema noch eine Frage.
Die EXE die ich auf rufe mit dem Parameter, ruft wiederum eine EXE auf.
Ich muss allerdings die zweite EXE abfangen und schauen ob die noch läuft und wenn nicht soll er zum Beispiel eine Messagebox öffnen.

Jetzt könnten man sagen, rufe doch gleich die 2 EXE auf, dass geht leider nicht.

Hat jemand eine Idee ??

Hab schon versucht den Prozess abzufangen aber da habe ich das Problem, dass diese EXE mehre Parameter hat und ich nur möchte, dass man das Programm mit ein und dem selben Paramter nicht geöffnet werden kann / darf.

Das ist auch das Hauptziel, ein Programm darf nur 1 mal geöffnet werden mit dem selben Parameter.

Lg
Dennis
Bitte warten ..
Ähnliche Inhalte
Exchange Server
gelöst Exchange 2016 Installation und die Domain Funktionsebene (1)

Frage von RobertMC zum Thema Exchange Server ...

Firewall
Barracuda VPN Client - Installation schlägt fehl (3)

Frage von netzwerkschlumpf zum Thema Firewall ...

Ubuntu
gelöst Installation Atheros AR242x WLAN-Adapter unter Ubuntu 16.04 (10)

Frage von achklein zum Thema Ubuntu ...

Neue Wissensbeiträge
Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(3)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(9)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Heiß diskutierte Inhalte
Exchange Server
Exchange 2016 Standard Server 2012 R2 Hetzner Mail (41)

Frage von Datsspeed zum Thema Exchange Server ...

Windows 7
gelöst Lokales Adminprofil defekt (25)

Frage von Yannosch zum Thema Windows 7 ...

Off Topic
gelöst Fachzeitschriften als E-Book oder hardcoded? (11)

Frage von KowaKowalski zum Thema Off Topic ...

Windows 10
Windows Store Apps ohne Windows Store installieren (10)

Frage von keefien zum Thema Windows 10 ...