Le voleur mentionné ici fait référence à l'utilisation des puissantes fonctions fournies par le composant xmlhttp en xml en asp pour capturer les données (images, pages Web et autres fichiers) du site Web distant vers le site local et les afficher sur la page après divers traitements. Ou un type de programme stocké dans une base de données. Vous pouvez utiliser ce type de programme voleur pour accomplir certaines tâches qui semblaient complètement impossibles dans le passé, comme modifier les pages d'un certain site Web et les transformer en vos propres pages, ou sauvegarder certaines données (articles, images) d'un certain site Web. à utiliser dans la base de données locale. Les avantages de 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 beaucoup de 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. Et si, ça a l’air incroyable, n’est-ce pas ? Commençons dès maintenant à apprendre quelques connaissances d’introduction au programme voleur !
Etudions quelque chose de plus simple, le programme de prévisions météo sur le site QQ
Le code est le suivant :
1<%2OnErreurReprendreSuivant
3Serveur.Scripttimeout=9999999
4FonctionObtenirpagehttp(Chemin)
5T = Obtenir le corps (Chemin)
6Gethttppage=Bytestobstr(T,Gb2312)
7Fonction de fin
8
9' Tout d'abord, effectuez quelques paramètres d'initialisation pour le programme voleur. La fonction du code ci-dessus est d'ignorer toutes les erreurs non fatales, de définir le délai d'expiration du programme voleur sur une durée très longue (afin qu'aucune erreur de délai d'exécution ne se produise). ), et convertissez l'original. L'encodage utf-8 par défaut est converti en encodage gb2312, sinon l'utilisation directe du composant xmlhttp pour appeler des pages Web avec des caractères chinois entraînera des codes tronqués.
10
11FonctionGetbody(Url)
12SurErreurReprendreSuivant
13SetRetrieval=Créer un objet (Microsoft.Xmlhttp)
14AvecRécupération
15.OpenGet, Url, Faux,,
16.Envoyer
17Getbody=.Responsebody
18FinAvec
19SetRetrieval=Rien
20Fin Fonction
vingt-et-un
22'Appelez ensuite le composant xmlhttp pour créer un objet et effectuer les réglages d'initialisation.
vingt-trois
24FunctionBytestobstr(Corps,Cset)
25DimObjstream
26SetObjstream=Serveur.Createobject(Adodb.Stream)
27Objstream.Type=1
28Objstream.Mode=3
29Objstream.Ouvrir
30Objstream.WriteBody
31Objstream.Position=0
32Objstream.Type=2
33Objstream.Charset=Cset
34Bytestobstr=Objstream.Readtext
35Objstream.Fermer
36SetObjstream=Rien
37Fin de fonction
38
39FonctionNouvellechaîne(Wstr,Strng)
40Nouvellechaîne=Instr(Lcase(Wstr),Lcase(Strng))
41IfNewstring<=0ThenNewstring=Len(Wstr)
42Fin de fonction
43
44' Pour traiter les données capturées, vous devez appeler le composant adodb.Stream et effectuer les paramètres d'initialisation. %>