很明显,文本文件有多个行,每个行多要去数据库里面对比一次,这样一个文件就需要一个循环.同时,数据库里面有有多个样本需要和文件里的某个行对比,这样又是一个循环.因为FIle1里面是多个文件,每个文件都要去对比,所以也有一个循环...For i = 0 To File1.ListCount - 1'file1里面的每个文件都要处理一次 open .... As #1 do while not eof(1)'文件每个行都要处理,又不知道有多少行,do loop Line Input #1, b 移动到第一个记录 for j=1 to recorderset.count'每个行都要和数据库里面的样本去对比... if 找到 then... 输出 文件名 end if 移动到下一个记录 next loop next
Line Input #1, b
移动到第一个记录
for j=1 to recorderset.count'每个行都要和数据库里面的样本去对比...
if 找到 then...
输出 文件名
end if
移动到下一个记录
next
loop
next