窗口建按钮(代码如下),运行不了,屏幕提示:引发类型为“System.OutOfMemoryException”的异常。
Dim t As Table = Tables("职工一览表")
t.Select(0, 0, t.Rows.Count-1, t.Cols.Count-1)
Dim Book As New XLS.Book(ProjectPath & "Attachments\照片.xls")
Dim fl As String = ProjectPath & "Reports\照片.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()
CurrentTable.Select(0,0)