现在清理无用文件，将文件夹中的一堆文件与数据库中的文件名对比，如果数据库中有文件名，则保留。如果数据库中没有这个文件名，则删除该文件。我会遍历，可是如何与数据库中的文件名对比呢？
回复:最简单的方法，还是把文件名放在EXCEL中，然后把数据库中的文件句也放在EXCEL，利用EXCEL的VLOOKUP确定是否在数据库中存在，

然后利用EXCEL的公式，生成 del filename 这样的脚本，一次性删除即可。

<%
dim sql
sql="select * from files where f_name='" & name &"'"
set rs=conn.execute(sql)
if rs.eof then
'数据库中不存在该文件名\
'做文件删除操作
else
'存在
end if
%>
第一，读出文件名，
  ReadFileName（）
第二，把文件名放到数据库中查询。
  Sql="Select * From table Where fileNames='"+ReadFileName+"'"
  Rs.Open Sql,1,1
第三，判断是否存在。
  if Rs.Eof then
  不在
  delfile(ReadFileName)‘删除文件
  end if
  Rs.Close