Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
可是不少软件都可以导出‘以只读方式导出Excel报表’。狐爸也应该可以想办法的呀!
曲线的办法:
Build之后,也就是生成EXCEL报表文件之后用代码把文件改成只读的。
System.IO.File.SetAttributes("C:\test.xls",System.IO.FileAttributes.ReadOnly)
不过打印完毕之后,必须把文件的只读去掉,否则无法生成新的报表。去掉只读属性
System.IO.File.SetAttributes("C:\test.xls",System.IO.FileAttributes.Normal)
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()
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()
帮助文件还得仔细看几遍才行啊
呵呵,帮助确实太大了,就是我这个原作者,也是刚刚想起这个属性的。
这个改变在何时添上去的?确实太大了帮助,要是没有指点出来,还真关注不了每一个变化.呵呵