Foxtable(狐表)用户栏目专家坐堂 → [求助]EXCE;报表名包含当前行名


  共有2656人关注过本帖树形打印复制链接

主题:[求助]EXCE;报表名包含当前行名

帅哥哟,离线,有人找我吗?
yifan3429
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2464 积分:22751 威望:0 精华:0 注册:2011/3/29 17:14:00
[求助]EXCE;报表名包含当前行名  发帖心情 Post By:2014/9/19 14:53:00 [只看该作者]

Dim dr As DataRow = e.DataRow
报错

Forms("稍后窗").Show()
Dim Book As New XLS.Book(ProjectPath & "Attachments\产品报价明细单.xls")
Dim fl As String = "D:\" & "案例报价预览\" & dr("产品编号") & dr("产品名称") & "\ " & User.Name & "\ " & Format(Date.Now, "yyyyMMddHHmmss") & dr("构件小计") & "调整产品报价.xls"  此路径怎样指定才对。
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()
Forms("稍后窗").Close()

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/9/19 15:10:00 [只看该作者]

Dim dr As DataRow =  Tables("XX").current.datarow

 回到顶部