Foxtable(狐表)用户栏目专家坐堂 → [求助]如何实现导入excel并对其重命名


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

主题:[求助]如何实现导入excel并对其重命名

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


加好友 发短信
等级:小狐 帖子:341 积分:3936 威望:0 精华:0 注册:2013/12/26 18:44:00
[求助]如何实现导入excel并对其重命名  发帖心情 Post By:2019/10/29 15:05:00 [只看该作者]

如题

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


加好友 发短信
等级:超级版主 帖子:107873 积分:548728 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/29 15:12:00 [只看该作者]

使用代码导:http://www.foxtable.com/webhelp/topics/0683.htm

比如:

Dim ex as New Exporter
ex
.SourceTableName = "订单" '指定导出表
ex
.FilePath = "c:\Data\订单.xls" '指定目标文件
ex.Format = "Excel" '导出格式为Excel
ex.Fields = "日期,客户,数量,单价,产品" '指定导出字段
ex.Filter = "[产品] = 'PD01'" '指定导出条件
ex.Export() 
'开始导出

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


加好友 发短信
等级:小狐 帖子:341 积分:3936 威望:0 精华:0 注册:2013/12/26 18:44:00
  发帖心情 Post By:2019/10/29 15:15:00 [只看该作者]

哦,是导入excel并对其重命名

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


加好友 发短信
等级:超级版主 帖子:107873 积分:548728 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/29 15:19:00 [只看该作者]

execl导入Foxtable?直接使用高速导入即可:http://www.foxtable.com/webhelp/topics/0184.htm

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


加好友 发短信
等级:小狐 帖子:341 积分:3936 威望:0 精华:0 注册:2013/12/26 18:44:00
  发帖心情 Post By:2019/10/29 15:37:00 [只看该作者]

 Dim dlg As New OpenFileDialog 
        dlg.Filter= "excel文件|*.xls;*.xlsx" 
        If dlg.ShowDialog = DialogResult.Ok Then 
            Dim ip As New Importer
            ip.SourcePath = dlg.FileName
            ip.NewTableName ="订单表" & Date.Today 
            ip.Format = "Excel"
            ip.Import()
End If
需求是这样的,我想导入一个文件,并把文件名改为 "订单表" & Date.Today ,也就是"订单表"加当前时间。

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


加好友 发短信
等级:超级版主 帖子:107873 积分:548728 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/29 15:43:00 [只看该作者]

ip.NewTableName ="订单表" & format(Date.Today,"yyyyMMdd")

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


加好友 发短信
等级:小狐 帖子:341 积分:3936 威望:0 精华:0 注册:2013/12/26 18:44:00
  发帖心情 Post By:2019/10/29 15:55:00 [只看该作者]

总提示这个错误:包含一个保留字、拼写错误或丢失的参数,或标点符号不正确。

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


加好友 发短信
等级:超级版主 帖子:107873 积分:548728 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/29 16:04:00 [只看该作者]

这个是导入的execl的数据有问题,和表名没有什么关系。


 回到顶部