65399
20.05.2008, aktualisiert um 14:05:12 Uhr
7247
2
0
Vorhandenes Script auf alle Dateien in einem Ordner anwenden
Hallo,
wirklich auskennen tu ich mich mit Batchdateien leider nicht, ist bestimmt einfach...
Ich habe ein einfaches Script das ich im Netz gefunden habe und als Batch-Datei laufen lasse.
setlocal
set "Cvt=%temp%\ConvSC.vbs"
set "Ein=Ordner\test.txt"
echo Set fso=CreateObject("Scripting.FileSystemObject"):T=fso.OpenTextFile("%Ein%").ReadAll:fso.OpenTextFile("%Ein%",2,True).Write Replace(Mid(T,InStr(T,vbCrLF)+2),Chr(34),"")>"%Cvt%"
cscript //nologo "%Cvt%"
Das macht bei der Datei, von der der Dateiname im Parameter Ein steht auch genau das was ich brauche, löscht nämlich die erste Zeile und " raus.
Nun würde ich aber genau dieses Script (Oder ein Script, das daselbe tut...) nicht nur auf bestimmte Dateien sondern auf alle Dateien in dem Ordner (hier als Beispiel Ordner genannt) laufen lassen. Allerdings komme ich hier nicht weiter.
Danke bereits im Voraus,
Tester1254
wirklich auskennen tu ich mich mit Batchdateien leider nicht, ist bestimmt einfach...
Ich habe ein einfaches Script das ich im Netz gefunden habe und als Batch-Datei laufen lasse.
setlocal
set "Cvt=%temp%\ConvSC.vbs"
set "Ein=Ordner\test.txt"
echo Set fso=CreateObject("Scripting.FileSystemObject"):T=fso.OpenTextFile("%Ein%").ReadAll:fso.OpenTextFile("%Ein%",2,True).Write Replace(Mid(T,InStr(T,vbCrLF)+2),Chr(34),"")>"%Cvt%"
cscript //nologo "%Cvt%"
Das macht bei der Datei, von der der Dateiname im Parameter Ein steht auch genau das was ich brauche, löscht nämlich die erste Zeile und " raus.
Nun würde ich aber genau dieses Script (Oder ein Script, das daselbe tut...) nicht nur auf bestimmte Dateien sondern auf alle Dateien in dem Ordner (hier als Beispiel Ordner genannt) laufen lassen. Allerdings komme ich hier nicht weiter.
Danke bereits im Voraus,
Tester1254
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 88069
Url: https://administrator.de/contentid/88069
Ausgedruckt am: 26.11.2024 um 05:11 Uhr
2 Kommentare
Neuester Kommentar
salü tester
ungetestet müsste dies etwa so aussehen!
natürlich das ordner durch einen relativen oder absoluten pfad zum ordner ersetzen!
gruss tacker
PS: files welche in unterordnern des ordner liegen werden nicht beachtet!
PPS: bis jetzt werden alle files im ordner abgeändert, sprich es sollten nur .txt's im ordner liegen, ansonsten müsste man noch nen filter einbauen!
ungetestet müsste dies etwa so aussehen!
setlocal
set "Cvt=%temp%\ConvSC.vbs"
set "Ein=Ordner"
echo Set fso=CreateObject("Scripting.FileSystemObject"):set F=fso.getfolder("%Ein%"):set g=f.files:for each file in g:T=fso.OpenTextFile(file).ReadAll:fso.OpenTextFile(file,2,True).Write Replace(Mid(T,InStr(T,vbCrLF)+2),Chr(34),""):next>"%Cvt%"
cscript //nologo "%Cvt%"
natürlich das ordner durch einen relativen oder absoluten pfad zum ordner ersetzen!
gruss tacker
PS: files welche in unterordnern des ordner liegen werden nicht beachtet!
PPS: bis jetzt werden alle files im ordner abgeändert, sprich es sollten nur .txt's im ordner liegen, ansonsten müsste man noch nen filter einbauen!