|
c/conn.asp"--> <% dim rs,sql,filename,fso,myfile,x Set fso = server.CreateObject("scripting.filesystemobject") filename = Server.MapPath("download.txt") if fso.FileExists(filename) then fso.DeleteFile(filename) end if '--创建txt文件 set myfile = fso.CreateTextFile(filename,true) Set rs = Server.CreateOb |
