Es gibt jetzt viele beliebte Diebprogramme im Internet, darunter Nachrichtendiebe, Musikdiebe und Downloaddiebe. Wie machen sie das? Ich werde unten eine kurze Einführung geben, in der Hoffnung, dass es für alle Webmaster hilfreich sein wird.
(I) Prinzip
Das Thief -Programm ruft tatsächlich Webseiten auf anderen Websites über die XMLHTTP -Komponente in XML auf. Zum Beispiel nennen viele von ihnen im News Thief -Programm die Nachrichtenseiten von Sina, und einige Ersetzungen werden an das HTML darin erstellt, und die Anzeigen werden ebenfalls gefiltert. Die Vorteile der Verwendung eines Thief -Programms sind: Es besteht keine Notwendigkeit, die Website zu verwalten, da die Daten im Dieb -Programm auf anderen Websites stammen und sie wird aktualisiert, wenn die Website aktualisiert wird. Es kann Serverressourcen speichern. Im Allgemeinen enthält das Thief -Programm nur wenige Dateien, und alle Webseiteninhalte stammen von anderen Websites. Zu den Nachteilen gehören: instabil. Wenn die Zielwebsite -Fehler fehlerhaft sind, ist das Programm ebenfalls fehlerhaft. Wenn die Zielwebsite aktualisiert und aufrechterhalten wird, muss das Thief -Programm außerdem entsprechend geändert werden. Geschwindigkeit, da es sich um einen Remote -Anruf handelt, ist die Geschwindigkeit definitiv langsamer als das Lesen von Daten auf dem lokalen Server.
(Ii) Beispiel
Hier finden Sie eine kurze Erklärung für die Anwendung von XMLHTTP in ASP
Code: <%
'Gemeinsame Funktionen
'1. Geben Sie die Adresse der URL -Zielseite ein, und der Rückgabewert Gethttppage ist der HTML -Code der Zielwebseite
FUNKTIONSETHTTTPPAGE (URL)
Dimhttp
sethttp = server.createObject ("msxml2.xmlhttp" "
Http.open "get", url, falsch
Http.send ()
IFHTTP.REYYSTATE <> 4Then
Ausgangsfunktion
Endif
getttppage = byTestObstr (http.responsebody, "gb2312"
settThttp = nichts
ifer.number <> 0Thenerr.clear
Endfunktion
'2. Konvertieren Sie Lanma, rufen Sie direkt eine Webseite mit chinesischen Zeichen mit XMLHTTP an.
FunktionByTestObstr (Körper, 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 = nichts
Endfunktion
'Im Folgenden wird versucht, den HTML -Inhalt von http://www.998w.net/class/ anzurufen
Dimurl, Html
Url = "http://www.998w.net/class/"
Html = gethttppage (URL)
Response.writehtml
%>
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------/
Code:
'Code liest Remotedateien mit 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
'AddaheArtogiveItafileName:
Response.addHeader "Inhaltsdisposition", _
"Anhang; Dateiname = Mitchell-Pres.zip"
'Geben Sie TheContentTypetotell theBrowserwhattodo an: