| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 749 人关注过本帖
标题:读取文件夹内文件的内容,并保存到新建的文件夹内
只看楼主 加入收藏
ship118
Rank: 1
等 级:新手上路
帖 子:55
专家分:0
注 册:2007-9-1
收藏
 问题点数:0 回复次数:4 
读取文件夹内文件的内容,并保存到新建的文件夹内
比如在c盘有意文件夹2,其内有一文件1.txt,现在我想在VB中读取此文件内容,并且新建一文件夹3,并把此读取的文件保存到此文件夹3中,不知道怎么操作。
搜索更多相关主题的帖子: 文件 保存 
2007-09-19 08:10
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
看看open语句.

我的msn: myfend@
2007-09-19 09:14
junxi1
Rank: 1
等 级:新手上路
威 望:1
帖 子:213
专家分:0
注 册:2007-9-17
收藏
得分:0 

Dim str As String
Open "f:\bbb.txt" For Input As #1 '打开指定文件路径的文件
Open "f:\b.txt" For Output As #2
Do Until EOF(1) '判断文件是否读完
Line Input #1, tem_line '按行读取至变量tem_line
Print str
Print #2, str
Loop
Close


foreach( in ){ }
2007-09-19 09:33
junxi1
Rank: 1
等 级:新手上路
威 望:1
帖 子:213
专家分:0
注 册:2007-9-17
收藏
得分:0 

Dim str As String
Open "f:\bbb.txt" For Input As #1 '打开指定文件路径的文件
Open "f:\b.txt" For Output As #2
Do Until EOF(1) '判断文件是否读完
Line Input #1, str '按行读取至变量tem_line
print str
Print #2, str
Loop
Close


foreach( in ){ }
2007-09-19 09:34
ship118
Rank: 1
等 级:新手上路
帖 子:55
专家分:0
注 册:2007-9-1
收藏
得分:0 
回复:(junxi1) Dim str As String Open

谢谢,弄好了

[此贴子已经被作者于2007-9-19 14:17:05编辑过]

2007-09-19 14:10
快速回复:读取文件夹内文件的内容,并保存到新建的文件夹内
数据加载中...
 
   



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

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