【 以下文字转载自 OfficeSoft 讨论区 】
发信人: AaYaYa (啊呀呀*选帝侯初长成), 信区: OfficeSoft
标  题: 不装任何额外软件如何手撸一个批量转pdf的程序？
发信站: 水木社区 (Thu Dec 12 16:54:15 2024), 站内


一个Windows7操作系统的电脑，装了MS Office和Adobe Pdf reader，别的什么都没有安装了，也不让安装，电脑里面很多很多的docx文件，我想要不安装任何其它软件的情况下，自己写bat脚本或者MS powershell或者vbs或者什么脚本程序，实现对指定路径下的所有docx文件遍历批量转换为pdf文件，怎么做呢？这个问题我已经问过了ChatGPT和某款国产AI了，
它们给出的程序代码都是不能自动批量转换，都是转换时弹窗让我手动选择保存文件名和路径，一旦需要一个一个转换人工交互了，那就慢下来了没什么意义，我就只是需要在docx原始的路径下面直接存放转换出来的pdf文件，但是AI给我的代码都不行，那么我的需求到底能不能通过写代码实现呢？再强调一下，除了MS Office和Adobe Reader之外什么软件都不让再安装了
--
FROM 223.104.40.*

再写个脚本自动输入和点对话框怎么样，Windows Script Host可能可以满足你的要求。
我用powershell的命令：
Get-Content C:\temp\1.txt | Out-Printer "Microsoft Print to PDF"
输出pdf
然后运行一个VBS:

' 创建WScript.Shell对象
Set WshShell = WScript.CreateObject("WScript.Shell")

' 等待文件另存为对话框出现（假设你知道大概的等待时间）
WScript.Sleep 2000 ' 等待2秒

' 激活文件另存为对话框
WshShell.AppActivate "Windows PowerShell"
WScript.Sleep 100
' 使用SendKeys发送文件名和回车键
WshShell.SendKeys "MyFileName.pdf"
WScript.Sleep 100
WshShell.SendKeys "{ENTER}"

结果是能自动保存的，你让AI改改，遍历文件打印并且输入文件名保存应该可以吧
【 在 AaYaYa 的大作中提到: 】
: 【 以下文字转载自 OfficeSoft 讨论区 】
: 发信人: AaYaYa (啊呀呀*选帝侯初长成), 信区: OfficeSoft
: 标  题: 不装任何额外软件如何手撸一个批量转pdf的程序？
: ...................
--
修改:qgg FROM 61.51.91.*
FROM 220.174.161.*