Jump to content
Sign in to follow this  
jerem488

Modify .cfg file

Recommended Posts

jerem488

Hi everybody,

I have a .cfg file like this :

[SearchXLTX]
1
[SearchXLSM]
1
[UseSameFolder]
1
[TargetFolder]

[CQ]
36
[OleConversionMode]
1
[MinSizeFilter]
8
[SN]

[UN]

[CN]

And I want overwrite the value between "[CQ]" and "[OleConversionMode]"

I have this code, but after...

$file3 = "file.cfg"
$file = FileOpen($file3, 0)

; Check if file opened for reading OK
If $file = -1 Then

    Exit
EndIf

While 1
    $chars = FileRead($file)
    If @error = -1 Then ExitLoop
    $Valeur = _StringBetween($chars, "[CQ]", "[OleConversionMode]")
    StringReplace($Valeur[0], $Valeur[0], "0")
Wend

Thanks

Edited by jerem488

Qui ose gagneWho Dares Win[left]CyberExploit[/left]

Share this post


Link to post
Share on other sites
MatthiasG

Why don't you try to use the Ini-Functions?

The file-structure is like that from an ini...

Edited by MatthiasG

Share this post


Link to post
Share on other sites
water

This should work:

#Include <string.au3>
$file3 = "file.cfg" 
$file = FileOpen($file3, 0) 
; Check if file opened for reading OK 
If $file = -1 Then     
    Exit 
EndIf 
$chars = FileRead($file)
If @error = -1 Then Exit
$Pos0 = StringInStr($chars,"[CQ]")
If $Pos0 = 0 Then Exit
$Pos1 = StringInStr($chars,"[OleConversionMode]")
If $Pos1 = 0 Then Exit
$chars = StringLeft($chars,$Pos0+4) & "0" & @CRLF & StringMid($chars,$Pos1)
FileClose($file)
$file = FileOpen($file3,2)
; Check if file opened for writing OK 
If $file = -1 Then     
    Exit 
EndIf 
FileWrite($file,$chars)
FileClose($file)

My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2018-10-19 - Version 1.4.10.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (2018-10-31 - Version 1.3.4.1) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
PowerPoint (2017-06-06 - Version 0.0.5.0) - Download - General Help & Support
Excel - Example Scripts - Wiki
Word - Wiki
 
Tutorials:

ADO - Wiki

 

Share this post


Link to post
Share on other sites
jerem488

Thanks a lot Water ! >_


Qui ose gagneWho Dares Win[left]CyberExploit[/left]

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×