Ada banyak program pencuri populer di internet sekarang, termasuk pencuri berita, pencuri musik, dan mengunduh pencuri. Jadi bagaimana mereka melakukannya? Saya akan memberikan pengantar singkat di bawah ini, berharap itu akan membantu semua webmaster.
(I) Prinsip
Program pencuri sebenarnya memanggil halaman web di situs web lain melalui komponen XMLHTTP di XML. Misalnya, dalam Program Pencuri Berita, banyak dari mereka menyebut halaman berita Sina, dan beberapa penggantian dilakukan untuk HTML di dalamnya, dan iklan juga disaring. Keuntungan menggunakan program pencuri adalah: tidak perlu mempertahankan situs web, karena data dalam program pencuri berasal dari situs web lain, dan akan diperbarui karena situs web diperbarui; itu dapat menyimpan sumber daya server. Secara umum, program pencuri hanya memiliki beberapa file, dan semua konten halaman web berasal dari situs web lain. Kerugian meliputi: tidak stabil. Jika kesalahan situs web target, program ini juga akan keliru. Selain itu, jika situs web target ditingkatkan dan dipelihara, program pencuri juga harus dimodifikasi sesuai; Kecepatan, karena ini adalah panggilan jarak jauh, kecepatannya jelas lebih lambat daripada membaca data di server lokal.
(Ii) Contoh
Berikut adalah penjelasan singkat tentang penerapan xmlhttp di ASP
Kode: <%
'Fungsi umum
'1. Masukkan Alamat Halaman Web Tujuan URL, dan nilai pengembalian GetHttppage adalah kode HTML dari halaman web tujuan
functionGetHttppage (URL)
DIMHTTP
setHttp = server.CreateObject ("msxml2.xmlhttp"
Http.open "get", url, false
Http.send ()
ifhttp.readystate <> 4then
fungsi keluar
endif
getHttppage = bytestoBstr (http.responseBody, "GB2312"
setthttp = tidak ada
iferr.number <> 0thenerr.clear
fungsi endfungsi
'2. Konversi Lanma, langsung hubungi halaman web dengan karakter Cina dengan xmlhttp, Anda akan mendapatkan lanma, yang dapat dikonversi melalui komponen adodb.stream.
FunctionByTestObstr (body, 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 = tidak ada
Fungsi endfungsi
'Berikut ini adalah mencoba memanggil konten html http://www.998w.net/class/
Dimurl, html
Url = "http://www.998w.net/class/"
Html = getHttppage (url)
Response.writeHtml
%>
------------------------------------------------------
Kode:
'Kode membaca file jarak jauh dengan 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
'AddaheaderToGiveItAfilename:
Response.addheader "disposisi konten", _
"Lampiran; nama file = mitchell-pres.zip"
'Tentukan TheContentTypetotell theBrowserwhattodo: