Export a table but increment the name

[Wayne L]

I posted a question simalar to this before but was not clear on what I was trying to do. I am using two tables one primary and a temp table. I import my data to the temp table and bounce it against the primary table and append the primary table with the new data for export. The problem is I have set a command button to do this and if the user selects the button twice the name of the output.txt file is then zero. I need to add an increment number or letter to the output name. Is this possible. I have tried the date but that still will not work if I export 2 or more files the same day.
Thanks,
Wayne L

[Rabbit]

What about using Date and Time down to the second?

[Wayne L]

Here is what worked for me.

Private Sub Export_text_Date_Click()
'TheDate = Month(Date) & "-" & Day(Date) & "-" & year(Date)
TheDate = (Format(Now(), "yymmdd-hhmmss AM/PM")) & ".txt"
TheFile = ("C:\FSMFILES\A4A\A4A ") & TheDate & ""
DoCmd.TransferText acExportFixed, "Import/Export SPECS", "YourTbl",(TheFile), False
End Sub
 

Wayne L

[Rabbit]

Glad you got it working.