I am starter with access VBA and now have a problem when trying to export access table to txt file. I have an access table called tblCitationList, it has three column:ID,Volume, Issue and Pub date. It looks like:
-----------------------------------------
ID Volumn Issue Pub date
-----------------------------------------
1 113 15 2006
2 76 3 2004
-----------------------------------------

I want to export this table to txt file with the following format:

----------------------------------------------------
ID - 1
VI - 113 [from TblCitationlist "Volume"]
IP - 15 [from TblCitationlist "Issue"]
DP - 2006 [from TblCitationlist "Pub date"]

ID - 2
VI - 76 [from TblCitationlist "Volume"]
IP - 3 [from TblCitationlist "Issue"]
DP - 2004 [from TblCitationlist "Pub date"]
----------------------------------------------------

Could anyone help? Thanks very much!!

Here's some simple code that should do the trick:

Dim db As Database
Dim rs As Recordset

Dim nRecords As Long, r As Long

    Set db = CurrentDb()
    Set rs = db.OpenRecordset(TableName, dbOpenDynaset)
    Open OutputFilename For Output As #1

    rs.MoveLast
    nRecords = rs.RecordCount
    rs.MoveFirst

    For r = 1 To nRecords

    Print #1, "ID - "; r
    Print #1, "VI - "; rs("Volume")
    Print #1, "IP - "; rs("Issue")
    Print #1, "DP - "; rs("Pub date")

        rs.MoveNext
    Next r

    rs.Close
    db.Close


-Phil-