Slet liner i .txt ved hjælp af .bat

Drop .BAT og brug en .VBS !

infnam = WScript.Arguments(0)
outfnam = WScript.Arguments(1)
Set fso = CreateObject("Scripting.FileSystemObject")
Set inf = fso.OpenTextFile(infnam)
Set outf = fso.CreateTextFile(outfnam)
dummy = inf.ReadLine
dummy = inf.ReadLine
Do While Not inf.AtEndOfStream
  line = inf.ReadLine
  outf.WriteLine line
Loop
outf.Close
inf.Close
Set outf = Nothing
Set inf = Nothing
Set fso = Nothing

Du burde kunne bruge noget i stil med nedenstående. Der kan være problemer med specialtegn, men det finder vi nok også en løsning på.

@echo off
if [%1]==[] echo You must specify a filename &goto :eof
setlocal
set /A Counter=0
for /F "tokens=*" %%I in ('type %1') do @call :Process "%%I"
goto :eof

:Process
set /A Counter=%Counter%+1
if %Counter% LSS 3 goto :eof
echo %~1

arne_v: Det skal være .bat da det er i dos :)

bertelbrander: jeg har set på det og den melder fejl: %%I var ikke ventet på dette tidspunkt.

DOS 6.22 ??

Hvilken "DOS" kører du det på?

Prøv at fjerne "@echo off" og kør bat-filen på en lille fil, for at se hvor det går galt. Hvad står der i den linie der har problemer?

Jeg tvivler på at det vil kunne virke på DOS 6.22, eller at det er muligt at gøre med standard programmer på DOS 6.22.

Det er ver. 6.1.7600 men det er windows pe

Det hjælper heller med echo off men har også lige set at den tror mit fil navn "model2.txt" er en komando

Det løser ikke problemet at slette "@echo off", men du burde kunne se hvad der går galt.

Hvad mener du med at den tror at "model2.txt" er en kommando?

Windows 7 kan koere VBS

Det er ikke helt Windows 7. Det er windows PE og den har ikke vbs.. men ellers tak for hjælpen jeg fik det løst :)

Gad vide om eksperten.dk nogensinde kommer til at sende emails ud regelmæssigt igen. De sidste par år har det været helt tilfældigt om man får en email ved ny indlæg...

Men rart at du fik det til at virke, hvad gjorde du?