DoCmd.OutputTo problem

[IMO]

I'm using the following code to Output a report as a Text file, saving it as the name in an unbound textbox on the form

     DoCmd.OutputTo acReport, "rptAddCost", "MS-DOSText(*.txt)", "C:\Documents and Settings\temp\Desktop\(" & Me!TxtSupName & ").txt", False, ""

all works fine but what I'd like to do is save it as above adding todays date before the Name so the saved file would look like

180803(DREK02).txt

not

(DREK02).txt

I'm sure it's quite simple but I just can't get my head round it today. Most grateful for any help

IMO

 

[Mile-O]

DoCmd.OutputTo acReport, "rptAddCost", "MS-DOSText(*.txt)", "C:\Documents and Settings\temp\Desktop\(" & Me!TxtSupName & CStr(Format(Date, "ddmmyy"))& ").txt", False, ""

 

[namliam]

DoCmd.OutputTo acReport, "rptAddCost", "MS-DOSText(*.txt)", "C:\Documents and Settings\temp\Desktop\" & Format(date(),"yyyymmdd") & "(" & Me!TxtSupName & ").txt", False, ""

When dating files i would advice you to turn the date around like above. Otherwise sorting will go off
010103
010203
020103 (see what i mean?)

Regards

The Mailman

 

[IMO]

Thanks Mile and namliam, that did the trick! Ever had one of those days?!

Cheers again

IMO

 

[namliam]

All the time and more....

Esspecially if Mile is "in the house !"


Regards

 

[Mile-O]