0514-86177077

9:00-17:00（工作日）

主页 > 知识库 > IE中用VBScript不提示直接打印的代码

IE中用VBScript不提示直接打印的代码
热门标签：墨西哥地图标注app 上海办理400电话选号 天津智能外呼系统排名 企业400电话办理价钱低 外呼系统说话声音小怎么办 机器人打电销适用于美业吗 智云亿呼电话机器人 外呼系统群 龙岩400电话申请
首先在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>

标签：阜新 丽水 锡林郭勒盟 承德 青岛 齐齐哈尔 黄山 鄂尔多斯

巨人网络通讯声明：本文标题《IE中用VBScript不提示直接打印的代码》，本文关键词  中用,VBScript,不,提示,直接,；如发现本文内容存在版权问题，烦请提供相关信息告之我们，我们将及时沟通与处理。本站内容系统采集于网络，涉及言论、版权与本站无关。
  • 相关文章
  • 下面列出与本文章《IE中用VBScript不提示直接打印的代码》相关的同类信息！
  • 本页收集关于IE中用VBScript不提示直接打印的代码的相关信息资讯供网民参考！
    • 推荐文章

    上一篇：emule自动关机脚本

    下一篇：vbs引用另一个vbs的代码

    Copyright © 1999-2012 诚信 合法 规范的巨人网络通讯始建于2005年

    苏ICP备15040257号-8

    产品关键词： IE中用VBScript不提示直接打印的代码 中用,VBScript,不,提示,直接,