以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  WebBrowser打印问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=130978)

--  作者:douglas738888
--  发布时间:2019/2/13 15:11:00
--  WebBrowser打印问题

请教老师

窗口中的WebBrowser控件,通过代码把WORD文件,从服务器FTP已下载到本地,并在WebBrowser控件中显示,

 

虽然显示了WORD的工具栏,但没有打印功能,这里如何设置按钮代码,先显示打印机窗口,根据选择再执行打印WebBrowser里面的WORD文件?

 

1. 用Ctrl + P 是可以打印了,打印完后,关闭窗口报错“请求的资源在使用中。 (异常来自 HRESULT:0x800700AA)” ,

    加入以下代码,也不行

    Dim wbr As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
    wbr.Address = Nothing

 

2.如果用下面代码打印,也能打印,但是由于New Process,出现空白打开的WORD界面

Dim rt As Row = Tables("三级复核工作表").Current
Dim st As String = rt("文件名")
Dim Proc As New Process
Proc.File = "F:\\LSXZWJ\\" & st
Proc.Verb = "Print" \'指定动作 
Proc.Start()


--  作者:有点甜
--  发布时间:2019/2/13 16:07:00
--  

我这样写代码打印没问题

 

Dim wbr As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
wbr.print


--  作者:douglas738888
--  发布时间:2019/2/13 16:37:00
--  

老师,您指导的代码没有问题,现在打印完成后,关闭窗口时依然出现  [关闭窗口报错“请求的资源在使用中。 (异常来自 HRESULT:0x800700AA)”],如果不执行打印不会报错。

 

这样的问题,应该检查哪里?


--  作者:有点甜
--  发布时间:2019/2/13 16:58:00
--  

1、我测试没问题。

 

2、请具体做一个出错的例子发上来测试。