婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > 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不提示直接打印的代碼的相關信息資訊供網民參考!
  • 推薦文章
    主站蜘蛛池模板: 吉木萨尔县| 防城港市| 丹东市| 肇庆市| 濮阳县| 广元市| 邓州市| 英山县| 淮南市| 南江县| 巨野县| 炎陵县| 米泉市| 安新县| 灵宝市| 加查县| 肃宁县| 合阳县| 三原县| 子长县| 隆昌县| 丰宁| 乐昌市| 徐水县| 四会市| 咸宁市| 任丘市| 嘉善县| 富顺县| 育儿| 琼海市| 巢湖市| 平阳县| 新蔡县| 托克托县| 荥阳市| 扶沟县| 汾西县| 武夷山市| 峡江县| 桃园县|