Changing data in text file using VB 6.0

[varsha desai]

Hello there,

I want to change some data(which is in one line only) of text file using VB 6.0. Which is the best method for it? Another question is I want to delete last two, three lines of text file using VB 6.0. Which method can be best method for it?

[Dököll]

Hello there,

I want to change some data(which is in one line only) of text file using VB 6.0. Which is the best method for it? Another question is I want to delete last two, three lines of text file using VB 6.0. Which method can be best method for it?

Hello there, varsha desai!

Use the replace command to changes things 'round:

[mailderemi]

VB6: Open Command

Hello there,

I want to change some data(which is in one line only) of text file using VB 6.0. Which is the best method for it? Another question is I want to delete last two, three lines of text file using VB 6.0. Which method can be best method for it?

Hi
This is my first reply
This way is one of old ways that VB6.0 got it from QBasic
I think the easy way is:
Open:
[CODE=vb] Dim s as String
Open "C:\test.tx t" For input As #1
Input #1, s
Close #1[/CODE]

Save:
[CODE=vb] Open "C:\test.tx t" For output As #1
Print #1, "Test"
Write #1, "Test"
Close #1[/CODE]

Append:
[CODE=vb] Open "C:\test.tx t" For Append As #1
Print #1, "Test"
Write #1, "Test"
Close #1[/CODE]

these are for Text file but if you wanna use it for a binary file:
1. use "Binary" instead of "Output" or "Input" or "Append"
2. use "Get" and "Put" instead of "Input" and "Print" or "Write"

.:!M!LDEREMi:.

[mailderemi]

Hello there, varsha desai!

Use the replace command to changes things 'round:

Hi
If you use RichTextBox there is a command that load the file in the easiest way and also a command for Replacement but if you wanna do it in the best way don't use it. The best way is opening file in Binary mode and get the data from file directly... in this way you won't need ActiveX of rich text box.

Also this way is the best way in VB.NET faster and easier than VB6.

[danp129]

If opening more than one file at a time you need to find a free file handle to use

[CODE=vb]Dim s as String, lngFile as long
lngFile=FreeFil e
Open "C:\test.tx t" For input As #lngFile
Input #lngFile, s
Close #lngFile[/CODE]