مقدمة موجزة: بشكل عام ، تحتوي الصفحة الرئيسية لموقع الويب على أكبر عدد من الزيارات. إذا تم فتح الصفحة الرئيسية لموقع الويب الخاص بك ببطء شديد ، فسيترك عملاؤك موقع الويب الخاص بك واحدًا تلو الآخر. عادةً ما نقوم بتخزين البيانات التي تم الحصول عليها عن طريق العمليات المعقدة أو الاستعلام عن قاعدة البيانات أو إنشاء صفحات ويب ثابتة لتحسين أداء تطبيقات الويب. هذه المرة ، نقوم مباشرة بتخزين ناتج الصفحة الرئيسية في سلسلة ونقوم بتحديثها بانتظام ، والتي تهتم بالأداء دون التأثير على توقيت الصفحة الرئيسية. هنا نستخدم بعض الفئات المخصصة VBS ، وكائنات التطبيق ، وكائنات XMLHTTP ، وكائنات ADODB.Stream. يمكنك التحقق من المعلومات لفهم المعرفة ذات الصلة.
من الأفضل أن يكون لديك هذه الصفحة والصفحة التي تريد ذاكرة التخزين المؤقت في نفس الدليل. خلاف ذلك ، لا يمكن عرض بعض الصور ذات المسارات النسبية. بالإضافة إلى ذلك ، سيكون لبعض الصفحات المخبأة رمز مشوهة. لا أعرف كيفية حل هذه المشكلة. ربما تحتاج إلى تعيين نوع الترميز عند الاستجابة ، يمكنك تجربته.
نسخة الكود كما يلي:
<٪
Dimwawa ، startime ، endtime
startime = timer ()
setwawa = newcls_cache
wawa.reloadtime = 0.5
wawa.cachename = "wawa"
wawa.name = "xmlinfoindex"
ifwawa.objisempty () thencachexmlinfoindex ()
رد. writewawa.value
endtime = timer ()
Response.write "<br> وقت التنفيذ:" & formatnumber ((Endtime-Startartime)*1000،5) و "MS."
subcachexmlinfoindex ()
dimbodytext ، xml
setxml = server.createBject ("microsoft.xmlhttp")
استبدل العنوان التالي بعنوان ملف صفحتك الرئيسية. تأكد من استخدام المسار المطلق بدءًا من http: // ، ولا يمكنك كتابة المسار النسبي.
xml.open "get" ، "http: //onlytiancai/bak/vote/infoindex.asp" ، false
XML.SEND
bodyText = xml.ResponseBody
bodytext = bytestobstr (bodyText ، "GB2312")
wawa.value = bodytext
setXML = لا شيء
ينتهي
FunctionByTestobstr (الجسم ، CSET)
Dimobjstream
setObjStream = server.createBject ("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 = لا شيء