怎样通过XMLHTTP获得web访问头信息和网页代码

发布时间：2023-08-03 14:47:41 所属栏目：Asp教程来源：

导读：为大家整理了这篇如何通过XMLHTTP获取web访问头信息和网页代码，如果这篇文章在您的工作或学习中有帮助，欢迎常回来看看哦，更多精彩的教程请访问我们的主页,以下是教程浏览：

第一段代码是后台的程序代码：

为大家整理了这篇如何通过XMLHTTP获取web访问头信息和网页代码，如果这篇文章在您的工作或学习中有帮助，欢迎常回来看看哦，更多精彩的教程请访问我们的主页,以下是教程浏览：

第一段代码是后台的程序代码：

  程序代码(For Alixixi.com)如下:

<%

Function BytesToBstr(body,Cset)

    dim objstream

    set objstream = Server.CreateObject("adodb.stream")

    objstream.Type = 1

    objstream.Mode =3

    objstream.Open

objstream.Write body

    objstream.Position = 0

    objstream.Type = 2

    objstream.Charset = Cset

    BytesToBstr = objstream.ReadText

    objstream.Close

    set objstream = nothing

End Function

url=request.form("url")

if trim(url)<>"" then

    set xml = Server.CreateObject("MSXML2.XMLHTTP.5.0")

    xml.open "GET",url, False

    xml.send

    bo = BytesToBstr(xml.ResponseBody,"UTF-8")

    header = xml.GetAllResponseHeaders

    set xml = nothing

end if

%>

<html>

下面是前端HTML文件:

  程序代码(For Alixixi.com)如下:

<head>

<title>XMLHTTP测试</title>

<meta http-equiv="Content-Type" content="text/html;charset=gb2312">

</head>

<body bgcolor="#D4D0C8" topmargin="20" leftmargin="0" rightmargin="0" bottommargin="0" marginwidth="0" marginheight="0">

<div align="center">

    <table border="1" width="770px" cellspacing="0" cellpadding="0" bordercolorlight="#808080" bordercolordark="#FFFFFF" height="356">

        <tr>

            <form method="post">

                <td align="center" height="50">

                <input type="text" name="url" style="width:700;height:20" value="<%=url%>">

                <input type="submit" value="查看"> </td>

            </form>

        </tr>

        <tr>

            <td align="center" height="124">

            <textarea id="Textarea2" name="Textarea2" rows="7" cols="105"><%=header%></textarea></td>

        </tr>

        <tr>

            <td height="230" align="center">

            <textarea id="Textarea1" name="Textarea1" rows="14" cols="105"><%=bo%></textarea></td>

        </tr>

    </table>

</div>

</body>

</html>

（编辑：聊城站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!