因需要重复打印当前页面,使用document.all.WebBrowser.Execwb(6,6)仍会弹出选择页面,请问如何解决,谢谢

解决方案 »

  1.   

    是不弹出还是弹出啊?
    如果是打印多页,在页面加分页标签即可多页打印http://blog.csdn.net/IBM_hoojo/archive/2010/06/17/5674779.aspx
      

  2.   

    我要做的是把当前页面循环打印,不过打印前要先将局部内容修改后再打印。因为使用javascript的document.all.WebBrowser.ExecWB(6,6)仍会然出选择打印机提示。这样的话要是打印上百张时点击太累了,不过问题我已经解决了。用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 
    document.getElementById("WB").ExecWB x, y, z, 0 
    End Sub 
    希望对你也有帮助