✅导出网页为PDF_利用本地 Edge或Chrome 实现

莫小乐

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

' 基础调用
导出网页为PDF (“C:\Users\Administrator\Desktop\test.pdf”, “https://www.baidu.com”)

子程序名	返回值类型	公开	备 注
导出网页为PDF
参数名	类 型	参考	可空	数组	备 注
存储路径	文本型
网页地址	文本型

变量名	类 型	静态	数组	备 注
浏览器路径	文本型
命令行	文本型

' 查找浏览器
浏览器路径 ＝ 取文本注册项 ( #本地机器, “SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\msedge.exe\”, )
如果真 (浏览器路径 ＝ “”)
浏览器路径 ＝ “C:\Program Files (x86)\Microsoft\Edge\Application\msedge.exe”
如果真 (文件是否存在 (浏览器路径) ＝ 假)
浏览器路径 ＝ “C:\Program Files\Google\Chrome\Application\chrome.exe”
如果真 (文件是否存在 (浏览器路径) ＝ 假)
信息框 (“未找到浏览器，请安装Edge或Chrome”, 0, , )

' 执行导出
命令行 ＝ #引号 ＋ 浏览器路径 ＋ #引号 ＋ “ --headless --disable-gpu --no-sandbox --print-to-pdf=” ＋ #引号 ＋ 存储路径 ＋ #引号 ＋ “ --print-to-pdf-no-header ” ＋ #引号 ＋ 网页地址 ＋ #引号
运行 (命令行, 真, 1)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> ' 基础调用<br /> 导出网页为PDF (“C:\Users\Administrator\Desktop\test.pdf”, “<a href="https://www.baidu.com" rel="nofollow" rel="nofollow" target="_blank">https://www.baidu.com</a>”)<br /> <br /> .子程序 导出网页为PDF<br /> .参数 存储路径, 文本型<br /> .参数 网页地址, 文本型<br /> .局部变量 浏览器路径, 文本型<br /> .局部变量 命令行, 文本型<br /> <br /> ' 查找浏览器<br /> 浏览器路径 ＝ 取文本注册项 (#本地机器, “SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\msedge.exe\”, )<br /> .如果真 (浏览器路径 ＝ “”)<br />     浏览器路径 ＝ “C:\Program Files (x86)\Microsoft\Edge\Application\msedge.exe”<br /> .如果真结束<br /> .如果真 (文件是否存在 (浏览器路径) ＝ 假)<br />     浏览器路径 ＝ “C:\Program Files\Google\Chrome\Application\chrome.exe”<br /> .如果真结束<br /> .如果真 (文件是否存在 (浏览器路径) ＝ 假)<br />     信息框 (“未找到浏览器，请安装Edge或Chrome”, 0, , )<br /> .如果真结束<br /> <br /> ' 执行导出<br /> 命令行 ＝ #引号 ＋ 浏览器路径 ＋ #引号 ＋ “ --headless --disable-gpu --no-sandbox --print-to-pdf=” ＋ #引号 ＋ 存储路径 ＋ #引号 ＋ “ --print-to-pdf-no-header ” ＋ #引号 ＋ 网页地址 ＋ #引号<br /> 运行 (命令行, 真, 1)

游客，如果您要查看本帖隐藏内容请回复

陈治勤

666666666666666666

夏亿

感谢分享

汉族

支持一下   

酷易自绘

RE: ✅导出网页为PDF_利用本地 Edge或Chrome 实现 [修改]

futiem

导出网页为PDF_利用本地 Edge或Chrome 实现

fastdao

谢谢分享

我的yyy123

学习学习

gaoqing

谢谢分享

lm88818

学习一下