Foxtable(狐表)用户栏目专家坐堂 → [求助]WebBrowser 显示Word


  共有4353人关注过本帖树形打印复制链接

主题:[求助]WebBrowser 显示Word

帅哥哟,离线,有人找我吗?
Phoebe_fdk
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:124 积分:1218 威望:0 精华:0 注册:2013/7/19 22:07:00
[求助]WebBrowser 显示Word  发帖心情 Post By:2014/3/18 19:41:00 [只看该作者]

WebBrowser 显示Word 时,如何屏蔽Word菜单部分功能选项

 回到顶部
帅哥哟,离线,有人找我吗?
有点酸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1093 积分:6682 威望:0 精华:0 注册:2013/7/1 9:05:00
  发帖心情 Post By:2014/3/18 22:01:00 [只看该作者]

Dim wbr As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
Dim tm As String  = ProjectPath & "Attachments\出库单.doc"
Dim fl As String = ProjectPath & "Reports\出库单.doc"
Dim wrt As New WordReport(Tables("出库"),tm,fl)
wrt.Build()
wrt.Quit()
wbr.OfficeToolBar = True
wbr.AddRess = fl

 回到顶部