Foxtable(狐表)用户栏目专家坐堂 → 导出命名问题


  共有2369人关注过本帖平板打印复制链接

主题:导出命名问题

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


加好友 发短信
等级:婴狐 帖子:68 积分:590 威望:0 精华:0 注册:2015/3/28 19:58:00
导出命名问题  发帖心情 Post By:2015/6/13 14:38:00 [只看该作者]

Dim ex As New Exporter
Dim a As String = e.Form.Controls("ComboBox2").Text
ex.SourceTableName = "过机已对单" '指定导出表
ex.FilePath = "E:\工作文件\订单\过机已对单\" & Format(Date.Now, "MM-dd") & a & ".xls" '指定目标文件
ex.Fields = "货品代码,货品名称,订货数量,订货金额,销售数量,销售金额,差异数量,差异金额,库存数量"
ex.Format = "Excel" '导出格式为Excel
ex.Export()
这段代码该怎么改 ,

 回到顶部