现有DBF数据库A，其中有个“单位”字段，想以“单位”字段的值分别导出为excel，如何全部按单位导出，请指教
copy to 单位1.xls type xls5 for 单位="XXX"   这个只能一个一个导出，如何一次全部按单位导出，请高手帮帮忙！







本人是新手，没有基础，为了求知请高手们帮帮忙，十分感谢！

[此贴子已经被作者于2024-5-6 11:48编辑过]

set engi 70
sele 单位 from A grou by 单位 into table ls
sele ls
scan
  cdw=ls.单位
  sele A
  copy to (cdw) for A.单位=cdw type xl5
  sele ls
ends

提示命令中含有不能识别的短语和关键字

我试过是可行的

你把附件发上来

[此贴子已经被作者于2024-5-6 15:24编辑过]

按字段名为：xxdm转换成7个excel表格

谢谢大师的指导，终于搞明白了，再次感谢

学习了

也班门弄斧一下，不过你原文件名最好不要叫“a”

SET SAFETY OFF
SELECT xxdm,xxmc FROM a GROUP BY 1,2 INTO CURSOR tmp &&&生成一临时文件过渡
SELECT tmp
SCAN
    wjm = ALLTRIM(xxdm) + ALLTRIM(xxmc)
    **如导出excel文件
    SELECT * FROM a WHERE a.xxdm = tmp.xxdm INTO CURSOR tmp1  &&&生成一临时文件过渡
    COPY TO (wjm) TYPE XL5  
    
    **如导出dbf文件可
    SELECT * FROM a WHERE a.xxdm = tmp.xxdm INTO DBF (wjm)
    
    SELECT tmp &&这句也可以省略
ENDSCAN

[此贴子已经被作者于2025-7-7 16:04编辑过]

请教
wjm =ALLTRIM(xxdm) + ALLTRIM(xxmc)
SELECT * FROM a WHERE alltr(a.xxdm) =xxdm INTO CURSOR  (wjm)
COPY TO (wjm) TYPE XL5  
这样提示语法错误，把 CURSOR换成dbf就可以。但是换成下面的就可以。什么原因？难道因为xxdm是0开头的数字，cursor 临时文件不可以吗？

wjm ="N"+ALLTRIM(xxdm) + ALLTRIM(xxmc)
SELECT * FROM a WHERE alltr(a.xxdm) =xxdm INTO CURSOR  (wjm)
COPY TO (wjm) TYPE XL5  

[此贴子已经被作者于2025-7-7 17:52编辑过]