مبدأ التجميع:
الخطوات الرئيسية لإجراء التجميع هي كما يلي:
1. الحصول على محتوى الصفحة التي تم جمعها
2. استخراج جميع البيانات المستخدمة من رمز الاستحواذ
1. الحصول على محتوى الصفحة التي تم جمعها
أعرف حاليًا الطرق الشائعة الاستخدام للحصول على صفحات تم جمعها في ASP:
1. استخدم مكون ServerXMLHTTP للحصول على البيانات
وظيفة getBody (weburl)
'--------------------- Zhai Zhenkai (Xiao Qi)
"إنشاء كائن
Dim OBJXMLHTTP
اضبط OBJXMLHTTP = server.createObject ("msxml2.serverxmlhtp")
ملف طلب ، في شكل غير متزامن
OBJXMLHTTP.OPEN "GET" ، WebUurl ، false
OBJXMLHTTP.SEND
بينما OBJXMLHTTP.ReadyState <> 4
OBJXMLHTTP.WAITFORRESPERSE 1000
ويند
احصل على النتيجة
getBody = OBJXMLHTTP.ResponseBody
'حرر الكائن
تعيين OBJXMLHTTP = لا شيء
'--------------------- Zhai Zhenkai (Xiao Qi)
وظيفة نهاية
طريقة الاتصال: getBody (عنوان urlf للملف)
2. أو مكون XMLHTTP للحصول على البيانات
وظيفة getBody (weburl)
'--------------------- Zhai Zhenkai (Xiao Qi)
"إنشاء كائن
set Retrieval = createObject ("microsoft.xmlhttp")
مع استرجاع
.OPEN "Get" ، Weburl ، false ، "" ، ""
.يرسل
getBody = .responseBody
تنتهي
'حرر الكائن
تعيين استرجاع = لا شيء
'--------------------- Zhai Zhenkai (Xiao Qi)
وظيفة نهاية
طريقة الاتصال: getBody (عنوان urlf للملف)
تحتاج البيانات التي تم الحصول عليها بهذه الطريقة أيضًا إلى تشفير وتحويلها قبل استخدامها
وظيفة bytestobstr (الجسم ، CSET)
'--------------------- Zhai Zhenkai (Xiao Qi)
قاتمة objstream
تعيين OBJStream = server.createBject ("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
اضبط OBJStream = لا شيء
'--------------------- Zhai Zhenkai (Xiao Qi)