Foxtable(狐表)用户栏目专家坐堂 → 报表导出重复自动命名


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

主题:报表导出重复自动命名

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/9/16 20:53:00 [显示全部帖子]

Dim Book As New XLS.Book(ProjectPath & "Attachments\产品报价单.xls")
Dim fl As String = "D:\" & "报价预览\" & User.Name & "\ " & Format(Date.Now, "yyyyMMddHHmmss") & "系统产品报价.xls"   
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()

 回到顶部