以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]文件管理器中用WebBrowser打开文件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=47145)

--  作者:zhuying0718
--  发布时间:2014/3/5 11:07:00
--  [求助]文件管理器中用WebBrowser打开文件
我做的项目,客户有个要求说是要在窗口中打开文件管理器中的文件,比如说Word,Excel,而不是调用office再去打开,我能想到的是用WebBrowser控件,只是文件管理器中的打开命令该怎么打开WebBrowser呢
--  作者:Bin
--  发布时间:2014/3/5 11:19:00
--  

BeforeOpenFile 事件

弄一个全局变量

e.Cancel=true \'取消本次打开文件

e.FileName 获取要打开的文件名拼接地址存到全局变量

执行forms(XX).show 打开你设计好的窗口


窗口打开事件根据全局变量为浏览器控件设置地址


--  作者:sloyy
--  发布时间:2014/3/6 2:58:00
--  
2014版说支持word 显示 我一直没找到例子,看了这个例子,再回头查webbrowser 才知道用法:

Dim web As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
web.OfficeToolBar = True
web.Address = "d:\\开会通知.doc"

再也不像2013 需要先转换为rtf文件才能显示了.

--  作者:y2287958
--  发布时间:2014/3/6 8:11:00
--  
web.OfficeToolBar = True

这个返回值又是反的,请测试。

--  作者:Bin
--  发布时间:2014/3/6 8:37:00
--  
我怀疑是你的系统有问题了,怎么总是反的.