Deleting records from a text file on a server 1

[jaggar]

My question, how can I delete records in a text file on the server using ACCESS/Visual Basic ?
Code used - when the User clicks on a button in Access the code behind:
Dim strAcctFileName As String
Dim fs, f, ts, S, a
Const ForReading = 1, ForWriting = 2
Const TristateUseDefault = 1, TristateTrue = -1, TristateFalse = 0
strAcctFileName = "Customer.txt"

Set fs = CreateObject("Scripting.FileSystemObject")

Set f = fs.GetFile("R:\path\" & strAcctFileName)

Set ts = f.OpenAsTextStream(ForWriting, TristateUseDefault)
ts.Close

Takes too long, is there another was?
Thanks Jaggar

 

[Remou]

Hi
Is there a reason why you cannot link to the file?

 

[jaggar]

I do not want to form a likage with this text file to an Access table, because once I delete the records in the text file, other records will be written to it.

Thanks, Jaggar

 

[Ashank4vba]

This may sound silly but why not use "Open" and "Line Input" functions to read lines of strings from the file and manipulate the string and "Print" the string back to the file.
An example is also in

http://www.experts-exchange.com/Databases/MS_Access/Q_21041263.html

 

[Remou]

I do not see why adding records should be a problem, but that is your decision.
Here are some threads:
Importing text file with headers and page breaks
thread700-719078

Random access:
replace a line in the array and overwrite the file
thread707-1103477