El ladrón mencionado aquí se refiere al uso de las poderosas funciones proporcionadas por el componente xmlhttp en xml en asp para capturar los datos (imágenes, páginas web y otros archivos) en el sitio web remoto al local y mostrarlos en la página después de varios procesamientos. un tipo de programa que se almacena en una base de datos. Puede utilizar este tipo de programa ladrón para completar algunas tareas que parecían completamente imposibles en el pasado, como cambiar las páginas de un determinado sitio web y convertirlas en sus propias páginas, o guardar algunos datos (artículos, imágenes) de un determinado sitio web. para ser utilizado en la base de datos local. Las ventajas de Thief son: no es necesario mantener el sitio web, porque los datos del programa Thief provienen de otros sitios web y se actualizarán a medida que se actualice el sitio web, lo que generalmente puede ahorrar muchos recursos del servidor. El programa ladrón solo tiene unos pocos archivos y todo el contenido web proviene de otros sitios web. Las desventajas son: inestabilidad: si el sitio web de destino falla, el programa también fallará, y si el sitio web de destino se actualiza y mantiene, la velocidad del programa ladrón también deberá modificarse en consecuencia, porque es una llamada remota; la velocidad es tan rápida como leer datos en el servidor local. Definitivamente es más lento que eso. ¿Qué te parece? Suena increíble, ¿verdad? ¡Comencemos ahora a aprender algunos conocimientos introductorios sobre el programa de ladrones!
Estudiemos algo más sencillo, el programa de previsión meteorológica en el sitio web de QQ.
El código es el siguiente:
1<%2OnErrorReanudarSiguiente
3Server.Scripttimeout=9999999
4FunciónGethttppage(Ruta)
5T=Getbody(Ruta)
6Gethttppage=Bytestobstr(T,Gb2312)
7Función final
8
9' Primero, realice algunas configuraciones de inicialización para el programa ladrón. La función del código anterior es ignorar todos los errores no fatales y establecer el tiempo de espera de ejecución del programa ladrón en un tiempo muy largo (para que no se produzca ningún error de tiempo de espera de ejecución). ) y convierta el original La codificación utf-8 predeterminada se convierte a codificación gb2312; de lo contrario, el uso directo del componente xmlhttp para llamar a páginas web con caracteres chinos dará como resultado códigos confusos.
10
11FunciónGetbody (URL)
12OnErrorReanudarSiguiente
13SetRetrieval=Crearobjeto(Microsoft.Xmlhttp)
14Con recuperación
15.OpenGet, URL, Falso,,
16.Enviar
17Getbody=.Respuestacuerpo
18Fin con
19SetRetrieval=Nada
20Función final
veintiuno
22'Luego llame al componente xmlhttp para crear un objeto y realizar la configuración de inicialización.
veintitrés
24FunctionBytestobstr(Cuerpo,Cset)
25DimObjstream
26SetObjstream=Servidor.Crearobjeto(Adodb.Stream)
27Objstream.Tipo=1
28Objstream.Modo=3
29Objstream.Abrir
30Objstream.WriteBody
31Objstream.Posición=0
32Objstream.Tipo=2
33Objstream.Charset=Cset
34Bytesobstr=Objstream.Readtext
35Objstream.Cerrar
36SetObjstream=Nada
37Función final
38
39FunciónNuevacadena(Wstr,Strng)
40Nuevacadena=Instr(Lcase(Wstr),Lcase(Strng))
41IfNewstring<=0ThenNewstring=Len(Wstr)
42Función final
43
44' Para procesar los datos capturados, debe llamar al componente adodb.Stream y realizar la configuración de inicialización. %>