Existem muitos programas de ladrões populares na internet agora, incluindo ladrões de notícias, ladrões de música e download ladrões. Então, como eles fazem isso? Vou dar uma breve introdução abaixo, esperando que seja útil para todos os webmasters.
(I) Princípio
O programa Thief realmente chama páginas da web em outros sites através do componente XMLHTTP no XML. Por exemplo, no programa News Thief, muitos deles chamam as páginas de notícias do Sina, e algumas substituições são feitas no HTML nele, e os anúncios também são filtrados. As vantagens do uso de um programa de ladrões são: não há necessidade de manter o site, porque os dados no programa Thief vem de outros sites e serão atualizados à medida que o site é atualizado; Pode salvar os recursos do servidor. Geralmente, o programa Thief possui apenas alguns arquivos e todo o conteúdo da página da web vem de outros sites. As desvantagens incluem: instável. Se os erros do site de destino, o programa também será errado. Além disso, se o site de destino for atualizado e mantido, o programa de ladrões também deverá ser modificado de acordo; Velocidade, por ser uma chamada remota, a velocidade é definitivamente mais lenta do que a leitura de dados no servidor local.
(Ii) Exemplo
Aqui está uma breve explicação da aplicação do XMLHTTP em ASP
Código: <%
'Funções comuns
'1. Digite o endereço da página da Web de destino URL e o valor de retorno Gethttppage é o código HTML da página da web de destino
functiongethttppage (URL)
dimhttp
sethttp = server.createObject ("msxml2.xmlHttp"
Http.open "get", url, falso
Http.send ()
ifhttp.readyState <> 4Then
saída de saída
endif
gethttppage = bytestobstr (http.Responsebody, "GB2312"
setthttp = nada
iferr.number <> 0TheNerr.clear
Função final
'2. Converta Lanma, ligue diretamente uma página da Web com caracteres chineses com XMLHTTP, você receberá Lanma, que pode ser convertido através do componente Adodb.stream.
FunctionByTestobstr (corpo, cset)
DIMOBJSTREAM
setObjstream = server.createObject ("adodb.stream"
objstream.type = 1
objstream.mode = 3
objstream.open
objstream.writebody
objstream.Position = 0
objstream.type = 2
objstream.charset = cset
Bytestobstr = objStream.readText
objstream.close
setobjstream = nada
Função final
'O seguinte é tentar chamar o conteúdo HTML de http://www.998w.net/class/
Dimurl, html
Url = "http://www.998w.net/class/"
Html = gethttppage (url)
Response.WriteHtml
%>
----------------------------------------------------------
Código:
'O código lê arquivos remotos com XMLHTTP
<%
Response.Buffer = true
DIMOBJXMLHTTP, XML
Setxml = server.createObject ("Microsoft.xmlHttp"
xml.open "get", "http://www.998w.net/down/998w1.0.rar", false
xml.send
'AddaHeadToGiveitaFilename:
Response.AddHeader "Disposição de conteúdo", _
"Anexo; nome do arquivo = Mitchell-Pres.zip"
'Especifique o TecontentTypetotell theBrowserWhattodo: