<%Call Head()%>

<% dim TP TP=request("TP") if TP<>"" then Dim Url,TextInfo Url=CodeWML(Request.Form("Url")) if len(url)< 10 then Response.Write "请正确输入文章地址！
" Response.Write "返回上级 " Response.Write "

" response.end End if TextInfo=XMLHTTPGet(Url) %> 文章地址:

文章内容:

<%else%> 文章地址:

获取内容
<%end if%> ----------
<%if TP<>"" then%> [返回上级]
<%end if%> [站长工具]
[后台管理]