Question

我是批处理脚本的新手，请建议如何处理以下问题。

我想加载网页，然后使用批处理/ VB脚本将2页网页打印到打印机。

感谢。

Answer 1

这是一个将执行此操作的vbscript。将站点变量更改为您要打印的任何站点。

'Print Webpage
On Error Resume Next

Dim oIE 
Dim NumPages
Dim Site
Const OLECMDID_PRINT = 6
Const OLECMDEXECOPT_DONTPROMPTUSER = 2

NumPages = 2
Site = "www.google.com"

Set oIE = CreateObject("InternetExplorer.Application")
oIE.Navigate Site
oIE.Visible = 1

Do while oIE.ReadyState <> 4
    wscript.sleep 1000
Loop

For x = 1 to NumPages
    oIE.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER
Next

如何打开网址，并使用批处理/ VB脚本打印页面？

1 个答案: