Ciao a tutti,

ho il seguente problema:

in ogni pagina di un sito controllo se una variabile di sessione settata inizialmente esiste. In caso negativo faccio apparire un messaggio che la sessione è scaduta. Tutto ciò funziona fintanto che non introduco il file global.asa. A questo punto, anche se mi scade la sessione, non mi fa piu' partire la pagina con il messaggio di sessione scaduta. Nel global.asa ci sono solo un paio di subroutine, una per Session.onStart e una per Application.OnStart.

Perchè succede ciò?

Grazie per ogni eventuale suggerimento.

Ciao
Massi

Ciao,

nelle due sub del global.asa imposto un sistema per cancellare automaticamente dal database i record 'vecchi' di due giorni rispetto alla data corrente. Questa operazione viene eseguita quando inizia la prima sessione della giornata.

Di seguito il codice del global.asa:

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Application_OnStart
Application.Lock
Application("DateClear")=Date()
Application.UnLock
End Sub


Sub Session_OnStart

'imposta cookies e variabili di sessione necessari
Response.Cookies("UtenteID")=Session.sessionid
Response.Cookies("UtenteID").Expires = Date()+ 1000

Response.Cookies("TipoUtente")="visitatore"
Response.Cookies("TipoUtente").Expires = Date()+ 1000

Session("SessioneAttiva") = True


if DateDiff("d",Application("DateClear"),Date())>=1 then

'esegue la cancellazione dal database
MM_Con_negozio_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Lavoro\Sitidarealizzare\overdev\negozio abbigliamento\temp\database\dbnegozio.mdb;"

'Apro la connessione
Set Con=Server.CreateObject("ADODB.Connection")
Con.Open MM_Con_negozio_STRING

'cancella dal carrello
sql="DELETE * FROM Carrello WHERE CarrelloData < #" & DateAdd("d",-1,Date) & "#"

'esegue il comando
Set MM_insertCmd = Server.CreateObject("ADODB.Command")
MM_insertCmd.ActiveConnection = Con
MM_insertCmd.CommandText = sql
MM_insertCmd.Execute

'Chiudo la connessione
Con.Close
set Con=Nothing

'aggiorna i dati per mantenere lo status della cancellazione

Application.Lock
Application("DateClear")=Date()
Application.UnLock

end if

End Sub

</SCRIPT>


Grazie per ogni suggerimento

Ciao
Massimiliano

...si, infatti sembra anche a me che il global.asa non influenzi la verifica delle variabili di sessione eppure, di fatto, cancellandolo il controllo sulla scadenza delle variabili di sessione mi funziona.

Comunque quando scade la sessione mettendo il global.asa non mi da errori, quindi lo manterrò. Mi sarebbe però piaciuto segnalare la fine della sessione.

Grazie

Ciao
Massimiliano

quando si verifica la session_OnEnd, probabilmente il browser è da tutt'altra parte (avviene 20 minuti dopo l'ultima richiesta, dunque non è contestuale all'invio di una pagina).

la soluzione potrebbe essere settare il cookie nella session_onstart e aggiungerci il timeout di volta in volta.
in questo modo sposti il controllo sul cookie che sopravvive alla sessioni.