Process无法以只读方式打开Excel报表？(已解决) - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → Process无法以只读方式打开Excel报表？(已解决)

共有26633人关注过本帖树形打印复制链接主题：Process无法以只读方式打开Excel报表？(已解决)

lxl

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：MVP荣誉狐帖子：858 积分：6071 威望：0 精华：19 注册：2008/9/1 9:13:00

Post By：2009/4/14 15:18:00 [显示全部帖子]

曲线的办法：
Build之后，也就是生成EXCEL报表文件之后用代码把文件改成只读的。
System.IO.File.SetAttributes("C:\test.xls",System.IO.FileAttributes.ReadOnly)

不过打印完毕之后，必须把文件的只读去掉，否则无法生成新的报表。去掉只读属性
System.IO.File.SetAttributes("C:\test.xls",System.IO.FileAttributes.Normal)

[此贴子已经被作者于2009-4-14 15:19:23编辑过]

lxl

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：MVP荣誉狐帖子：858 积分：6071 威望：0 精华：19 注册：2008/9/1 9:13:00

Post By：2009/4/14 15:27:00 [显示全部帖子]

以下是引用狐狸爸爸在2009-4-14 15:21:00的发言：
还有一个方法，sheet有Locked属性，可静止编辑，下面的代码复制自帮助：

Dim Book As New XLS.Book
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet.GridColor = Color.Pink '设置网格颜色
Sheet.DefaultColumnWidth = 75 '设置默认列宽
Sheet.Locked = True '禁止编辑
Book.Save("c:\reports\test.xls") '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = "c:\reports\test.xls"
Proc.Start()

帮助文件还得仔细看几遍才行啊

下一主题 >> << 上一主题

主题：Process无法以只读方式打开Excel报表？(已解决)