请教高手如何用最简便的代码实现分库并转换成EXCEL文件？ - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 请教高手如何用最简便的代码实现分库并转换成EXCEL文件？

标题：请教高手如何用最简便的代码实现分库并转换成EXCEL文件？

只看楼主

smart921

等　级：新手上路
帖　子：107
专家分：9
注　册：2010-8-8
结帖率：86.96%

楼主

已结贴√ 问题点数：20 回复次数：4

请教高手如何用最简便的代码实现分库并转换成EXCEL文件？

如一个数据表
xh dwmc a1 b1
1 A单位 12 23
2 B单位 65 54
3 C单位 65 87
。
。
。
将这个表按单位分成不同的数据表,如A单位.XLS,B单位.XLS,C单位.XLS

搜索更多相关主题的帖子: 分库　 EXCEL　文件　代码　

2010-08-08 20:35

tlliqi

等　级：贵宾
威　望：204
帖　子：15453
专家分：65956
注　册：2006-4-27

第 2 楼

得分:6

sele * from 数据表 where dwmc="A单位"
sele * from 数据表 where dwmc="B单位"
sele * from 数据表 where dwmc="C单位"

2010-08-08 21:49

qingfameng

等　级：贵宾
威　望：35
帖　子：964
专家分：3019
注　册：2010-2-6

第 3 楼

得分:6

如果原表的 dwmc 记录很多，并且记录是不按顺序排列的，可试试：（不一定最简，但容易理解吧）
select dwmc from 原表名 into cursor bbb group by dwmc order by dwmc
do while.not.eof()
   cb=alltrim(dwmc)
   sele 原表名
   copy to &cb type xls for alltrim(dwmc)==cb
   sele bbb
   skip
enddo

[ 本帖最后由 qingfameng 于 2010-8-9 00:57 编辑 ]

收到的鲜花