G
GIAN
HI,
I have a table that I would like to export in CSV format to a location on the
network. I think I have the code that works for that but my chanllege is that
I need to include a count of the records in the table at the end of the file.
Here's the code that I have so far:
Private Sub Command0_Click()
On Error GoTo Err_Command0_Click
DoCmd.TransferText acExportDelim, , "APRIA-CLAIMSYYYYMMDD", "H:\Fleet\DOT\
ALERT DRIVING\APRIA-CLAIMS" & Format(Date, "YYYYMMDD") & ".csv", True
Beep
MsgBox "Your Files are Ready!", vbInformation, ""
Exit_Command0_Click:
Exit Sub
Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click
End Sub
Any suggestions would be greatly appreciated.
Regards
I have a table that I would like to export in CSV format to a location on the
network. I think I have the code that works for that but my chanllege is that
I need to include a count of the records in the table at the end of the file.
Here's the code that I have so far:
Private Sub Command0_Click()
On Error GoTo Err_Command0_Click
DoCmd.TransferText acExportDelim, , "APRIA-CLAIMSYYYYMMDD", "H:\Fleet\DOT\
ALERT DRIVING\APRIA-CLAIMS" & Format(Date, "YYYYMMDD") & ".csv", True
Beep
MsgBox "Your Files are Ready!", vbInformation, ""
Exit_Command0_Click:
Exit Sub
Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click
End Sub
Any suggestions would be greatly appreciated.
Regards