Any ideas?

[Marius 0]

#include <File.au3>

$test = "C:\test.txt"

msgbox(4096, "Info", "Deleting Last 4 lines  ")
$lastline = _FileCountLines($test)
FileDelLine($test, $lastline-3, $lastline) 

msgbox(4096, "Info", "Deleting line 2  ")
FileDelLine($test, 2, 2) 

func FileDelLine($file, $start_line, $end_line)

  local $tmpfile = _TempFile()

  local $fh = FileOpen ( $file, 0)
  local $fh_tmp = FileOpen ( $tmpfile, 2 )
  local $cur_line = 0

  while 1
    $line = FileReadLine($fh)
    $cur_line = $cur_line + 1
    if @error = -1 then
       FileClose($fh)
       FileClose($fh_tmp)
       FileDelete($file)
       FileMove($tmpfile, $file)
       return
    endif 

    if ($cur_line < $start_line) or ($cur_line > $end_line) then
       FileWriteLine($fh_tmp, $line)
    endif 
  wend
endfunc

Any ideas how to leave blank lines of deleted text?

[HardCopy 1]

#include <File.au3>

$test = "C:\test.txt"

msgbox(4096, "Info", "Deleting Last 4 lines  ")
$lastline = _FileCountLines($test)
FileDelLine($test, $lastline-3, $lastline) 

msgbox(4096, "Info", "Deleting line 2  ")
FileDelLine($test, 2, 2) 

func FileDelLine($file, $start_line, $end_line)

  local $tmpfile = _TempFile()

  local $fh = FileOpen ( $file, 0)
  local $fh_tmp = FileOpen ( $tmpfile, 2 )
  local $cur_line = 0

  while 1
    $line = FileReadLine($fh)
    $cur_line = $cur_line + 1
    if @error = -1 then
       FileClose($fh)
       FileClose($fh_tmp)
       FileDelete($file)
       FileMove($tmpfile, $file)
       return
    endif 

    if ($cur_line < $start_line) or ($cur_line > $end_line) then
       FileWriteLine($fh_tmp, $line)
    endif 
  wend
endfunc

Any ideas how to leave blank lines of deleted text? 

<{POST_SNAPBACK}>

not to sure if this is to simple...but why not instead of deleting lines replace the text with a NULL string

HardCopy

[Valuater 108]

good idea hardcopy

8)