Replace a string in a file

[440LVB]

Hello

I want to change one string in a script with another script, but I don't know part of the string (French sentences, but it's not important)

$fichier = FileOpen("taille.au3",0)

If ($fichier = -1) Then
    MsgBox ( 0, "Erreur", "Impossible de trouver le fichier de script")
Else
    $lecture = FileRead($fichier, 1000)
    $error = StringReplace ($lecture,"$max = 100", "$max = 200")
              ; I want to put a joker or same kind of character instead of "100"
              ; because I don't know what number it will be...

    MsgBox( 0, "test",$lecture & "\n")
    FileClose($fichier)
    $fichier = FileOpen("taille.au3",2)
    FileWrite ($fichier,$lecture)
    FileClose($fichier)
    
EndIf

The MsgBox() is there to test the value

Edited May 19, 2005 by 440LVB

[440LVB]

No idea?

[Nutster]

If you do not know what number will be included, use StringRegExpReplace in the beta version. Will the file always be smaller than 1000 bytes? If not, you should probably do the following:

Read the entire file into a string or array.

Use StringRegExpReplace to make the approprate replacements.

Write the file.

$fichier = FileOpen("taille.au3",0)

If ($fichier = -1) Then
    MsgBox ( 0, "Erreur", "Impossible de trouver le fichier de script")
Else
   ; Read entire file, not just first 1000 characters.
    $lecture = ""
    Do
         $lecture = $lecture & FileRead($fichier, 1000)
    Until @Error = -1

   ; Perform the replacement.
    $lecture = StringRegExpReplace($lecture, "$max = \d+", "$max = 200", 0)

    MsgBox( 0, "test",$lecture & "\n")
    FileClose($fichier)
    $fichier = FileOpen("taille.au3",2)
    FileWrite ($fichier,$lecture)
    FileClose($fichier)
EndIf

Edit: Fix speeling errors

Edited May 19, 2005 by Nutster

[buzz44]

Edit:  Fix speeling errors

<{POST_SNAPBACK}>

*Spelling . Lol.

[kjactive]

I just finished a word manipulate UDF function library containing several functions you could use - these functions are all words related no matter what...

Free to download...

http://www.sitecenter.dk/latenight/nss-fol...pports/Word.zip

kjactive

Edited May 20, 2005 by kjactive