繁體中文当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > IE中用VBScript不提示直接打印的代码
- VBScript
- 用VBScript批量安装网络打印机和设置默认打印机
- Vbs 脚本编程简明教程之一
- vbs SendKey 用法 Sendkey 键盘对应的码表
- 用vbs 取得收藏夹里的所有链接名称和URL的脚本
- link-view.vbs 页面链接查看
- VBS读网页的代码
- 用VBScript写合并文本文件的脚本
- vbscript ms owc 封裝代码
- VbScript 封裝MS OWC(二)
- vbs 注册表操作代码(添加删除)
- 用于修复XP中最小化程序 在任务栏显示图标的vbs脚本
- 完整的注册表操作实例 VBS脚本
- vbs 注册表实现木马自启动
- reg2vbs.vbs 将Reg文件转换为VBS文件保存 IT学习网修正版本
- e是自然对数的底 e.vbs
- vbs imail 密码解密
- VBS Runas 自动输入密码, 明文
- vbscript 三个数比较大小的实现代码
- 脚本 MsAgent组件 微软精灵 揪出系统自带的宠物
- VBS InternetExplorer.Application的属性和方法介绍
IE中用VBScript不提示直接打印的代码
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-11 浏览: 59 ::
收藏到网摘: n/a
首先在HTML 页面中加入WebBrowser 的Object:
<OBJECT classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2" height=0 id=wb name=wb width=0></OBJECT>
之后，使用如下代码进行打印：
<script language="VBScript">
sub printvb()
wb.execwb 6,2,3
End Sub
</script>
关键代码 wb.execwb 6,2,3 可以在 VBScript 方式下实际无需提示的直接打印，但奇怪的是用同样的参数，在 Javascript 方式下IE 依然会弹出打印对话窗口，也许是因为VBScript 是Microsoft 开发的专用于 IE 的吧，而 Javascript 毕竟是外人：）
另找到一个较全面的例子，如下:
6=OLECMDID_PRINT
2=OLECMDEXECOPT_DONTPROMPTUSER,
2+1=PRINT_WAITFORCOMPLETION + PRINT_DONTBOTHERUSER
WB.ExecWB 6, 2, 3, 0
<HTML>
<HEAD>
<OBJECT ID="WB" WIDTH="0" HEIGHT="0" CLASSID="clsid:8856F961-340A-11D0-A96B-00C04FD705A2"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Sub window_onunload
On Error Resume Next
Set WB = nothing
End Sub
Sub vbPrintPage ( x , y , z )
OLECMDID_PRINT = 6
OLECMDEXECOPT_DODEFAULT = 0
OLECMDEXECOPT_PROMPTUSER = 1
OLECMDEXECOPT_DONTPROMPTUSER = 2
On Error Resume Next
WB.ExecWB x, y, z, 0
End Sub
</SCRIPT>
</HEAD>
<BODY>
<TABLE BORDER=1><TR><TD>
<INPUT TYPE="BUTTON" VALUE="Print" ONCLICK="vbPrintPage 6, 2, 3"><BR>
<INPUT TYPE="BUTTON" VALUE="Preview" ONCLICK="vbPrintPage 7, 1, 0"><BR>
<INPUT TYPE="BUTTON" VALUE="Page Setup" ONCLICK="vbPrintPage 8, 1, 0"><BR>
</TD>
<TD bgcolor="green">Print Test
</TD></TR></TABLE>
</BODY>
</HTML>
评论 (0) All
