XMLHTTP obtient des informations d'en-tête d'accès Web et un exemple d'analyse de code de pages Web-Tutoriel XML/RSS-php.cn

XMLHTTP obtient des informations d'en-tête d'accès Web et un exemple d'analyse de code de pages Web

黄舟

Libérer： 2017-03-27 16:45:03

original

1595 Les gens l'ont consulté

XMLHTTP pour obtenir des informations d'en-tête d'accès au Web et un exemple d'analyse de code des pages Web

<%
　　 
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>
　　 
<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>

Copier après la connexion

Ce qui précède est le contenu détaillé de. pour plus d'informations, suivez d'autres articles connexes sur le site Web de PHP en chinois!

Php8, je viens aussi

Apprenez la mise en page d'un site Web en 30 minutes

Tutoriel vidéo Shangguan Oracle débutant à compétent

Votre première ligne de code UNI-APP

Flutter de zéro au lancement de l'application

Brother Lian Nouveau didacticiel vidéo Linux

Tutoriel vidéo AXURE 9 (convient à l'interface utilisateur interactive de conception de produits du chef de produit)

Tutoriel vidéo PS Zero Basic Proficiency

Tutoriel vidéo de 16 jours sur l'interface utilisateur pour vous aider à démarrer

Tutoriel vidéo sur les techniques PS et les techniques de découpage

Tutoriel vidéo sur la construction et le lancement de projets d'Alibaba Cloud Environment

Présentation des réseaux informatiques - Connaissances de base que les programmeurs doivent maîtriser

Tutoriel essentiel pour les programmeurs - Explication du protocole HTTP

Tutoriel vidéo Websocket

XMLHTTP obtient des informations d'en-tête d'accès Web et un exemple d'analyse de code de pages Web