用ASP将SQL搜索出来的内容导出为TXT的代码

  <%  dim rs,sql,filename,fso,myfile,x  Set fso = server.CreateObject(“scr ipting.filesystemobject”)  filename = Server.MapPath(“download.txt”)  if fso.FileExists(filename) then  fso.DeleteFile(filename)  end if  ‘–创建txt文件  set myfile = fso.Create