Hallo,
was ist denn an diesem Befehl falsch, bekomme nur ein schwarzes Fenster?
Eigentlich sollte doch der Befehl "dir" in der comspec ausgeführt werden.
Den run-Befehl kann ich wegen der Weiterverarbeitung nicht nehmen.
Dim WSH
Dim oExec As Variant
Dim acmd As String
acmd = Environ$("comspec")
Set wsh = CreateObject("WScript.Shell")
Set oExec = Wsh.exec(acmd & " " & "dir")
Für einen Tipp wäre ich dankbar.
