Print PDF with VBScript

Set WshShell = CreateObject("WScript.Shell")    
WshShell.Run chr(34) & "C:\Program Files (x86)\Adobe\Reader 10.0\Reader\AcroRd32.exe" _    
    & Chr(34) & " /p /h " & chr(34) & "d:\Temp\p0.600633652182296.pdf" & chr(34), 0    
Set WshShell = Nothing