Exporting Table to Text file including Field names

  • Thread starter Thread starter AShi
  • Start date Start date
A

AShi

When i am using following

DoCmd.TransferText acExportFixed, strExportSpec, strTable,
"\\Enterprise\mlhsapps\ExportTest.txt", True fieldnames are seperated by
comma istead of fixex width

Can some one help me with this
 
when i export to delimitted - some how it adds time to date. I am sure I
don't have tlme in export specs
 
Private Sub cmdExport_Click()

Dim strTable, strPath, strLine, strTemp As String
Dim X As Integer
Dim BlkRow As Integer
Dim strSQL As String
Dim strExportSpec As String
Dim fs, f
Dim fso, myfile, objTxt As Object

strTable = FirstSelected

Select Case Left(strTable, 5)
Case Is = "A2DEV"
strExportSpec = "A2DEV3_ExportSpec1"
Case Is = "A2DV1"
strExportSpec = "A2DEV3_ExportSpec"

End Select

'Export to temporary text file
DoCmd.TransferText acExporText, strExportSpec, strTable,
"\\Enterprise\mlhsapps\ExportTest.txt", True
 
Back
Top