ปัจจุบันมีโปรแกรมขโมยยอดนิยมมากมาย เช่น ขโมยข่าว ขโมยเพลง และขโมยดาวน์โหลด แล้วจะทำยังไงล่ะ ฉันหวังว่ามันจะเป็นประโยชน์กับเว็บมาสเตอร์ทุกคนนะ
(1) หลักการ
โปรแกรมขโมยจะเรียกหน้าเว็บบนเว็บไซต์อื่นผ่านส่วนประกอบ XMLHTTP ใน XML ตัวอย่างเช่น โปรแกรมขโมยข่าวจำนวนมากเรียกหน้าเว็บข่าวของ Sina และทำการแทนที่ HTML ในหน้าเว็บเหล่านั้น และยังกรองโฆษณาด้วย ข้อดีของการใช้โปรแกรม Thief คือ ไม่จำเป็นต้องดูแลรักษาเว็บไซต์เพราะข้อมูลในโปรแกรม Thief มาจากเว็บไซต์อื่นและจะมีการอัพเดตเมื่อมีการอัพเดตเว็บไซต์โดยทั่วไปสามารถประหยัดทรัพยากรเซิร์ฟเวอร์ได้ โปรแกรม Thief มีเพียงไม่กี่ไฟล์และเนื้อหาเว็บทั้งหมดมาจากเว็บไซต์อื่น ข้อเสียคือ: ความไม่เสถียร หากเว็บไซต์เป้าหมายผิดพลาด โปรแกรมก็จะผิดพลาดไปด้วย และหากเว็บไซต์เป้าหมายได้รับการอัพเกรดและดูแลรักษา โปรแกรมโจรก็จะต้องแก้ไขความเร็วตามไปด้วย เนื่องจากเป็นการโทรระยะไกล ความเร็วจะเร็วเท่ากับการอ่านข้อมูลบนเซิร์ฟเวอร์ภายในเครื่อง ซึ่งช้ากว่านั้นแน่นอน
(2) ตัวอย่าง
ต่อไปนี้เป็นคำอธิบายโดยย่อเกี่ยวกับการประยุกต์ใช้ XMLHTTP ใน ASP
＜%
'ฟังก์ชันทั่วไป
' 1. ป้อนที่อยู่หน้าเว็บเป้าหมาย url และค่าที่ส่งคืน getHTTPPage คือโค้ด html ของหน้าเว็บเป้าหมาย
ฟังก์ชั่น getHTTPage(url)
สลัวHttp
ตั้งค่า Http=server.createobject("MSXML2.XMLHTTP")
Http.open "GET",url,false
Http.ส่ง()
ถ้า Http.readystate<4>แล้ว
ฟังก์ชั่นทางออก
สิ้นสุดถ้า
getHTTPPage=bytesToBSTR(Http.responseBody,"GB2312")
ตั้งค่า http=nothing
ถ้า err.number＜>0 แสดงว่า err.Clear
ฟังก์ชั่นสิ้นสุด
'2 แปลง Ranma ใช้ xmlhttp โดยตรงเพื่อเรียกหน้าเว็บด้วยตัวอักษรจีน
ฟังก์ชั่น BytesToBstr (เนื้อหา, Cset)
objstream สลัว
ตั้ง objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.เปิด
objstream เขียนเนื้อหา
objstream ตำแหน่ง = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.ปิด
ตั้งค่า objstream = ไม่มีเลย
ฟังก์ชั่นสิ้นสุด
'ลองเรียกเนื้อหา html ของ http://www.3doing.com/earticle/
Dim Url,Html
URL=" http://www.3doing.com/earticle/ "
Html = getHTTPPage(Url)
การตอบกลับเขียน Html
-