Breve Introdução: Geralmente, a página inicial de um site tem o maior número de visitas. Se a página inicial do seu site for aberta muito lentamente, seus clientes deixarão seu site um após o outro. Geralmente, cache os dados obtidos por operações complexas ou consulta o banco de dados ou geramos páginas da Web estática para melhorar o desempenho dos aplicativos da Web. Desta vez, cache diretamente a saída da página inicial em uma string e a atualizamos regularmente, o que cuida do desempenho sem afetar a pontualidade da página inicial. Aqui, usamos algumas classes personalizadas do VBS, objetos de aplicativos, objetos xmlhttp e objetos adodb.stream. Você pode verificar as informações para entender o conhecimento relacionado.
É melhor ter esta página e a página que você deseja armazenar no mesmo diretório. Caso contrário, algumas imagens com caminhos relativos não podem ser exibidos. Além disso, algumas páginas armazenadas em cache terão código iluminado. Não sei como resolver esse problema. Talvez você precise definir o tipo de codificação ao responder, pode experimentá -lo.
A cópia do código é a seguinte:
<%
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> Tempo de execução:" & FormatNumber ((Endtime-startward)*1000,5) e "MS".
SubcachexmlinfoIndex ()
DimbodyText, xml
Setxml = server.createObject ("microsoft.xmlhttp")
'Substitua o seguinte endereço pelo endereço do arquivo da sua página inicial. Certifique -se de usar o caminho absoluto, começando com http: // e você não pode escrever o caminho relativo.
xml.open "get", "http: //onlytiancai/bak/vote/infoindex.asp", false
xml.send
BodyText = xml.ResponseBody
BodyText = Bytestobstr (BodyText, "GB2312")
wawa.value = BodyText
Setxml = nada
Endsub
FunctionByTestobstr (corpo, 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 = nada