(1) Princípio:
O programa Thief realmente chama a página da Web em outros sites através do componente XMLHTTP no XML. Por exemplo, muitos programas de ladrões de notícias chamam a página de notícias da Sina e substituem alguns HTML nela e também filtram o anúncio. As vantagens do programa Thief são: não há necessidade de manter o site, porque os dados no programa de lhief são provenientes de outros sites, ele será atualizado à medida que o site é atualizado; Arquivos no programa Thief. As desvantagens são: instável.
(2) Caso:
Vamos fazer uma breve explicação na aplicação do XMLHTTP no ASP:
1. Digite o endereço da Web de destino da URL e o valor de retorno getTppage é o código HTML da página da Web de destino
| A seguir, o conteúdo de referência: Função Gethttppage (URL) Dim http Definir http = server.createObject (msxml2.xmlHttp) Http.open get, url, falso Http.send () Se http.readyState <> 4 então função de saída final se Gethttppage = bytestobstr (http.Responsebody, GB2312) Definir http = nada se err.number <> 0 o err.clear Função final |
2. Altere o caos, use diretamente o XMLHTTP para ligar para a página da web com caracteres chineses e será obtido.
| A seguir, o conteúdo de referência: Função bytestobstr (corpo, cset) objStream dim set objStream = server.createObject (adodb.stream) objstream.type = 1 objstream.mode = 3 objstream.open objstream.write? objstream.Position = 0 objstream.type = 2 objstream.charset = cset Bytestobstr = objStream.readText objstream.close definir objstream = nada Função final |
Tente ligar para o conteúdo HTML de http://www.vevb.com/js/
| A seguir, o conteúdo de referência: Dim URL, html Url = http://www.vevb.com/js/ Html = gethttppage (url) Response.Write html |