9
VBS Befehl als string zusammenbasteln und dann per run ausführen
Hi,
ich will cacls per vbscript - run mehtode staten.
Irgendas geht schief. Gibts in vbs nicht wie in Powershell die Möglichkeit einen Befehl als String zusammensetzen und ihn dann auszuführne?
(wie invoke-expression in Powershell.)
Hier mein code vieleicht findet ja jemand meinen Fehler:
set fso = CreateObject("Scripting.FileSystemObject")
set onet = CreateObject("Wscript.Network")
set WshShell = Wscript.CreateObject("Wscript.Shell")
Set objShell = CreateObject("Shell.Application")
set oSA = CreateObject("Shell.Application")
sTMP = WshShell.ExpandEnvironmentStrings("%temp%") & "\"
tp = stmp & "cacls.exe"
sDesktop = WshShell.SpecialFolders("Desktop") & "\"
WshShell.Run "cmd /c " & tp & " " & sDesktop & " /E /P ad\" & oNet.Username & ":R",3,true
Danke SC!
ich will cacls per vbscript - run mehtode staten.
Irgendas geht schief. Gibts in vbs nicht wie in Powershell die Möglichkeit einen Befehl als String zusammensetzen und ihn dann auszuführne?
(wie invoke-expression in Powershell.)
Hier mein code vieleicht findet ja jemand meinen Fehler:
set fso = CreateObject("Scripting.FileSystemObject")
set onet = CreateObject("Wscript.Network")
set WshShell = Wscript.CreateObject("Wscript.Shell")
Set objShell = CreateObject("Shell.Application")
set oSA = CreateObject("Shell.Application")
sTMP = WshShell.ExpandEnvironmentStrings("%temp%") & "\"
tp = stmp & "cacls.exe"
sDesktop = WshShell.SpecialFolders("Desktop") & "\"
WshShell.Run "cmd /c " & tp & " " & sDesktop & " /E /P ad\" & oNet.Username & ":R",3,true
Danke SC!
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 167988
Url: https://administrator.de/contentid/167988
Printed on: April 25, 2024 at 04:04 o'clock
9 Comments
Latest comment
Hallo Scroller,
fasse bitte deine Schnippets in die richtige Formatierung, dann liest es sich einfacher!
Eventuell liegt ein Schreibfehler bei dir vor?
Meintest du eventuell
tp = stmp & "calc.exe" ?
Gruss
Tsuki
fasse bitte deine Schnippets in die richtige Formatierung, dann liest es sich einfacher!
Eventuell liegt ein Schreibfehler bei dir vor?
Meintest du eventuell
tp = stmp & "calc.exe" ?
Gruss
Tsuki
Er möchte Berechtigungen setzen, (hoffe ich), von daher gehe ich davon aus er meinte CACLS,
welche sich bei mir aber nicht im TEMP-Ordner sondern unter %SYSTEMROOT%\System32 befindet...
Desweiteren fehlen meiner Meinung nach Leerzeichen in der Befehlszeile.
UND: Wenn Leerzeichen in den Pfadangaben verwendet werden, (%TEMP% = "C:\dokumente und einstellungen\user\temp" oder wie auch immer)
nicht die Anführungszeichen vergessen
Ich bevorzuge was das angeht eher ... & Chr(34) & ... anstelle von Dingen, wie """" oder " """
Gruß
Dominique
welche sich bei mir aber nicht im TEMP-Ordner sondern unter %SYSTEMROOT%\System32 befindet...
Desweiteren fehlen meiner Meinung nach Leerzeichen in der Befehlszeile.
UND: Wenn Leerzeichen in den Pfadangaben verwendet werden, (%TEMP% = "C:\dokumente und einstellungen\user\temp" oder wie auch immer)
nicht die Anführungszeichen vergessen
Ich bevorzuge was das angeht eher ... & Chr(34) & ... anstelle von Dingen, wie """" oder " """
Gruß
Dominique
Hallo Zusammen,
danke für eure Antworten.
Hier noch ergänzedne Infos :
An einem Thin client soll der Desktop für den User schreibgeschützt sein.
Dazu lade ich cacls.exe vom netz auf das Ding runter (da das abgespeckte windows auf dem Gerät die datei nicht beinhaltet)
Diese wird nach %temp% kopiert von da dann gestartet.
Beim Start Poppt das Fenster kurz auf und schliesst sich wieder. Das wars dann
Danke
SC
danke für eure Antworten.
Hier noch ergänzedne Infos
:An einem Thin client soll der Desktop für den User schreibgeschützt sein.
Dazu lade ich cacls.exe vom netz auf das Ding runter (da das abgespeckte windows auf dem Gerät die datei nicht beinhaltet)
Diese wird nach %temp% kopiert von da dann gestartet.
Beim Start Poppt das Fenster kurz auf und schliesst sich wieder. Das wars dann
Danke
SC
Moin Scroller,
das empfohlene Vorgehen beim Testen von Schnipseln ist das Ausführen vom CMD-prompt aus.
Nur so kannst du auch die Fehlermeldungen lesen und gegebenfalls hier weitergeben.
Bitte starte den Schnipsel von der Eingabeaufforderung aus und erzähl uns dann, was du siehst.
Grüße
Biber
das empfohlene Vorgehen beim Testen von Schnipseln ist das Ausführen vom CMD-prompt aus.
Nur so kannst du auch die Fehlermeldungen lesen und gegebenfalls hier weitergeben.
Bitte starte den Schnipsel von der Eingabeaufforderung aus und erzähl uns dann, was du siehst.
Grüße
Biber
Und als weiterer Tipp:
Nie davon ausgehen, daß der Computer macht was er soll.
Will sagen:
Nachkontrollieren ob Dein String richtig zusammengebaut ist könnte helfen:
Dann siehst Du nämlich, was Du tatsächlich versuchst auszuführen und das könnte man dann auch mal direkt in einer CMD ausprobieren.
Dann sieht man auch, daß als Ergebnis dies kommt:
Und da sieht man doch innerhalb von ca. 0,5 Sekunden, wo das Problem ist, oder nicht?
Wie sagte doch Prof. Tanenbaum: Ein guter Programmierer braucht nur seinen Kopf und ein printf (bei vbs halt wscript.echo) zum Debuggen.
Nie davon ausgehen, daß der Computer macht was er soll.
Will sagen:
Nachkontrollieren ob Dein String richtig zusammengebaut ist könnte helfen:
sExec="cmd /c " & tp & " " & sDesktop & " /E /P ad\" & oNet.Username & ":R"
wscript.echo sExec
WshShell.Run sExec,3,trueDann sieht man auch, daß als Ergebnis dies kommt:
cmd /c c:\temp\cacls.exe C:\Dokumente und Einstellungen\xxx\Desktop\ /E /P ad\xxx:RWie sagte doch Prof. Tanenbaum: Ein guter Programmierer braucht nur seinen Kopf und ein printf (bei vbs halt wscript.echo) zum Debuggen.
Hallo,
Danke für Eure Antworten alle,
Es war ein Leerzeichen Problem beim Desktop. Die Lösung war:
sDesktop = """ & WshShell.SpecialFolders("Desktop") & """
Gruss
SC
Danke für Eure Antworten alle,
Es war ein Leerzeichen Problem beim Desktop. Die Lösung war:
sDesktop = """ & WshShell.SpecialFolders("Desktop") & """
Gruss
SC
Da fühlt man sich ignoriert...
Wieso fühlst Du dich ignoriert??
Hab mich doch bei allen bedankt
Gruss
SC
Hab mich doch bei allen bedankt
Gruss
SC
