一个文件夹下有许多CSV格式的文件
每个csv文件的格式如下
username,date
jack,2005/01/01
mike,2005/10/15
lisa,200/08/20
以上是以A.CSV命名的文件
现在的任务是将文件命(A.CSV)和里面最新的日期添加到list控件上
成为
A.CSV 2005/10/15这样的格式
而且csv文件不是一个,还有B.CSV C.CSV等,他们的格式都相同
这样一来的话在list里的内容应该是
A.CSV 2005/10/15
B.CSV 2005/08/06 -->具个例子,是B.CSV文件里的最新日期
C.CSV 2005/07/06 -->C.CSV里的最新日期我实在是不会了,希望高手们把详细代码给我吧,求求大家了!
每个csv文件的格式如下
username,date
jack,2005/01/01
mike,2005/10/15
lisa,200/08/20
以上是以A.CSV命名的文件
现在的任务是将文件命(A.CSV)和里面最新的日期添加到list控件上
成为
A.CSV 2005/10/15这样的格式
而且csv文件不是一个,还有B.CSV C.CSV等,他们的格式都相同
这样一来的话在list里的内容应该是
A.CSV 2005/10/15
B.CSV 2005/08/06 -->具个例子,是B.CSV文件里的最新日期
C.CSV 2005/07/06 -->C.CSV里的最新日期我实在是不会了,希望高手们把详细代码给我吧,求求大家了!
我的文件操作不太了解
还有其他方式可以访问吗
比如象操作XLS文件一样
可以给点代码吗?
能连上就方便多了不行的话就读文本存入数组用冒泡排出每个文件最大的日期
不过如果文件特多的话那个速度就。
open filepath+"\"+filename for input as #1
do while not eof(1)
line input #1,str
tempstr=tempstr+mid(str,instr(1,str,",")-1)+"\")
loop
close #1
arr=split(tempstr,"\")
maxdate=arr(0)
for i=1 to ubound(arr)
if cdate(arr(i))>cdate(maxdate) then
maxdate=arr(i)
endif
next
listbox.additem filename +space(4)+ maxdate为了这20分老命都拼上了!!!基本上就是这样,加个filelist控件循环读文件