Hallo zusammen
Ich bin gerade an einem VBScipt dran, welches folgendes machen soll.
Auslesen einzelner Zeilen aus einem Text File und speichern in ein anderes Text File.
momenten sieht mein Code wie folgt aus:
"
Dim ObjFSO, objFile, Reservations
Reservations = Array("Add reservedip 172")
Set objFSO = Wscript.CreateObject("Scripting.FileSystemObject")
Ser objFile = objFSO.OpenTextFile("c:\scripts\testsynch.txt", ForWriting, Create)
ObjFile.WriteLine Reservations
ObjFile.close
"
Ausgeführt wird das Script wie folgt:
wscript.exe c:\scripts\dhcpsynch.vbs c:\scripts\reserv_dump.txt
reserv_dump.txt beinhaltet, die konfiguration unseres Windows DHCP Server.
Von diesem File sollen alle Zeilen welche "Add reservedip 172" beinhalten in ein Array geschrieben werden, welches dann später in das File "testsynch.txt" geschrieben werden.
Momentan erhalte ich aber immer die Meldung "Invalid procedure call or argzment"... auf die Zeile: Set objFile = objFSO.OpenTextFile("....")
Hoffe ihr könnt mir da weiterhelfen oder jenachdem sogar noch eine bessere Lösung zeigen.
Bin ein Newbie in VBS, aber kämpfe mich da langsam rein.
Ich bin gerade an einem VBScipt dran, welches folgendes machen soll.
Auslesen einzelner Zeilen aus einem Text File und speichern in ein anderes Text File.
momenten sieht mein Code wie folgt aus:
"
Dim ObjFSO, objFile, Reservations
Reservations = Array("Add reservedip 172")
Set objFSO = Wscript.CreateObject("Scripting.FileSystemObject")
Ser objFile = objFSO.OpenTextFile("c:\scripts\testsynch.txt", ForWriting, Create)
ObjFile.WriteLine Reservations
ObjFile.close
"
Ausgeführt wird das Script wie folgt:
wscript.exe c:\scripts\dhcpsynch.vbs c:\scripts\reserv_dump.txt
reserv_dump.txt beinhaltet, die konfiguration unseres Windows DHCP Server.
Von diesem File sollen alle Zeilen welche "Add reservedip 172" beinhalten in ein Array geschrieben werden, welches dann später in das File "testsynch.txt" geschrieben werden.
Momentan erhalte ich aber immer die Meldung "Invalid procedure call or argzment"... auf die Zeile: Set objFile = objFSO.OpenTextFile("....")
Hoffe ihr könnt mir da weiterhelfen oder jenachdem sogar noch eine bessere Lösung zeigen.
Bin ein Newbie in VBS, aber kämpfe mich da langsam rein.
