| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- [求助]请问下我生成报表提示这样的错误，是怎么回事? (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=160209) |
| -- 作者：zto001 -- 发布时间：2021/1/24 20:34:00 -- [求助]请问下我生成报表提示这样的错误，是怎么回事? .NET Framework 版本：4.0.30319.42000 Foxtable 版本：2020.5.29.8 错误所在事件：窗口,退货明细,Button1,Click 详细错误信息： 无法在流的结尾之外进行读取。 \'\'\' Dim 回执单号 As String=Date.Now.Year & Date.Now.Month & Date.Now.Day & CInt((DateTime.Now.ToUniversalTime().Ticks - 621355968000000000) / 10000000) With Tables("退货明细") For i As Integer = .TopPosition To .BottomPosition .Rows(i)("批次号")=回执单号 Next End With DataTables("退货明细").Save() \'【生成报表代码】 Dim Book As New XLS.Book(ProjectPath & "Attachments\\工作簿1.xls") Dim fl As String = ProjectPath & "Reports\\工作簿1.xls" Book.Build() \'生成细节区 Book.Sheets(0).Rows.RemoveAt(0) \'删除第一行,Excel报表的第一行通常是标记行 Book.Save(fl) \'保存工作簿 Dim Proc As New Process \'打开工作簿 Proc.File = fl Proc.Start() |
| -- 作者：有点蓝 -- 发布时间：2021/1/24 21:37:00 -- 不存在这个路径的文件： msgbox(ProjectPath & "Attachments\\工作簿1.xls")
|