VBScript - Edit an INI file

Hi all

Newbie here, go easy

I'm new to scripting so I'm bumbling my way through.

I want to read and edit a line in an INI file and this is what I have now

Obviously its wrong as I'm posting so any help would be appriciated


dim fso,ostream
Set fso=CreateObject("Scripting.FileSystemObject")

If fso.FolderExists("c:\test") then
Set ostream = fso.Opentextfile("c:\test\cqgclnt.ini")
Do until ostream.Close
stxt = ostream.WriteLine ("CQGVersion=7x6850")
Loop
End If

I am trying to open the ini file, search for CQGVersion and change the value to another date

Any ideas ?
Thanks all

Sorry that's not quite right

dim fso,ostream,Edittxt
Set fso=CreateObject("Scripting.FileSystemObject")

If fso.FolderExists("c:\test") then
Set ostream = fso.Opentextfile("c:\test\cqgclnt.ini")
Do until ostream.Close
Edittxt = ostream.WriteLine ("CQGVersion=7x6850")
Loop
End If


Cheers

You've done fine opening the text file, but there's no need for that Do loop. Also, the way it's written, it would be an endless loop anyway.

What does the line look like that you want to change? Can you post that portion of your INI file?

the whole logic is wrong.
correct logic would be:

• open two file streams: one for Read and one for Write (hence Reader, Writer)
• loop over the lines in Reader
• for every line in Reader, store in local variable
• check if it contains "CQGVersion" and if so, change the local variable
• write the local variable to the Writer stream.
• after the loop close both Reader and Writer.

I found here some nice code that can give you direction:
http://cwashington.netreach.net/dep....asp?Index=1095
look for the function "WriteINIValue".

CQGVersion=7x3902

Cheers

cheers for the assistance, and the link

I've had a look and I must admit for a new boy to scripting its hard but I'll try and work myway through it