I need to create a CSV import file from a query with numerous duplicate column names through vba. To accomodate the duplicate column names, I've painstakingly set captions in the query. The SendTo preserves these captions when sending to Excel, but when I use the TransferText method to send to a comma-delimited file, the captions are ignored.

Does anyone know how to preserve captions through SendText or, barring that, set captions in the SQL itself (the way Oracle's iSQL+ allows you to)?

Thanks! (TransferText method below ...)

DoCmd.TransferText acExportDelim, , "H95_Import_DEV", "C:\ADP\PCPW\ADPDATA\PRH95EMP.csv", True