robhargreaves
Registered User.
- Local time
- Today, 00:44
- Joined
- Mar 4, 2005
- Messages
- 11
Hi
I am using the following code to create a csv file on the desktop using a query
Set wShell = CreateObject("WScript.Shell")
path = wShell.SpecialFolders("Desktop")
Set wShell = Nothing
DoCmd.TransferText acExportDelim, , "qryexportcsv", path + "\export" & Format(Now(), "ddmmyyyy_HH:MM:SS") & ".csv", True
Could someone tell me how I would also make a copy of the file in the root directory in the same event.
Thanks
Rob
I am using the following code to create a csv file on the desktop using a query
Set wShell = CreateObject("WScript.Shell")
path = wShell.SpecialFolders("Desktop")
Set wShell = Nothing
DoCmd.TransferText acExportDelim, , "qryexportcsv", path + "\export" & Format(Now(), "ddmmyyyy_HH:MM:SS") & ".csv", True
Could someone tell me how I would also make a copy of the file in the root directory in the same event.
Thanks
Rob