Problem bei Shellprogramierung mit Aufruf einer anderen VBS-Datei
Hallo ich habe folgendes Shell-Script geschrieben.
also das Problem ist folgendes:
die Datei ospp.vbs muß mit folgendem Parametern gestartet werden.
in der CMD sieht das wie folgt aus:
#
---> wscript PFAD\opps.vbs /inpkey: XXXXX-XXXXX-XXXXX-XXXXX-XXXXX
#
´Mein Scruipt meldet immer das er die Datei nicht findet, lass ich den Parameter weg. Also machs nur so, dann funkzt es:
also die Datei wird ausgeführt, allerdings fehlen ja alle parameter und auch der Key.
Was mach ich falsch, wie funzt es
Danke für die schnelle Hilfe.
DanielSan
Option Explicit
Dim Key
Dim Pfad
Dim ws
Dim parameter
Set ws = wscript.createObject("Wscript.Shell")
parameter = "/inpkey:"
Pfad = "C:\Programme\Microsoft Office\Office14\ospp.vbs /inpkey:"
Key = Inputbox("Bitte den Produktkey für Office 2011 eingeben. z.B: xxxxx-xxxxx-xxxxx-xxxxx-xxxxx")
If Key = "" Then
Msgbox("Key ungültig!")
Else
ws.Run chr(34) & "C:\Programme\Microsoft Office\Office14\ospp.vbs"& chr (34), 1 & " " & parameter & key
End If
also das Problem ist folgendes:
die Datei ospp.vbs muß mit folgendem Parametern gestartet werden.
in der CMD sieht das wie folgt aus:
#
---> wscript PFAD\opps.vbs /inpkey: XXXXX-XXXXX-XXXXX-XXXXX-XXXXX
#
´Mein Scruipt meldet immer das er die Datei nicht findet, lass ich den Parameter weg. Also machs nur so, dann funkzt es:
ws.Run chr(34) & "C:\Programme\Microsoft Office\Office14\ospp.vbs"& chr (34), 1
Was mach ich falsch, wie funzt es
Danke für die schnelle Hilfe.
DanielSan
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 169933
Url: https://administrator.de/forum/problem-bei-shellprogramierung-mit-aufruf-einer-anderen-vbs-datei-169933.html
Ausgedruckt am: 15.05.2025 um 23:05 Uhr
4 Kommentare
Neuester Kommentar
Mich wundert, daß Du keine andere Fehlermeldung bekommst.
Aber der run Befehl sieht prinzipiell so aus:
ws.Run(strCommand, [intWindowStyle], [bWaitOnReturn])
Im strCommand, dem ersten Parameter, muß der Aufruf und die Parameter drinstehen, dann tuts auch.
Bei Dir tuts das eben nicht, daß ,1 steht so jedenfalls schlecht.
Aber der run Befehl sieht prinzipiell so aus:
ws.Run(strCommand, [intWindowStyle], [bWaitOnReturn])
Im strCommand, dem ersten Parameter, muß der Aufruf und die Parameter drinstehen, dann tuts auch.
Bei Dir tuts das eben nicht, daß ,1 steht so jedenfalls schlecht.

Hallo DanielSAN!
Versuchs mal so:
Wobie die ',1' in jedem Fall ans Ende gehört
Gruß Dieter
Versuchs mal so:
Path = Chr(34) & "C:\Programme\Microsoft Office\Office14\ospp.vbs" & Chr(34)
ws.Run Path & " " & parameter & Key, 1
Gruß Dieter