Pencuri yang disebutkan di sini mengacu pada penggunaan fungsi kuat yang disediakan oleh komponen xmlhttp di xml di asp untuk menangkap data (gambar, halaman web, dan file lainnya) di situs web jarak jauh ke lokal, dan menampilkannya di halaman setelah berbagai pemrosesan Atau jenis program yang disimpan dalam database. Anda dapat menggunakan program pencuri semacam ini untuk menyelesaikan beberapa tugas yang sebelumnya tampak mustahil, seperti mengubah halaman situs web tertentu dan mengubahnya menjadi halaman Anda sendiri, atau menyimpan beberapa data (artikel, gambar) dari situs web tertentu untuk digunakan dalam database lokal. Kelebihan Thief adalah: tidak perlu melakukan maintenance website, karena data pada program Thief berasal dari website lain, dan akan diupdate seiring dengan update website; Program pencuri hanya memiliki sedikit file, dan semua konten web berasal dari situs web lain. Kerugiannya adalah: ketidakstabilan, jika situs target salah, program juga akan salah, dan jika situs target ditingkatkan dan dipelihara, program pencuri juga perlu dimodifikasi kecepatannya, karena ini adalah panggilan jarak jauh, kecepatannya sama cepatnya dengan membaca data di server lokal. Sudah pasti lebih lambat dari itu. Bagaimana, kedengarannya luar biasa bukan? Mari kita mulai mempelajari beberapa pengetahuan pengantar tentang program pencuri sekarang!
Mari kita pelajari sesuatu yang lebih sederhana, program ramalan cuaca di website QQ
Kodenya adalah sebagai berikut:
1<%2OnErrorResumeBerikutnya
3Server.Waktu skrip habis=9999999
4FungsiDapatkanhalamanhttp(Jalur)
5T=Getbody(Jalur)
6Dapatkanhttphalaman=Bytestobstr(T,Gb2312)
7 Fungsi Akhir
8
9' Pertama, buatlah beberapa pengaturan inisialisasi pada program pencuri. Fungsi kode di atas adalah untuk mengabaikan semua kesalahan yang tidak fatal, atur waktu tunggu program pencuri menjadi sangat lama (agar tidak terjadi kesalahan waktu tunggu berjalan). ), dan mengonversi yang asli Pengkodean utf-8 default diubah menjadi pengkodean gb2312, jika tidak, penggunaan langsung komponen xmlhttp untuk memanggil halaman web dengan karakter Cina akan menghasilkan kode yang kacau.
10
11FungsiGetbody(Url)
12OnErrorResumeBerikutnya
13SetRetrieval=Buat objek(Microsoft.Xmlhttp)
14Dengan Pengambilan
15.OpenGet, Url, Salah,,
16.Kirim
17Getbody=.Respon Tubuh
18 Berakhir Dengan
19SetRetrieval=Tidak Ada
20Fungsi Akhir
dua puluh satu
22'Kemudian panggil komponen xmlhttp untuk membuat objek dan melakukan pengaturan inisialisasi.
dua puluh tiga
24FunctionBytestobstr(Badan,Cset)
25DimObjstream
26SetObjstream=Server.Buat objek(Adodb.Stream)
27Objstream.Jenis=1
28Objstream.Mode=3
29Objstream.Buka
30Objstream.WriteBody
31Objstream.Posisi=0
32Objstream.Jenis=2
33Objstream.Charset=Cset
34Bytestobstr=Objstream.Bacateks
35Objstream.Tutup
36SetObjstream=Tidak ada
37Fungsi Akhir
38
39FungsiNewstring(Wstr,Strng)
40String baru=Instr(Lcase(Wstr),Lcase(Strng))
41IfNewstring<=0ThenNewstring=Len(Wstr)
42Fungsi Akhir
43
44' Untuk memproses data yang diambil, Anda perlu memanggil komponen adodb.Stream dan melakukan pengaturan inisialisasi. %>