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")...