export access table to a textfile

[Phutie]

Hi,

I've seen codes on how to export a records from a table to a tab delimited text file but through the use of ms flexgrid or ADO controls.

I'm using a data control and dbgrid32.ocx. How can I export my table into a tab delimited textfile then? pls. help...

thanks,

Phutie

 

[gigsvoo]

Dim fso As New FileSystemObject
Dim f As TextStream
Set f = fspenTextFile("C:\Test.txt", ForAppending)
Dim i, j
For i = 0 to MsFlexGrid1.Rows - 1
For j = 0 to MsFlexGrid1.Cols - 1
f.Write(MsFlexGrid1.TextMatrix(i, j)) & ";"
Next
f.Write() & vbCrLf
Next Thanks

Neo

http://communities.msn.com.my/VisualBasicwithNeo