Para melhorar o desempenho dos programas ASP, as pessoas geralmente usam dados em cache com frequência em aplicativos. Este artigo é sobre ensiná -lo a armazenar em cache e melhorar o desempenho dos programas ASP pelo editor do False New Technology Channel. Espero que seja útil para você aprender esse conhecimento!
Ensine como armazenar em cache e melhorar o desempenho dos programas ASP
<%
Classe wawa_app_getRows
Função pública wawa_get_list (strapp, strconn, strsql)
'************************************
'Função: extraia uma matriz do aplicativo. Se os dados no aplicativo forem um valor vazio, ligue para a função wawa_get_rows () para atribuir um valor ao aplicativo.
', Você pode limpar o valor do aplicativo correspondente em vazio ao modificar o banco de dados e o aplicativo será atualizado automaticamente ao navegar.
'Se você atualizar o banco de dados (como adicionar, modificar ou excluir dados), remova a variável de aplicativo correspondente após a modificação do banco de dados.
'Use a seguinte declaração para limpar o valor do aplicativo especificado, onde o parâmetro STRAPP é o nome da variável do aplicativo a ser removida
'Application.Contents.Remove (Strapp)
'www.knowsky.com
'************************************
Dim Wawa
wawa = aplicação (strapp)
Se isEmpty (Wawa) então
wawa = wawa_get_rows (strconn, strsql)
Aplicação (strapp) = wawa
Final se
wawa_get_list = wawa
Função final
Função pública wawa_get_rows (strconn, strsql)
'************************************
'Função: Leia registros do banco de dados e use o método getRows
'Salve o registro em uma matriz
'
'************************************
Dim rs_wawa
Definir rs_wawa = createObject ("adodb.recordset")
rs_wawa.open strsql, strconn, 1,1
wawa_get_rows = rs_wawa.getRows ()
rs_wawa.close
Definir rs_wawa = nada
Função final
Classe final
%>
<%
Dim Strapp, Strsql, Strconn
strapp = "Xinwendongtai"
strsql = "Selecione o Top 5 ID, título de Wen, onde Lei = 161 Ordem by Id Desc"
strConn = "driver = {sql server}; server = 192.168.0.110; banco de dados = new; uid = sa; pwd = sa;"
Defina wawa_temp = new wawa_app_getRows
arr_xinwendongtai = wawa_temp.wawa_get_list (strapp, strconn, strsql)
%>
< % Se ubund (arr_xinwendongtai) <> 0 Então %>
< % para i = 0 a ubund (arr_xinwendongtai, 2) -1 %>
< % a seguir %>
< % Else %>
< % Final se %>
O artigo acima ensina como armazenar em cache e melhorar o desempenho dos programas ASP. Eu acredito que todo mundo tem um certo entendimento. Se você quiser saber mais informações técnicas, continue prestando atenção ao novo canal de tecnologia errada!