rallentamento pagine asp

[forte78]

ciao

vi mostro il codice

<%
Dim username
Dim password
username = Replace(Request.Form("username"), "'", "''")
Session("username") = username
Session.TimeOut = 1300 'minuti
password = Replace(Request.Form("password"), "'", "''")
Dim cn
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("databaseutenti.mdb" )
Dim sql
sql = "SELECT ID FROM utenti WHERE username='"&username&"' AND password='"&password&"'"
Dim rs
Set rs = cn.Execute(sql)
Dim autenticato
if rs.eof then
autenticato = false
else
autenticato = true
end if
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing
if autenticato = true then
Session("autenticato") = "OK"
Response.Redirect("riservato.asp")
else
Response.Redirect("index.asp")
end if%>

[kalosjo]

[optime]

ciao grazie per averci mostrato il codice

[forte78]

riprendo la discussione

in ogni pag. seguente ad inizio pagina ho messo questo

ad esempio se la pag.si chiama


xxx.asp

<%
if Session("autenticato")<>"OK" then
Response.Redirect("xxx.asp")
end if
%>

in alcuni computer noto che c'è un evidente rallentamento , soprattutto con sistema win98

nella barra di stato sotto dopo 1-2 min. c'è un caricamento esagerato


se al posto dello script


<%
if Session("autenticato")<>"OK" then
Response.Redirect("xxx.asp")
end if
%>


metto

<%
if Session("autenticato")<>"OK" then
Response.Redirect("home.asp")
end if
%>


e nella home.asp una pagina senza

cosa succede che si ritorna sempre li ......


come mai da cosa puo dipendere fatemi sapere grazie.

[forte78]

???