document.all.WebBrowser.ExecWB
WebBrowser控件實作對IE浏覽器的各種控制
在不是js打開的頁面上按window.close(),會有提示框,很煩,現在可以不用了,沒有提示框直接關閉視窗。
試試下面代碼:
<object id="WebBrowser" width=0 height=0 classid="CLSID:8856F961_340A_11D0_A96B_00C04FD705A2">
</object>
<input type="button" name="Button" value="關閉視窗" onClick="document.all.WebBrowser.ExecWB(45,1)">
試着改變參數會得到其他一些功能:
WebBrowser.ExecWB(1,1) 打開
WebBrowser.ExecWB(2,1) 關閉現在所有的IE視窗,并打開一個新視窗
WebBrowser.ExecWB(4,1) 儲存網頁
WebBrowser.ExecWB(6,1) 列印
WebBrowser.ExecWB(7,1) 列印預覽
WebBrowser.ExecWB(8,1) 列印頁面設定
WebBrowser.ExecWB(10,1) 檢視頁面屬性
WebBrowser.ExecWB(15,1) 好像是撤銷,有待确認
WebBrowser.ExecWB(17,1) 全選
WebBrowser.ExecWB(22,1) 重新整理
WebBrowser.ExecWB(45,1) 關閉窗體無提示
這些隻對IE5.5以上版本有效,我是在IE6下測試的,通過的。
代碼:
--------------------------------------------------------------------------------
■打開■
<input name=Button onClick=document.all.WebBrowser.ExecWB(1,1) type=button value=打開>
<OBJECT classid=CLSID:8856F961_340A_11D0_A96B_00C04FD705A2 height=0 id=WebBrowser width=0></OBJECT>
■另存為■
<input name=Button onClick=document.all.WebBrowser.ExecWB(4,1) type=button value=另存為><OBJECT classid=CLSID:8856F961_340A_11D0_A96B_00C04FD705A2 height=0 id=WebBrowser width=0></OBJECT>
■屬性■
<input name=Button onClick=document.all.WebBrowser.ExecWB(10,1) type=button value=屬性><OBJECT classid=CLSID:8856F961_340A_11D0_A96B_00C04FD705A2 height=0 id=WebBrowser width=0></OBJECT>
■列印■
<input name=Button onClick=document.all.WebBrowser.ExecWB(6,1) type=button value=列印><OBJECT classid=CLSID:8856F961_340A_11D0_A96B_00C04FD705A2 height=0 id=WebBrowser width=0></OBJECT>
■頁面設定■
<input name=Button onClick=document.all.WebBrowser.ExecWB(8,1) type=button value=頁面設定><OBJECT classid=CLSID:8856F961_340A_11D0_A96B_00C04FD705A2 height=0 id=WebBrowser width=0></OBJECT>
■重新整理■
<input type=button value=重新整理 name=refresh οnclick="window.location.reload()">
■導入收藏■
<input type="button" name="Button" value="導入收藏夾" onClick=window.external.ImportExportFavorites(true,);>
■導出收藏■
<input type="button" name="Button3" value="導出收藏夾" onClick=window.external.ImportExportFavorites(false,);>
■加入收藏■
<INPUT name=Button2 οnclick="window.external.AddFavorite(location.href, document.title)" type=button value=加入收藏夾>
■整理收藏夾■
<INPUT name=Submit2 οnclick="window.external.ShowBrowserUI(OrganizeFavorites, null)" type=button value=整理收藏夾>
■檢視原檔案■
<INPUT name=Button οnclick=window.location = "view-source:" + window.location.href type=button value=檢視源檔案>
■語言設定■
<INPUT name=Button οnclick="window.external.ShowBrowserUI(LanguageDialog, null)" type=button value=語言設定>
■前進■
<INPUT name=Submit οnclick=history.go(1) type=submit value=前進>
■後退■
<INPUT name=Submit2 οnclick=history.go(-1) type=submit value=後退>
<OBJECT classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2 height=0 id=WebBrowser width=0></OBJECT>
<input name=Button .Click=document.all.WebBrowser.ExecWB(1,1) type=button value=打開>
<input name=Button .Click=document.all.WebBrowser.ExecWB(2,1) type=button value=關閉所有>
<input name=Button .Click=document.all.WebBrowser.ExecWB(4,1) type=button value=另存為>
<input name=Button .Click=document.all.WebBrowser.ExecWB(6,1) type=button value=列印>
<input name=Button .Click=document.all.WebBrowser.ExecWB(6,6) type=button value=直接列印>
<input name=Button .Click=document.all.WebBrowser.ExecWB(7,1) type=button value=列印預覽>
<input name=Button .Click=document.all.WebBrowser.ExecWB(8,1) type=button value=頁面設定>
<input name=Button .Click=document.all.WebBrowser.ExecWB(10,1) type=button value=屬性>
<input name=Button .Click=document.all.WebBrowser.ExecWB(17,1) type=button value=全選>
<input name=Button .Click=document.all.WebBrowser.ExecWB(22,1) type=button value=重新整理>
<input name=Button .Click=document.all.WebBrowser.ExecWB(45,1) type=button value=關閉> WebBrowser元件的execWB方法 1. <object id="WebBrowser" width=0 height=0 classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"></object> 2. 調用方法: WebBrowser.ExecWB nCmdID, nCmdExecOpt, [pvaIn], [pvaOut] 3. 參數說明: (a).nCmdID OLECMDID_OPEN = 1, OLECMDID_NEW = 2, OLECMDID_SAVE = 3, OLECMDID_SAVEAS = 4, OLECMDID_SAVECOPYAS = 5, OLECMDID_PRINT = 6, OLECMDID_PRINTPREVIEW = 7, OLECMDID_PAGESETUP = 8, OLECMDID_SPELL = 9, OLECMDID_PROPERTIES = 10, OLECMDID_CUT = 11, OLECMDID_COPY = 12, OLECMDID_PASTE = 13, OLECMDID_PASTESPECIAL = 14, OLECMDID_UNDO = 15, OLECMDID_REDO = 16, OLECMDID_selectALL = 17, OLECMDID_CLEARselectION = 18, OLECMDID_ZOOM = 19, OLECMDID_GETZOOMRANGE = 20 OLECMDID_updateCOMMANDS = 21 OLECMDID_REFRESH = 22 OLECMDID_STOP = 23 OLECMDID_HIDETOOLBARS = 24 OLECMDID_SETPROGRESSMAX = 25 OLECMDID_SETPROGRESSPOS = 26 OLECMDID_SETPROGRESSTEXT = 27 OLECMDID_SETTITLE = 28 OLECMDID_SETDOWNLOADSTATE = 29 OLECMDID_STOPDOWNLOAD = 30 上面的關鍵詞都可以在浏覽器的菜單裡面找到對應的選項﹐大家一看就明白的﹗ (b).nCmdExecOpt OLECMDEXECOPT_DODEFAULT = 0, OLECMDEXECOPT_PROMPTUSER = 1, LECMDEXECOPT_DONTPROMPTUSER = 2, OLECMDEXECOPT_SHOWHELP = 3 對于這個參數﹐一般來說﹐選1就可以了。 4.常用: WebBrowser.ExecWB(1,1) 打開 WebBrowser.ExecWB(2,1) 關閉現在所有的IE視窗,并打開一個新視窗 WebBrowser.ExecWB(4,1) 儲存網頁 WebBrowser.ExecWB(6,1) 列印 WebBrowser.ExecWB(7,1) 列印預覽 WebBrowser.ExecWB(8,1) 列印頁面設定 WebBrowser.ExecWB(10,1) 檢視頁面屬性 WebBrowser.ExecWB(15,1) 好像是撤銷,有待确認 WebBrowser.ExecWB(17,1) 全選 WebBrowser.ExecWB(22,1) 重新整理 WebBrowser.ExecWB(45,1) 關閉窗體無提示 5.示例﹕ (a)調用IE的”另存為”功能的示例﹕ <object id="WebBrowser" width=0 height=0 classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"></object> <A href=".:WebBrowser.ExecWB(4,1);" target="_blank" rel="external nofollow" >Save-存儲</A> (b)經過改寫的登陸模式 <object id="WebBrowser" width=0 height=0 classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"></object> <body .load="showModalDialog('login_access.asp',0,'Status:NO;dialogWidth:418px;dialogHeight:288px');document.all.WebBrowser.ExecWB(45,1);"> <OBJECT classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2 height=0 id=WebBrowser width=0></OBJECT> <input name=Button .Click=document.all.WebBrowser.ExecWB(1,1) type=button value=打開> <input name=Button .Click=document.all.WebBrowser.ExecWB(2,1) type=button value=關閉所有> <input name=Button .Click=document.all.WebBrowser.ExecWB(4,1) type=button value=另存為> <input name=Button .Click=document.all.WebBrowser.ExecWB(6,1) type=button value=列印> <input name=Button .Click=document.all.WebBrowser.ExecWB(6,6) type=button value=直接列印> <input name=Button .Click=document.all.WebBrowser.ExecWB(7,1) type=button value=列印預覽> <input name=Button .Click=document.all.WebBrowser.ExecWB(8,1) type=button value=頁面設定> <input name=Button .Click=document.all.WebBrowser.ExecWB(10,1) type=button value=屬性> <input name=Button .Click=document.all.WebBrowser.ExecWB(17,1) type=button value=全選> <input name=Button .Click=document.all.WebBrowser.ExecWB(22,1) type=button value=重新整理> <input name=Button .Click=document.all.WebBrowser.ExecWB(45,1) type=button value=關閉>