谢谢，实在不好意思，
修改好的表为何不是e:\6，
而是一个查询表
怎么把它变成e:\6
谢谢！

*对 e:\6 排序结果放在临时表 tmp1
sele * from e:\6 into dbf tmp1 order by 序号 asc
close data
use e:\6

*清空e:\6  
zap

*把排序结果放在临时表 tmp1中的内容放回
appe from tmp1
*删除临时表 tmp1
dele file tmp1.dbf
你用数字作文件名，处理很不方便

云里雾里

老农真实在，钦佩！

就帮帮他吧，之前看他问这问那，原来就是为了组织这段代码。不管代码怎么样，他这种精神也是可贵的。

收到的鲜花

• tlliqi 于 2013-11-26 08:37 送鲜花  10朵   附言：老农真实在，钦佩！

佩服bccn0906! 精神可嘉！！！！

谢谢！

现在还有一个问题：
运行没问题了，只是有4次对话框出现，
两次临时表出现，
两次zap e:\6.
能解决吗
非常感谢！

COPY TO ARRAY myarrar （指出变量太多）
APPEND FROM ARRAY myarrar
APPEND FROM ARRAY myarrar

到后面有几千上万行
谢谢！

可在程序开头位置加上这句
SET SAFETY OFF