﻿id	summary	reporter	owner	description	type	status	milestone	component	version	severity	resolution	keywords	cc
2509	_FileWriteToLine Bug	anonymous		"{{{
;===========================
; Test of : _FileWriteToLine
; Beta version : v3.3.9.21 => ERROR
; My version : v3.3.8.1    => OK
; My config : Windows XP SP3
; date : 19th october 2013
;===========================

#include <File.au3>

Local $sFicInventaireTxt = @ScriptDir & ""\"" & ""Beta_test_FileWriteToLine.txt""

; create file Beta_test.txt for demo (4 lines)
If Not FileExists($sFicInventaireTxt) Then
	$hFile = FileOpen($sFicInventaireTxt, 2)
	FileWrite($hFile, _
			'Line 1' & @CRLF & _
			'Line 2' & @CRLF & _
			'Line 3' & @CRLF & _
			'Line 4' & @CRLF)
	FileClose($hFile)
EndIf


; Try to add New line #
Local $nXlignes = _FileCountLines($sFicInventaireTxt)	; actual number of lines
Local $sLigneToWrite = ""New line "" & $nXlignes +1	; text to write to new line
Local $nNew_line = $nXlignes + 1			; new line number

_FileWriteToLine($sFicInventaireTxt, $nNew_line, $sLigneToWrite, 0) ; last param : 0=add, 1=replace

If @error Then
	MsgBox(0, """", ""Error : "" & @error & @CRLF & ""Actual lines = "" & $nXlignes & "" - Try to write line "" & $nNew_line)
EndIf

}}}
"	Bug	closed		AutoIt	3.3.9.21	None	Fixed		
