| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2297 人关注过本帖
标题:求助!如何自动将文件夹下所有的.txt文件转化成同名的.dbf文件
取消只看楼主 加入收藏
mmyinsect
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2013-4-30
结帖率:33.33%
收藏
已结贴  问题点数:20 回复次数:7 
求助!如何自动将文件夹下所有的.txt文件转化成同名的.dbf文件
新手
搞了半个月也没搞出来
大家帮帮忙吧

我的F:\txt下每天有上百个20130629**.txt文件
每天必须转换成相匹配的20130629**.dbf文件
我每天都是一个一个通过copy语句转换
相当麻烦

大家能不能帮我设计一个小程序语句
运行时能够自动读出原有的.txt文件,并转换成同名字的.DBF文件

我的一个一个TXT文件转换DBF文件用的语句是:
append from f:\txt\2013062911h.txt type sdf
copy to f:\dbf\2013062911.dbf type foxplus
搜索更多相关主题的帖子: 文件夹 如何 
2013-06-29 22:37
mmyinsect
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2013-4-30
收藏
得分:0 
谢谢楼上支持!
.txt文件数据如下:
图片附件: 游客没有浏览图片的权限,请 登录注册

.dbf文件数据和表结构如下:
图片附件: 游客没有浏览图片的权限,请 登录注册
2013-06-29 22:56
mmyinsect
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2013-4-30
收藏
得分:0 
不好意思,理解错了!
太感谢你们了-txt数据和表结构.zip (98.8 KB)
2013-06-29 23:05
mmyinsect
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2013-4-30
收藏
得分:0 
回复 5楼 sdta
这个不一样是因为我随便截取的几个文件,不是相匹配的文件!
2013-06-29 23:07
mmyinsect
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2013-4-30
收藏
得分:0 
回复 8楼 sdta
因为在转换的时候我用了一个update SQL命令追加了一下:
update f:\moban.dbf set daytime=str(Yy,2)+'/'+str(Mm,2)+'/'+str(Dd,2)+' '+str(Tt,2)+' :00:00'
非常感谢你啊!
2013-06-29 23:31
mmyinsect
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2013-4-30
收藏
得分:0 
回复 10楼 TonyDeng
谢谢兄弟忠告!真是太感谢你了!希望能得到你的帮助!!!
2013-06-29 23:48
mmyinsect
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2013-4-30
收藏
得分:0 
回复 12楼 sdta
真心感谢大哥!
我用了你的程序:
CLOSE DATABASES
I=ADIR(ATXT,[C:\Users\lenovo\Desktop\新建文件夹\*.TXT])
FOR I=1 TO ADIR(ATXT,[C:\Users\lenovo\Desktop\新建文件夹\*.TXT])
    SELECT * FROM MOBAN WHERE .F. INTO TABLE (JUSTSTEM(ATXT(I,1)))
    APPEND FROM ATXT(I,1) SDF
    USE IN ALIAS()
ENDFOR
实现了批量*.TXT到相匹配的*.DBF转变!!!
非常感谢!

但是我又出现了一个问题
我以前用的单个单个转换中使用了一条update命令
update C:\Users\lenovo\Desktop\新建文件夹\moban.dbf set daytime=str(Yy,2)+'/'+str(Mm,2)+'/'+str(Dd,2)+' '+str(Tt,2)+' :00:00'
用于更新最后一列数据
因为最后一列数据才是我要的最终结果
请问也能在上述程序中得到实现吗?
我从今天早上7.20到现在也没能实现自动更新update……daytime……这一列!
再次感谢您!
2013-06-30 09:27
mmyinsect
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2013-4-30
收藏
得分:0 
我的个天……
这个我今天早上试过
原来我的在JUSTSTEM(ATXT(I,1))后面加了个.dbf后缀,程序运行不了……
谢谢你们!
非常感谢大家的帮忙!
小弟在这一一谢过大家!

非常感谢!
2013-06-30 10:17
快速回复:求助!如何自动将文件夹下所有的.txt文件转化成同名的.dbf文件
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.032811 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved