Outputting a TXT file with the date as the name 1

[albyh]

I am trying to output a text file from a report, I'm using the OutputTo command in a Macro. i need to know how set the date as the name of the text file being output.

Any help would be greatly appreciated.

Thanks

ALban

 

[CosmoKramer]

I've done this in a function, not in a macro:

Function Xferdoc_Stats()

Dim strFileName As String
strFileName = "c:\AccReports\Report\" & Format(Date - 1, "mm-dd-yyyy") & ".doc"
DoCmd.OutputTo acOutputReport, "rptStatsReport", acFormatRTF, strFileName
End Function

Then in your macro, invoke the RunCode action using the function name you specified....

 

[Ecniv]

I suggest a date format of "yyyymmdd" as this is better when looking at a lot of files...

Vince

 

[sandymcrae]

You could use a field (possibly hidden) from an open form.

I use a macro with 'Transfer Text' and the 'File Name' set to="k:\" & [Forms]![frmMenu]![List10] & ".txt"

Where field list10 contains the name of the file.

 

[CosmoKramer]

The date format and date value shown in my example are simply a sample from one of my apps. The format was specified by a user who had "trouble" interpreting dates in any other format.......

 

[albyh]

This is great thanks a lot

Alban