一个dbf表有上万条记录，都有字段销售代码 xsdm ,01,02,03,04···100 ,怎样根据xsdm将这上万条记录快速分成100个dbf表，不用copy to *** for xsdm=‘01’ 这种，跪求

用SQL命令

请教一下具体的命令，谢谢

楼主为什么不用COPY命令，这个命令是最简单的了
为什么要建100个表

select * from 原表 where alltrim(xsdm) == "01"

我是想提升效率，批量的生成100个DBF表，然后分发给不同的人 如果 copy for xsdm="01" to 01  
                                                              copy for xsdm="02" to 02 .....copy for xsdm="100" to 100   太耗时了

FOR i = 1 TO 100
    SELECT * FROM aa WHERE ALLTRIM(xsdm) == PADL(i, 3, "0") INTO TABLE ("aa" + PADL(i, 3, "0"))
ENDFOR

[此贴子已经被作者于2020-5-27 14:43编辑过]

类似的事情我以前做过，当时也是一个DBF分发给多个驻外机构，不过,我这里的“分发”，是把拆分出来的DBF放到不同的文件夹中去。而这些文件夹,已经置于ftp://...之下的子文件夹中，这样每个驻外机构登陆FTP之后，就只能查看和下载自己文件夹的东西，从而实现了“分发”。具体步骤是：（比如DBF中有一个字段叫【驻外分公司】，有“北京”、“上海”、“广州”等数据，同时，与之对应的，在FTP管理的文件夹中，也有“北京”、“上海”、“广州”等子文件夹）,参考代码是凭回忆写的,大概是这个样子.

* 假定此时数据表 Tab1 已经打开了
local cFile as string ,cFGS as string
select distinct 驻外分公司 from Tab1 into cursor tmp1
select tmp1
scan 
    cFGS = rtrim(tmp1.驻外分公司)
    cFile = "E:\ftp\" + cFGS + "\通报数据" + cFGS + ".xls" 
    select * from Tab1 where Tab1.驻外分公司 = cFGS into cursor tmp2
    if recc('tmp2') > 0 then 
        if file(cFile) then 
            dele file &cFile
        endif
        select tmp2
        copy to &cFile type xl5 
    endif
    use in tmp2
endscan
use in tmp1

[此贴子已经被作者于2020-5-27 14:41编辑过]

学习了，循环+PAD