求一个把此txt文件转换为DBF或者excel的方法 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 求一个把此txt文件转换为DBF或者excel的方法

标题：求一个把此txt文件转换为DBF或者excel的方法

只看楼主

有容就大

来　自：东土大唐
等　级：版主
威　望：74
帖　子：9048
专家分：14309
注　册：2011-11-11
结帖率：99.34%

楼主

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

求一个把此txt文件转换为DBF或者excel的方法

上图：

很多数据啊这是在网上下的有少部分县名字错误如果在没修改的情况下怎么导入DBF文件》？

搜索更多相关主题的帖子: excel　

2012-09-24 11:06

taohua300

来　自：光
等　级：贵宾
威　望：14
帖　子：1636
专家分：3906
注　册：2009-3-11

第 2 楼

得分:10

还是先上传个样本文件吧

个性太多,无法显示

2012-09-24 14:50

bccn201203

等　级：蜘蛛侠
威　望：3
帖　子：680
专家分：1140
注　册：2012-3-14

第 3 楼

得分:0

程序代码：

CREATE TABLE QHDM (区划代码 C(6),区划名称 C(100))
APPEND FROM DM.TXT TYPE SDF
REPLACE ALL 区划名称 WITH LTRIM(区划名称)
BROWSE

如果不行再用代码转换
共有记录3511条（最后一条空记录不包含在内）

[ 本帖最后由 bccn201203 于 2012-9-24 20:57 编辑 ]

2012-09-24 15:34

bccn201203

等　级：蜘蛛侠
威　望：3
帖　子：680
专家分：1140
注　册：2012-3-14

第 4 楼

得分:10

程序代码：

CREATE TABLE QH (区划代码 C(6),区划名称 C(100))
NLEN=ALINES(ADM,FILETOSTR([DM.TXT]),CHR(13)+CHR(10))
FOR I=1 TO NLEN
    INSERT INTO QH VALUES (LEFT(ADM(I),6),ALLTRIM(SUBSTRC(ADM(I),7)))
ENDFOR
BROWSE

[ 本帖最后由 bccn201203 于 2012-9-24 20:16 编辑 ]

2012-09-24 15:43

有容就大

来　自：东土大唐
等　级：版主
威　望：74
帖　子：9048
专家分：14309
注　册：2011-11-11

第 5 楼

得分:0

谢谢晚上试试看。。。

梅尚程荀
马谭杨奚

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　

2012-09-24 16:53

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-381988-1-1.html