Check file contents BEFORE saving.

[ARPFre]

Hello guys, I'm creating a script that saves information in CSV, so far everything works fine.

But I want that before saving in the same file (append new line), check if the content is repeated.

I left in the attachment an example of the TXT that contains and the TXT to be replaced.

I was able to locate the lines, even replace, but I don't know how to do BEFORE.

 

 

Original.txt Replace.txt

[ad777]

@ARPFre

if you want to check file content use:FileRead Fuction & IF_Else.

[ARPFre]

#include <Array.au3>
#include <File.au3>

Local $sFile = "C:\Coisas\TINA\AreaDeTeste\Nova pasta\Original.txt"
Local $aPCs
    _FileReadToArray($sFile, $aPCs)

For $i = 1 To $aPCs[0]

    Local $DelLine = 0
    If StringInStr($aPCs[$i], "Julia") Then  $DelLine = $i
    _FileWriteToLine($sFile,$DelLine,"Teste",0)

Next

1 hour ago, ad777 said:

@ARPFre

if you want to check file content use:FileRead Fuction & IF_Else.

Yes, @ad777after saving I can.
I wanted the routine before, not to save duplicate.
creating the script after saving would be a possibility, but it's a bad and slow development.

Edited March 28, 2022 by ARPFre

[ad777]

@ARPFre

you mean like this:

#include <Array.au3>
#include <File.au3>
OnAutoItExitRegister("_exit")

Local $sFile = ".\Original.txt"
FileCopy($sFile, @TempDir & "\Orginal.txt", 1)
Local $Tmp = FileRead(@TempDir & "\Orginal.txt", -1)
While 1
    if $Tmp = FileRead($sFile, -1) Then
        ;;;;
        MsgBox(64, 'Content', 'Repeated!')
        ;;;;
    EndIf
    Sleep(50)
WEnd
Func _exit()
    FileDelete(@TempDir & "\Orginal.txt")
EndFunc   ;==>_exit