This command doesn't create the folder only with the path:
DoCmd.OutputTo acOutputReport, "", acFormatPDF, Path & "\" & FileName, False
who says it does?
what is the string value of your variable path ?
post it here..
or just do this
if right(Path,1)<>"\" then path=path & "\"
'create the folder/s
Call MakeSureDirectoryPathExists(Path)
'create the file
DoCmd.OutputTo acOutputReport, "", acFormatPDF, Path & "\" & FileName, False