Краткое введение: Как правило, домашняя страница веб -сайта имеет наибольшее количество посещений. Если домашняя страница вашего сайта открыта очень медленно, ваши клиенты покинут ваш сайт один за другим. Обычно мы кэшируем данные, полученные с помощью сложных операций или запроса базы данных или генерируем статические веб -страницы для повышения производительности веб -приложений. На этот раз мы напрямую кэшируем вывод домашней страницы в строку и регулярно обновляем ее, что заботится о производительности, не влияя на своевременность домашней страницы. Здесь мы используем некоторые пользовательские классы 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 ()
Response.writewawa.value
EndTime = Timer ()
Response.write "<br> Время выполнения:" & formatnumber ((endtime-startime)*1000,5) и "MS".
Subcachexmlinfoindex ()
DimBodyText, XML
Setxml = server.createObject ("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.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 = ничего