Make Directory

[Guest]

I export my results like this:
DoCmd.OutputTo acOutputQuery, "q_RNtoExcel", acFormatXLS, "C:\PAD\.xls", True

But if the user does not have the dir "C:\PAD" as you know it cannot write
it out.
Is there a way to code a make directory statement, then run the
DoCmd.Output...??

thanks

 

[Guest]

strPath = "C:\PAD"
If Dir(strPath, vbDirectory) = "" Then
MkDir(strPath)
End If