Visual Basic - exportar tablas access 2000 a .txt con Vb

Exportar tablas access 2000 con Vb de access.

Si estás utilizando ADO, puedes hacer:

StringToFile MiRecordset.GetString,"MiTabla.txt"

Public Function StringToFile(StringText As String, FileName As String) As Long
Dim hlngFile As Long
hlngFile = FreeFile
Open FileName For Binary Access Write As hlngFile
Put hlngFile, , StringText
Close hlngFile
StringToFile = FileLen(FileName)
End Function

Gracias Cecilia....te explico, tengo que exportar una tabla access (por ejemplo "Gastos" a una carpeta determinada como "C:/Datos/ " ) a txt con Vb de access. Cómo puedo utilizar tu código para ésto?. Utilizo DAO y ADO.

Una vez que recuperas los datos de la tabla, por ejemplo:

Set MiRecordset = ObjetoConnection.Execute("SELECT * FROM Gastos")

La exportas con el código anterior:

FileToString MiRecordset.GetString,"C:\Datos\Gastos.txt"