Printing 从服务器上运行的vb脚本从Adobe Reader打印到特定打印机

我在服务器上运行一个vb脚本，它是从客户端调用的

我的脚本应该将pdf标签打印到特定的打印机上

如果我像这样将文件复制到打印机上，我将在激光打印机上使用普通打印：

'Create the filesystem object

Set FSO = CreateObject("Scripting.FileSystemObject")

'Get a reference to the folder you want to search

set FLD = FSO.GetFolder(strFolder)

'loop through the folder and get the file names

For Each Fil In FLD.Files

If UCase(FSO.GetExtensionName(Fil.Name)) = "PDF" Then

FSO.CopyFile Fil.path, "\\servername\printername"

End If

Next

但这不适用于标签。尝试时，标签打印机将进入错误模式：-(

如果我这样做，它会起作用：

Set objShell = CreateObject( "WScript.Shell" )

objShell.run chr(34) & "C:\Program Files (x86)\Adobe\Acrobat Reader DC\Reader\AcroRd32.exe" & chr(34) &
" /p /h " & chr(34) & "filepath\filename" & chr(34)

但它会打印到默认打印机

这也没关系，但由于某些原因，我无法从客户端调用的脚本设置默认打印机。只有在我登录到服务器并手动运行脚本的情况下

以下是设置默认打印机的步骤：

Set objNet = CreateObject("Wscript.Network")

objnet.AddWindowsPrinterConnection "\\servername\printername"

objnet.SetDefaultPrinter "\\servername\printername"

因此，我试着这样做：

Set objShell = CreateObject( "WScript.Shell" )

objShell.run chr(34) & "C:\Program Files (x86)\Adobe\Acrobat Reader DC\Reader\AcroRd32.exe" & chr(34) &
" /t " & chr(34) & "filepath\filename" & chr(34) & " " & chr(34) & "\\servername\printername" & chr(34) &
" " & chr(34) & "drivername" & chr(34) & " " & chr(34) & "portname" & chr(34)

但当我运行这个Adobe时，它会打开并显示文件，而不会发生其他任何事情-(

有人知道如何让SetDefultPrinter或..\ArcroRd32.exe/t“filename”“printername”“drivername”“portname”工作吗