Il existe actuellement de nombreux programmes de vol populaires sur Internet, notamment le voleur de nouvelles, le voleur de musique et le voleur de téléchargements. Alors, comment procèdent-ils ? J'espère que cela sera utile à tous les webmasters.
(1) Principe
Le programme voleur appelle en fait des pages Web sur d'autres sites Web via le composant XMLHTTP en XML. Par exemple, de nombreux programmes de voleurs d'informations appellent les pages Web d'actualités de Sina, remplacent le code HTML qu'elles contiennent et filtrent également les publicités. Les avantages de l'utilisation du programme Thief sont les suivants : il n'est pas nécessaire de maintenir le site Web, car les données du programme Thief proviennent d'autres sites Web, et elles seront mises à jour au fur et à mesure de la mise à jour du site Web, ce qui permet d'économiser les ressources du serveur. Le programme Thief ne contient que quelques fichiers et tout le contenu Web provient d’autres sites Web. Les inconvénients sont : l'instabilité, si le site Web cible tombe en panne, le programme fonctionnera également en panne, et si le site Web cible est mis à niveau et maintenu, la vitesse du programme voleur devra également être modifiée en conséquence, car il s'agit d'un appel à distance ; la vitesse est aussi rapide que la lecture des données sur le serveur local. C'est nettement plus lent que cela.
(2) Exemples
Voici une brève explication de l'application de XMLHTTP dans ASP
＜%
'Fonctions communes
' 1. Entrez l'adresse de la page Web cible de l'URL et la valeur de retour getHTTPPage est le code HTML de la page Web cible.
fonction getHTTPage(url)
dimHttp
set Http=server.createobject("MSXML2.XMLHTTP")
Http.open "GET",url,false
Http.envoyer()
si Http.readystate＜＞4 alors
fonction de sortie
finir si
getHTTPPage=bytesToBSTR(Http.responseBody,"GB2312")
définir http = rien
si err.number＜＞0 alors err.Clear
end function
'2. Convertir Ranma. Utilisez directement xmlhttp pour appeler des pages Web avec des caractères chinois. Vous obtiendrez Ranma. Vous pouvez le convertir via le composant adodb.stream.
Fonction BytesToBstr(corps,Cset)
objstream obscur
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Ouvrir
objstream.Écrire le corps
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Fermer
définir objstream = rien
End Function
'Essayez d'appeler le contenu HTML de http://www.3doing.com/earticle/
Faible URL,Html
Url=" http://www.3doing.com/earticle/ "
Html = getHTTPPage(Url)
Réponse.write Html
%>