<% set fs = CreateObject("Scripting.FileSystemObject") fname = server.mappath("/") & "/ddosmonitor5166.txt" set ts = fs.OpenTextFile(fname, 8, true) mystr = now & " " & Request.ServerVariables("REMOTE_ADDR") & " ||| " & Request.ServerVariables("HTTP_USER_AGENT") & " ||| " & Request.Cookies & chr(13) & chr(10) ts.Write mystr ts.Close response.redirect "ddosmonitor.rar" %>