O ladrão mencionado aqui refere-se ao uso das funções poderosas fornecidas pelo componente xmlhttp em xml em asp para capturar os dados (fotos, páginas da web e outros arquivos) do site remoto para o local e exibi-los na página após vários processamentos. um tipo de programa armazenado em um banco de dados. Você pode usar esse tipo de programa ladrão para realizar algumas tarefas que pareciam completamente impossíveis no passado, como alterar as páginas de um determinado site e transformá-las em suas próprias páginas, ou salvar alguns dados (artigos, fotos) de um determinado site. para ser usado no banco de dados local. As vantagens do Thief são: não há necessidade de manutenção do site, pois os dados do programa Thief vêm de outros sites, e serão atualizados à medida que o site for atualizado, podendo economizar muitos recursos do servidor; O programa ladrão possui apenas alguns arquivos e todo o conteúdo da web vem de outros sites. As desvantagens são: instabilidade, se o site alvo der errado, o programa também dará errado, e se o site de destino for atualizado e mantido, o programa ladrão também precisará ser modificado de acordo com a velocidade, porque é uma chamada remota, a velocidade é tão rápida quanto a leitura de dados no servidor local. É definitivamente mais lenta que isso. Que tal, parece incrível, certo? Vamos começar a aprender alguns conhecimentos introdutórios sobre o programa ladrão agora!
Vamos estudar algo mais simples, o programa de previsão do tempo no site QQ
O código é o seguinte:
1<%2OnErrorResumePróximo
3Server.Scripttimeout=9999999
4FunçãoGethttppage(Caminho)
5T=Getbody(Caminho)
6Gethttppage=Bytestobstr(T,Gb2312)
7Função final
8
9' Primeiro, faça algumas configurações de inicialização para o programa ladrão. A função do código acima é ignorar todos os erros não fatais, definir o tempo limite de execução do programa ladrão para um tempo muito longo (para que nenhum erro de tempo limite de execução ocorra). ) e converter o original A codificação utf-8 padrão é convertida na codificação gb2312, caso contrário, usar diretamente o componente xmlhttp para chamar páginas da web com caracteres chineses resultará em códigos distorcidos.
10
11FunçãoGetbody(Url)
12OnErrorResumePróximo
13SetRetrieval=Criarobjeto(Microsoft.Xmlhttp)
14ComRecuperação
15.OpenGet, URL,Falso,,
16.Enviar
17Getbody=.Respostacorpo
18FimCom
19SetRetrieval=Nada
20Função Final
vinte e um
22'Em seguida, chame o componente xmlhttp para criar um objeto e realizar as configurações de inicialização.
vinte e três
24FunctionBytestobstr(Corpo,Cset)
25DimObjstream
26SetObjstream=Server.Createobject(Adodb.Stream)
27Objstream.Type=1
28Objstream.Mode=3
29Objstream.Open
30Objstream.WriteBody
31Objstream.Position=0
32Objstream.Type=2
33Objstream.Charset=Cset
34Bytestobstr=Objstream.Readtext
35Objstream.Fechar
36SetObjstream=Nada
37Função Final
38
39FunçãoNewstring(Wstr,Strng)
40Newstring=Instr(Lcase(Wstr),Lcase(Strng))
41IfNewstring<=0ThenNewstring=Len(Wstr)
42Função Final
43
44' Para processar os dados capturados, é necessário chamar o componente adodb.Stream e realizar as configurações de inicialização. %>