plz help with _filewritetoline

[chacoya121]

#include <File.au3>
HotKeySet("{Esc}", "_exit")
HotKeySet("{Home}","Start")
Global $ifile = FileOpen(@ScriptDir & "\text1.txt")
while 1
    Sleep(100)
WEnd
Func Start()
    $random = Random(1,10,1)
    $line = FileReadLine($ifile,$random)
    $ifile = FileOpen(@ScriptDir & "\text1.txt", 2)
     _FileWriteToLine($ifile,$random,"",1)
    $countline = _FileCountLines($ifile)
EndFunc
Func _exit()
    Exit
EndFunc

 

i try to overwrite the line from text but its clear all

can someone help plz

Edited April 14, 2017 by Melba23
Added code tags

[KickStarter15]

@chacoya121, Try below. Change the value "1" to "True" that will solved this issue.

$random = Random(1,10,1)
_FileWriteToLine(@ScriptDir & "\text1.txt", $random, "my replacement line", True)

 

[kylomas]

chacoya121,

Try this for your filewritetoline...

_FileWriteToLine($ifile,$random,$line,1)

kylomas

[Melba23]

chacoya121,

When you post code please use Code tags - see here how to do it.  Then you get a scrolling box and syntax colouring as you can see above now I have added the tags.

M23

[KickStarter15]

@kylomas, Sorry, but I think "$line" was used to read the line in the first post. So, this will not add to _FileWriteToLine() unless it was declared in "$sText" what line to insert/overwrite.

_FileWriteToLine($ifile,$random,$sText,1)

@chacoya121 I tried it this way:

#include <File.au3>
HotKeySet("{Esc}", "_exit")
HotKeySet("{Home}","Start")
Global $ifile = @ScriptDir & "\text1.txt"
    $random = Random(1,10,1)
    $line = FileReadLine($ifile,$random)
    $sText = "my replacement line" ; Line to add/overwrite
    MsgBox("","","This line will be removed:"&@CRLF &"'"&$line&"'")
     _FileWriteToLine($ifile,$random,$sText,1) ; If True will also overwrite the old line 
    $countline = _FileCountLines($ifile)
    MsgBox("","",$countline)
Func _exit()
    Exit
 EndFunc

 

2 hours ago, chacoya121 said:

i try to overwrite the line from text but its clear all

In your "_FileWriteToLine()" it was declared as "" means, your text in that line will be changed to empty line or will be cleared.

[232showtime]

I assume your file text1.txt contains a data...

#include <File.au3>
HotKeySet("{Esc}", "_exit")
HotKeySet("{F1}", "Start")
Global $ifile = FileOpen(@ScriptDir & "\text1.txt")

While 1
    Sleep(100)
WEnd
Func Start()
    $random = Random(1, 10, 1)
    $line = FileReadLine($ifile, $random)
;    $ifile = FileOpen(@ScriptDir & "\text1.txt", 2);removed because it will replace the file with empty lines
    $FW = _FileWriteToLine(@ScriptDir & "\text1.txt", $random, "", 1); this will randomly clear all the data inside your text1.txt because you have ""
    $countline = _FileCountLines(@ScriptDir & "\text1.txt")
    ConsoleWrite("FW2L: " & "Succes: " & $countline & @CRLF)
EndFunc   ;==>Start
Func _exit()
    Exit
EndFunc   ;==>_exit

don't forget to do error checking, this will fix your script.

Edited April 15, 2017 by 232showtime