以文本方式查看主题

-  易表在线答疑  (http://egrid2000.com/dvbbs/index.asp)
--  用户社区  (http://egrid2000.com/dvbbs/list.asp?boardid=2)
----  求助 如何将筛选出的数据导出成Excel表  (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=19689)
--  作者：wh3000
--  发布时间：2010/7/18 0:41:00
--  求助 如何将筛选出的数据导出成Excel表
求助 如何将筛选出的数据导出成Excel表
1.在多个表的情况下
2.要求仅仅导出筛选出的数据
3.在可能的情况下，能够在导出操作的过程中自定义文件名

-=-=-=- 以下内容由 wh3000 在 2010年07月18日 00:49am 时添加 -=-=-=-
4.在可能的情况下，能够和打印报表一样，能指定导出的列，以及列的顺序
--  作者：wjq1072
--  发布时间：2010/7/18 8:48:00
--  
在论坛搜索一下，持类例子很多，最好发文件。
--  作者：wjq1072
--  发布时间：2010/7/18 16:05:00
--  
ExportDBFile()

将数据转换为其他格式的文件。
语法：
ExportDBFile(FileName,FileType,GridName,CompareCol,CompareMode,CompareValue....,Option)
FileName     目标文件名,包括路径
FileType     指定文件类型
            1 = Access 2000
            2 = dBase III
            3 = dBase IV
            4 = dBase 5.0
            5 = Excel 5.0
            6 = Excel 8.0
            7 = FoxPro 2.0
            8 = FoxPro 2.5
            9 = FoxPro 2.6
            10 = FoxPro 3.0
GridName     指定当前文件的数据表，可以用表名称表示，也可以用位置表示。
CompareCol   进行比较的列，可以用列名称表示，也可以用位置表示。
CompareMode  比较方式，包括=、>、<、>=、<=、<>、Like、Instr共8种比较方式。
CompareValue 比较值
Option       可选参数，设为1不包括隐藏行，如果省略或设为0，则包括隐藏行
转换的数据不包括隐藏列。
可以设置多个比较条件，从第四个参数开始，每三个参数组成一个比较条件。如果比较方式选择的是Instr,则进行包含查询；如果比较方式选择"Like"，则可以在比较值中使用通配符进行类似查询。
例子：
ExportDBFile("c:\\aaa.xls",6,"bbb","结帐","=",-1)
将bbb表中已经结帐的记录转换为Excel文件，并保存为文件C:\\aaa.xls。
其中"结帐","=",-1就是筛选条件。