以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]怎样才能导出更新后的excel表格呢 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104925) |
|
-- 作者:极昼。 -- 发布时间:2017/8/8 15:56:00 -- [求助]怎样才能导出更新后的excel表格呢 我想导出包含某个字段的行。然后导出excel表格的路径和名字我也设置好了。导出一次可以,为什么对表内容做出更新后,再想导出反而不行了呢? |
|
-- 作者:有点甜 -- 发布时间:2017/8/8 16:01:00 -- 你说的【导出反而不行】指什么?
你如何导出的?写了什么代码?做个实例发上来看看。 |
|
-- 作者:极昼。 -- 发布时间:2017/8/8 19:35:00 -- Dim ex As New Exporter ex.SourceTableName = "党员档案" \'指定导出表 ex.FilePath = "D:\\积极分子.xls" \'指定目标文件 ex.Format = "Excel" \'导出格式为Excel ex.Fields = "姓名,性别,身份证号码,学历,联系电话,家庭住址,特长,所处阶段,入党介绍人1,入党介绍人2,入党积极分子支委会时间" \'指定导出字段 ex.Filter = "[所处阶段] = \'积极分子\'" \'指定导出条件 ex.Export() \'开始导出 比如说这个,第一次导出可以,第二次导出就不行了,要把原来的删掉才能导出。
|
|
-- 作者:有点蓝 -- 发布时间:2017/8/8 20:39:00 -- 1、改名导出 2、先删除在导出 Dim fl As String = "D:\\积极分子.xls" If FileSys.FileExists(fl) FileSys.DeleteFile(fl,2,2) End If
|
|
-- 作者:极昼。 -- 发布时间:2017/8/9 10:22:00 -- 谢谢你,可以了 |