Hello Karthik，

欢迎访问Scripting Language论坛。

尝试以下代码：

如果不是IsObject（application），则
   设置SapGuiAuto = GetObject（" SAPGUI"）
   设置应用程序= SapGuiAuto.GetScriptingEngine
 万一

 如果不是IsObject（connection）然后
   设置连接= application.Children（0）
 万一

 如果不是IsObject（session）然后
   设置会话= connection.Children（2）
 万一

 设置WshShell = WScript.CreateObject（" WScript.Shell"）
 WshShell.AppActivate"打印预览"'窗口的标题
 WScript.Sleep 500

 '将焦点设置到Acrobat控件，但检查控件的正确ID
 session.findById（" wnd [0]/shellcont/shell/shellcont [1]/shell"）。SetFocus
 WScript.Sleep 250

 WshShell.SendKeys" ^ + s"'打开保存对话框
 WScript.Sleep 750
 WshShell.SendKeys"％n"'激活文件名字段
 WshShell.SendKeys" C：\ Users \ Public \ Desktop \ 001.pdf"'路径和文件名
 WshShell.SendKeys"％s"'保存文件
 

您可以通过SendKeys命令保存PDF。 首先，在将Acrobat控件聚焦后，使用Ctrl + S打开保存对话框。 然后使用Alt + N激活名称字段，将文件名放入其中，然后通过Alt + S保存文件。

让我们知道您的结果。

干杯

Stefan

你好 Hoang Nga ，
你为什么不清楚 无法创建WScript.Shell类的对象。 在正常情况下，它应该可以正常工作。 在VBScript本身上尝试一下，然后将您的结果发送给我们。
最诚挚的问候
Stefan

此消息已被审核。