VBS - Programm minimiert starten

[Matze22]

Hallo Leute,

ich habe mir mal ein Script geschrieben um zwei Programme zu starten und dann auch beide wieder zu schließen...

Hier ist mal der Code:

-------------------------------------------------------------------------

Dim WshShell, oExec,pExec
Set WshShell = CreateObject("WScript.Shell")

Set oExec = WshShell.Exec("C:\Program Files\Cakewalk Pro Audio 9\cwpa.exe")

Set pExec=WshShell.Exec("C:\Program Files\Native Instruments\Bandstand\Bandstand.exe" )

Do While oExec.Status = 0
WScript.Sleep 1000 ' 1 Sekunde schlafen
Loop

pExec.Terminate

-------------------------------------------------------------------------

Ich habe nun aber ein kleines Problem:
Wie kann ich erreichen, daß "Bandstand" zuerst startet und dann in die Taskleiste minimiert wird. Danach soll erst "Cakewalk" starten...

Kann mir jemand helfen, das Script zu modifizieren?

Viele Grüße
Matze :-)

[Rouven]

Hello,

Kann mir jemand helfen, das Script zu modifizieren?

vielleicht kommst du mit run besser zurecht?

MfG
Rouven

[Matze22]

Hi :-)

Nein, das mit dem run funktioniert nicht...

Ich hatte geschrieben:
WshShell.Run "%Program Files%\Cakewalk Pro Audio 9\cwpa.exe" , 7 , true

Aber dann kommt ein Fehler "Das System kann die angegebene Datei nicht finden"...

Gruß
Matze :-)

[Rouven]

Hello,

WshShell.Run "%Program Files%\Cakewalk Pro Audio 9\cwpa.exe" , 7 , true
Aber dann kommt ein Fehler "Das System kann die angegebene Datei nicht finden"...

das ist auch etwas anderes als in deinem vorherigen Code - warum? Meintest du vielleicht %ProgramFiles%? Warum spielst du gleichzeitig an Pfad und Befehl?

MfG
Rouven

[Matze22]

Hi :-)

ich habe es nun geschafft, dass beide Programme starten, und "Bandstand" in die Taskleiste minimiert wird...

Mit folgendem Script:

----------------------------------------------------------------------
Dim WshShell, oExec,pExec
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run chr(34) & "%ProgramFiles%\Native Instruments\Bandstand\Bandstand.exe" & chr(34) , 7
WshShell.Run chr(34) & "%ProgramFiles%\Cakewalk Pro Audio 9\cwpa.exe" & chr(34) , 7 , true
----------------------------------------------------------------------

Nun funktioniert aber aber das automatische Schließen nicht mehr (wenn z.B. cakewalk geschlossen wird, wurde auch Bandstand mit geschlossen)...

Weil das mit dem oExec und pExec nicht mehr funktionierte....

Kann mir jemand weiterhelfen?
bzw. das Script nochmal komplett anpassen, ich hab da leider nicht mehr so ganz den Durchblick ;-)

Gruß
matze :-)