打印IE中用VBScript不提示直接打印的代码

ie首页改不了  时间:2021-01-27  阅读:()

首先在HTML页面中加入WebBrowser的Object:

<OBJECT classid="CLSID:8856F961-340A-1 1D0-A96B-00C04FD705A2" height=0id=wb name=wb width=0></OBJECT>

之后使用如下代码进行打印

&t;script Ian guage="VBScript">sub prin tvb()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_W AITFORCOMPLETION+PRINT_DONTBOTHERUSER

WB.ExecWB 6,2,3,0

<HTML>

<HEAD>

<OBJECT ID="WB" WIDTH="0" HEIGHT="0"CLASSID="clsid:8856F961-340A-1 1 D0-A96B-00C04FD705A2"&gt ;</OBJECT>

<SCRIPT LANGUAGE="VBScript">

Subwindow_onunl oad

On Error Resume Next

Set WB=noth ing

End Sub

Sub vbPrin tPage(x,y,z)

OLECMDID_PRINT=6

OLECMDEXECOPT_DODEFAULT=0

OLECMDEXECOPT_PROMPTUSER= 1

OLECMDEXECOPT_DONTPROMPTUSER=2

On Error Resume Next

WB.ExecWB x,y,乙0

End Sub

</SCRIPT>

</HEAD>

<BOD Y>

<TABLE BORDER=1&gt ;<TR&gt ;<TD>

< INPUT TYPE="BUTTON" VALUE="Pri nt" ONCLICK="vbPri ntPage 6,2,3"><BR>

< INPUT TYPE="BUTTON"VALUE="Preview" ONCLICK="vbPri ntPage 7, 1,

0"><BR>

< INPUT TYPE="BUTTON"VALUE="Page Setup" ONCLICK="vbPri ntPage 8, 1,0"><BR>

</TD>

<TD bgcolor="gree n">Pri nt Test

</TD></TR></TABLE>

</BOD Y>

</HTML>

[6.18]DogYun:充100送10元,态云7折,经典云8折,独立服务器月省100元,幸运大转盘最高5折

DogYun是一家2019年成立的国人主机商,提供VPS和独立服务器租用等,数据中心包括中国香港、美国洛杉矶、日本、韩国、德国、荷兰等,其中VPS包括常规VPS(经典云)和按小时计费VPS(动态云),使用自行开发的面板和管理系统,支持自定义配置,动态云各个硬件独立按小时计费,带宽按照用户使用量计费(不使用不计费)或者购买流量包,线路也可以自行切换。目前商家发布了6.18促销方案,新购动态云7折,经...

pacificrack:超级秒杀,VPS低至$7.2/年,美国洛杉矶VPS,1Gbps带宽

pacificrack又追加了3款特价便宜vps搞促销,而且是直接7折优惠(一次性),低至年付7.2美元。这是本月第3波便宜vps了。熟悉pacificrack的知道机房是QN的洛杉矶,接入1Gbps带宽,KVM虚拟,纯SSD RAID10,自带一个IPv4。官方网站:https://pacificrack.com支持PayPal、支付宝等方式付款7折秒杀优惠码:R3UWUYF01T内存CPUSS...

6元虚拟主机是否值得购买

6元虚拟主机是否值得购买?近期各商家都纷纷推出了优质便宜的虚拟主机产品,其中不少6元的虚拟主机,这种主机是否值得购买,下面我们一起来看看。1、百度云6元体验三个月(活动时间有限抓紧体验)体验地址:https://cloud.baidu.com/campaign/experience/index.html?from=bchPromotion20182、Ucloud 10元云主机体验地址:https:...

ie首页改不了为你推荐
免费送q币活动免费送q币送钻的活动视频制作软件哪个好哪款视频编辑软件比较好用?电脑杀毒软件哪个好电脑杀毒软件那个最好??少儿英语哪个好少儿英语哪个好游戏盒子哪个好游戏盒子哪个好?海克斯皮肤哪个好LOL用100块是抽海克斯好还是抽蛮王的生化领主的活动还是直接买皮肤好播放器哪个好什么播放器好用qq空间登录网站QQ空间打开需要输入用户名和密码,下面是正在连接一个网址和领域网址qq网盘在哪里QQ网盘在哪里dns服务器未响应电脑上不了网了,显示DNS服务器未响应,什么意思
西安服务器租用 百度云100as 美国翻墙 idc评测网 NetSpeeder 丹弗 免费ftp空间申请 浙江独立 本网站服务器在美国 台湾谷歌地址 京东商城0元抢购 创梦 web服务器的架设 太原网通测速平台 免费phpmysql空间 跟踪路由命令 太原联通测速 独立主机 服务器防火墙 万网主机 更多