中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

IE中怎么用VBScript不提示直接打印

發布時間:2021-10-08 14:02:10 來源:億速云 閱讀:135 作者:小新 欄目:開發技術

這篇文章將為大家詳細講解有關IE中怎么用VBScript不提示直接打印,小編覺得挺實用的,因此分享給大家做個參考,希望大家閱讀完這篇文章后可以有所收獲。

首先在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不提示直接打印”這篇文章就分享到這里了,希望以上內容可以對大家有一定的幫助,使各位可以學到更多知識,如果覺得文章不錯,請把它分享出去讓更多的人看到。

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

和龙市| 新绛县| 安康市| 黄冈市| 那曲县| 井冈山市| 阳原县| 巨鹿县| 梓潼县| 呼玛县| 抚顺县| 长阳| 大余县| 南汇区| 化州市| 宁夏| 岑溪市| 五台县| 永春县| 淮南市| 灵山县| 上犹县| 芦溪县| 安阳县| 甘洛县| 壤塘县| 光泽县| 宽甸| 且末县| 榕江县| 郯城县| 吉安县| 荃湾区| 西充县| 苏尼特左旗| 梁山县| 藁城市| 恩平市| 白山市| 巧家县| 稷山县|