FTP到某目录，要遍历目录下所有文件并从文件中每行取出数据

Question

FTP到某目录，要遍历目录下所有文件并从文件每行中取出数据，文件可用文本文件打开
每行有很多字段，以逗号隔开，文件以＃结尾
A，123，1234，1345，12421；
B，345,34554,345,345,345;
...
#
如何实现

Answer 1

DIR遍历，然后一行一行读取数据

Answer 2

我要用FTP登录某机器的某个目录下取数据，而目录下有很多个这种文件，（可以用文本打开，但文件后缀都不同），文件的格式就如下，
A，123，1234，1345，12421； 
B，345,34554,345,345,345;
C，123，32432，5345，435，4； 
... 
# 
我要取出每行记录中的第一列，第二列，第三列插入到本地数据表中
如上就要取出（A，123，1234）（B，345,34554）（C，123，32432）
目录下有很多这样的文件，就是问如何实现循环取数

Answer 3

是要遍历吧,从论坛上找了一个:
首先获得ftp站点路径，然后调用dir函数即可：   
          strFile   =   Dir(路径   &   "\*.*",   vbArchive)   
          i   =   1   
          While   strFile   <>   ""   
              strTmp   =   strTmp   &   ","   &   strFile   
              i   =   i   +   1   
              strFile   =   Dir   
          Wend   
  strTmp   里就是该路径下所有文件名（逗号隔开）
有了文件路径,读文件应该没问题吧

Answer 4

是不是不能FTP登录过去再读取文件内容啊？？我都糊涂了

Answer 5

你试试,直接传FTP文件路径:ftp://localhost/share

Answer 6

如果这种思路有问题,
或者换种方式吧,我把远程FTP目录下的文件全下到本地目录下,
如何实现啊

Answer 7

用Inet控件连接并浏览远程文件列表,再下载到本地
再用文件流依次读取每个文件,每个文件一行一行读取,用split函数获取内容
太多了,给你发个邮件