Ich spiele mich jetzt schon seit ner Ewigkeit mit dem Problem herum, ein CMD-Tool mittels Variablen aufzurufen und dessen Ausgabe in eine Text-Datei zu schreiben. Aber was auch immer ich mache, es funktioniert einfach nicht. Irgendwie scheint es wohl an den Quotas zu liegen, aber ich seh den Fehler einfach nicht.
Da ich unnzählige Versuche mit unzähligen Quotas-Varianten hinter mir habe, möchte ich diese nun einfach weglassen und nur den theroetischen Ansatz pasten, in der Hoffnung, jemand könnte mir die Codezeile "Set objExec ... " funktionstüchtig machen.
Aus einer Sub Routine heraus wird dann die Function checkLog(objfile.Path) aufgerufen.
Ich bin für jeden Ansatz dankbar, der mir hier irgendwie weiterhelfen könnte.
LG, Netfreak
Da ich unnzählige Versuche mit unzähligen Quotas-Varianten hinter mir habe, möchte ich diese nun einfach weglassen und nur den theroetischen Ansatz pasten, in der Hoffnung, jemand könnte mir die Codezeile "Set objExec ... " funktionstüchtig machen.
Quellcode
- Dim EACLogCheckerPath
- EACLogCheckerPath = "C:\Program Files (x86)\Exact Audio Copy\CheckLog.exe"
- Function checkLog (cLOG)
- Set objShell = CreateObject("WScript.Shell")
- Set objExec = objShell.Exec("%comspec% /c " & EACLogCheckerPath & " " & cLOG & " > C:\output.txt")
- Set objShell = Nothing
- End Function
Aus einer Sub Routine heraus wird dann die Function checkLog(objfile.Path) aufgerufen.
Ich bin für jeden Ansatz dankbar, der mir hier irgendwie weiterhelfen könnte.
LG, Netfreak