Newsgroup: it.comp.www.asp
Titolo: [session_onEnd] perche' non viene eseguito ?

Sto cercando di loggare l'uso di un servizio web.
Il problema e' che non mi viene scritto il necessario su un file di testo, 
quando scade la sessione :-|
So bene, che in genere il session.timeout e' impostato a 20 minuti, ma anche 
riducendolo non cambia nulla. E' come se il session_onEnd non venisse 
considerato. Qualche idea ?
Ecco il mio global.asa
SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Session_OnStart
	dim dataOra,varCurrIndirizzo,path,objFileFSO,logging
	varCurrIndirizzo=Request.ServerVariables("remote_addr")
	dataOra=Now()
	path="C:\WebLog.txt"
	forAppending=8
 
	set objFileFSO=CreateObject("Scripting.FileSystemObject")
	if objFileFSO.FileExists(path) then
		set logging=objFileFSO.OpenTextFile(path,forAppending,True)
	else
		set logging=objFileFSO.CreateTextFile(path)
	end if 
	logging.writeLine dataOra&":"&varCurrIndirizzo&" Inizio sessione "	
	logging.close
 
 
End Sub
</SCRIPT>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
sub Session_OnEnd
	dim dataOra,varCurrIndirizzo,path,objFileFSO,logging,forAppending
	varCurrIndirizzo=Request.ServerVariables("remote_addr")
	dataOra=Now()
	path="C:\WebLog.txt"
	forAppending=8
 
	set objFileFSO=CreateObject("Scripting.FileSystemObject")
 
	if objFileFSO.FileExists(path) then
		set logging=objFileFSO.OpenTextFile(path,ForAppending, true)
	else
		set logging=objFileFSO.CreateTextFile(path)
	end if 
	logging.writeLine dataOra&":"&varCurrIndirizzo&" Fine sessione "	
	logging.close
 
End Sub
</SCRIPT>
-- 
Gareth Jax
Ihgger #7*3*2

 set objFileFSO=CreateObject("Scripting.FileSystemObject")
[cut ]
Nel Global.asa non puoi utilizzare l'oggetto FileSystem nel il metodo
MapPath
ciao
--
Kappa [co-mod icwa]
ka...@webngo.net
www.webngo.net
www.filmscoop.it


Moderatore di it.comp.www.asp
http://www.aspitalia.com
 Enjoy the .NET community!
http://www.dev2dev.it
 La rete ha connesso nuove particelle!

 test attendibile.
funziona!
Ho poi provato con un amico, e lui ha scovato che c'e' una specie di baco 
documentato: sulla session_onEnd "perde di vista" le informazioni sulle 
servervariables e dava errore, bloccando l'esecuzione!
In sostanza memorizzo in una variabile di sessione sulla SessionOnStart, 
l'indirizzo, e mi riprendo i contenuti sulla SessionOnEnd, scrivendolo sul 
file.
In sostanza diventa cosi':
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Session_OnStart
	dim dataOra,varCurrIndirizzo,path,objFileFSO,logging
	varCurrIndirizzo=Request.ServerVariables("remote_addr")
	dataOra=Now()
	path="c:\Log.txt"
	forAppending=8
 
	set objFileFSO=CreateObject("Scripting.FileSystemObject")
	if objFileFSO.FileExists(path) then
		set logging=objFileFSO.OpenTextFile(path,forAppending,True)
	else
		set logging=objFileFSO.CreateTextFile(path)
	end if 
	logging.writeLine dataOra&":"&varCurrIndirizzo&" Inizio sessione "	
	logging.close
	Session.Timeout = 1
	session("IpUtente")=Request.ServerVariables("remote_addr")
 
End Sub
</SCRIPT>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
sub Session_OnEnd
	dim dataOra,varCurrIndirizzo,path,objFileFSO,logging,forAppending
	varCurrIndirizzo=session("IpUtente")
	dataOra=Now()
	path="c:\Log.txt"
	forAppending=8
	username=session("UserDescr")
 
	set objFileFSO=CreateObject("Scripting.FileSystemObject")
 
	if objFileFSO.FileExists(path) then
		set logging=objFileFSO.OpenTextFile(path,ForAppending, true)
	else
		set logging=objFileFSO.CreateTextFile(path)
	end if 
	logging.writeLine dataOra&":"&varCurrIndirizzo&" Fine sessione "& 
username	
	logging.close
 
End Sub


 MapPath
ma io ho messo un path completo!


 ma io ho messo un path completo!
Hai ragione č stata una mia svista :-)
