SELECT Name FROM MyTable

Sub ExportToText()
Dim rst As DAO.Recordset
Open "C:__tmpnames.txt" For Output As #1
Set rst = CurrentDb.OpenRecordset("SELECT [Name] FROM MyTable", dbOpenSnapshot)
Do While Not rst.EOF
    Print #1, rst!Name
    rst.MoveNext
Loop
rst.Close
Set rst = Nothing
Close #1
End Sub

DoCmd.TransferText acExportDelim,"mySpecification","myView","C:DATAmyfile.csv",True