好湿?好紧?好多水好爽自慰,久久久噜久噜久久综合,成人做爰A片免费看黄冈,机机对机机30分钟无遮挡

主頁 > 知識庫 > 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不提示直接打印的代碼的相關信息資訊供網民參考!
  • 推薦文章