led玻璃,嘻哈包袱铺最新相声,金乡大蒜最新价格
首先在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>
如对本文有疑问,请在下面进行留言讨论,广大热心网友会与你互动!!
点击进行留言回复
相关文章:
-
-
-
-
用vbs实现文本循环读取
因为测试中需要读取一批url数据进行浏览,其实使用qtp本身的table能实现多种读取方式,但是因为需要tabel是使用excel保存的,在没有...
[阅读全文]
-
-
-
-
-
-
-
网友评论