print report pdf

[pirotfab]

Hello, i want to print a report in pdf

i have an error from the path

i don't understand, can you help me ?

sub ImprimerRapport

vRapport = "RP03"
vNom = "Bilan"
ActiveDocument.PrintReport(vRapport), "QlikViewPDF",False
vAdresse = "C:\QV\test" & vNom&".pdf"
ImprimerRapportPDF(vAdresse)
ActiveDocument.GetApplication.Sleep 2000

end sub

'===========================================================================

Function ImprimerRapportPDF(pdfOutputFile)

Set WSHShell = CreateObject("WScript.Shell")

WSHShell.RegWrite "HKCU\Software\QlikViewPDF\OutputFile", pdfOutputFile, "REG_SZ"
WSHShell.RegWrite "HKCU\Software\QlikViewPDF\BypassSaveAs", "1", "REG_SZ"

Set WSHShell = nothing

End function