以文本方式查看主题

-  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=86159)
--  作者：他来自江湖
--  发布时间：2016/6/12 11:10:00
--  [求助]如何用WebBrowser打开文档时自动转换？
类似于百度文库
上传到系统时，用doc或xls
用户打开时希望能自动转换成swf后，再在WebBrowser中打开，避免文档被修改，
请问是否有这样的插件？谢谢
--  作者：大红袍
--  发布时间：2016/6/12 11:19:00
--  

 呃，必须下载后，才能用webbrowser显示的。

 

 你对doc或者xls进行一下只读处理不就行了？

 

 如

 

  • Protect

    保护工作表。
    Protect方法可以指定保护密码参数，该密码为一个区分大小写的字符串。如果省略本参数，不用密码就可以取消对该工作表的保护。如：

    Dim App As New MSExcel.Application
    Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\\Report.xls")
    Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets("同期对比")
    Ws.Protect(Password:="hhh")  \'以密码保护
    Wb.Save
    App.Quit

    如果直接写为：Ws.Protect，则无需密码就能取消保护。

    除此以外，Protect中还可以使用以下参数：

    DrawingObjects：是否保护图表。如：Ws.Protect(DrawingObjects:=True)
    Contents：是否保护单元格内容。
    Scenarios：是否保护方案。
    UserInterfaceonly：是否保护用户界面，但不保护宏。如果省略本参数，则保护既应用于宏也应用于用户界面。
    AllowFormattingCells：是否允许用户为受保护的工作表上的任意单元格设置格式。
    AllowFormattingColumns：是否允许用户为受保护的工作表上的任意列设置格式。
    AllowFormattingRows：是否允许用户为受保护的工作表上的任意行设置格式。
    AllowInsertingColumns：是否允许用户在受保护的工作表上插入列。
    AllowInsertingRows：是否允许用户在受保护的工作表上插入行。
    AllowInsertingHyperlinks：是否允许用户在受保护的工作表中插入超链接。
    AllowDeletingColumns：是否允许用户在受保护的工作表上删除列，要删除的列中的每个单元格都是解除锁定的。
    AllowDeletingRows：是否允许用户在受保护的工作表上删除行，要删除的行中的每个单元格都是解除锁定的。
    AllowSorting：是否允许用户在受保护的工作表上进行排序。排序区域中的每个单元格必须是解除锁定的或取消保护的。
    AllowFiltering：是否允许用户在受保护的工作表上设置筛选。用户可以更改筛选条件，但是不能启用或禁用自动筛选功能。用户也可以在已有的自动筛选功能上设置筛选。
    AllowUsingPivotTables：是否允许用户在受保护的工作表上使用数据透视表。

    　
  • UnProtect

    撤销保护工作表。
    如果在保护工作表时没有设置密码，则直接使用UnProtect即可；如果设置了密码，则需要在撤销保护工作表时指定保护密码，如：
    Ws.UnProtect(Password:="hhh")
    •
    --  作者：他来自江湖
    --  发布时间：2016/6/12 12:09:00
    --  
    谢谢斑竹~~