Ciao a tutti,
tra gli script di asp qui su html.it ho trovato una pagina per fare delle statistiche delle pagine visitate.

ho deciso di mettere la pagina nell'area riservata del sito in modo che solo chi vi ha accesso possa visualizzarli..

la pagina di asp è la seguente:

codice:
<%@LANGUAGE = "VBSCRIPT" 
@ENABLESESSIONSTATE = FALSE%>
<% 
Option Explicit
Response.buffer = True
Dim strDB
'------------------If your site is hosted by another site then change your path in the DBQ value below i.e. in place of Server.MapPath("/SmartReferrer.mdb") type in Server.MapPath("/Your_site_path/SmartReferrer.mdb")-----------------


strDB =  "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("mdb-database\SmartReferrer.mdb") & ";DefaultDir=" & Server.MapPath(".") & ";DriverId=25;FIL=MS Access;MaxBufferSize=512;PageTimeout=5"


'------------------End of Database connection string -----------------
%> 
 


<% Response.Expires= -1500%>
 
<HTML>
<head>
<title>Smart Referrer Admin</title>
<META content="" name="Description">
<META content="" name="Keywords">
<META content="noindex" name="robots">
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<STYLE>
#Activate {
	LEFT: 111px; POSITION: absolute; TOP: 252px; VISIBILITY: hidden; Z-INDEX: 1
}
#Edit {
	LEFT: 196px; POSITION: absolute; TOP: 252px; VISIBILITY: hidden; Z-INDEX: 1
}
#Delete {
	LEFT: 280px; POSITION: absolute; TOP: 252px; VISIBILITY: hidden; Z-INDEX: 1
}
#Deactivate {
	LEFT: 196px; POSITION: absolute; TOP: 252px; VISIBILITY: hidden; Z-INDEX: 1
}
</STYLE>
<SCRIPT language=javascript>
<!--
window.onerror = null;
 var bName = navigator.appName;
 var bVer = parseInt(navigator.appVersion);
 var NS4 = (bName == "Netscape" && bVer >= 4);
 var IE4 = (bName == "Microsoft Internet Explorer" && bVer >= 4);
 var NS3 = (bName == "Netscape" && bVer < 4);
 var IE3 = (bName == "Microsoft Internet Explorer" && bVer < 4);
 var menuActive = 0
 var menuOn = 0
 var onLayer
 var timeOn = null// LAYER SWITCHING CODE
if (NS4 || IE4) {
 if (navigator.appName == "Netscape"){
 layerStyleRef="layer.";
 layerRef="document.layers";
 styleSwitch="";
layerVis="show";
layerHid="hide";
 }else
{
 layerStyleRef="layer.style.";
 layerRef="document.all";
 styleSwitch=".style";
layerVis="visible";
layerHid="hidden";
 }
}
 
// SHOW MENU
function showLayer(layerName){
if (NS4 || IE4) {
 if (timeOn != null) {
 clearTimeout(timeOn)
 hideLayer(onLayer)
 }
 if (NS4 || IE4) {
 eval(layerRef+'["'+layerName+'"]'+styleSwitch+'.visibility="'+layerVis+'"');
 } 
 onLayer = layerName
 }
}// HIDE MENU
function hideLayer(layerName){
 if (menuActive == 0) {
 if (NS4 || IE4) {
 eval(layerRef+'["'+layerName+'"]'+styleSwitch+'.visibility="'+layerHid+'"');
 }
 }
}// TIMER FOR BUTTON MOUSE OUT
function btnTimer() {
 timeOn = setTimeout("btnOut()",1000)
}// BUTTON MOUSE OUT
function btnOut(layerName) {
 if (menuActive == 0) {
 hideLayer(onLayer)
 }
}// MENU MOUSE OVER 
function menuOver(itemName) {
 clearTimeout(timeOn)
 menuActive = 1
}// MENU MOUSE OUT 
function menuOut(itemName) {
 menuActive = 0 
 timeOn = setTimeout("hideLayer(onLayer)", 400)

 }// SET BACKGROUND COLOR 
function setBgColor(layer, color) {
  if (NS4)
    eval('document.all.'+layer+'.bgColor="'+color+'"');
  if (IE4)
    eval('document.all.'+layer+'.style.backgroundColor="'+color+'"');
}
// -->
</SCRIPT>
<script language = "Javascript">
<!--

function ValidateForm(){
	var URL=frmSmartReferrerAdmin.txtURL.value
    	if ((URL==null)||(URL=="")){
		alert("Please enter the monitored page URL")
		frmSmartReferrerAdmin.txtURL.focus()
		return false
	}
	return true
 }
//-->
</script>
<style type="text/css">
<!--
.smartreflink {  font-family: Arial, Helvetica, sans-serif; font-size: 8pt; color: #FFFFAE; text-decoration: none}
a:link {  font-family: Arial, Helvetica, sans-serif; font-size: 9pt}
.arial {  font-family: Arial, Helvetica, sans-serif; font-size: 9pt; color: #000066}
.title {
	font-family: Arial, Helvetica, sans-serif;
	font-size: 10pt;
	font-weight: bold;
	color: #006633
}
.subtitle {
	font-family: Arial, Helvetica, sans-serif;
	font-size: 10pt;
	font-weight: bold;
	color: #006633
}
.font {  font-family: Arial, Helvetica, sans-serif; font-size: 9pt}
.smartreflinkBlack { font-family: Arial, Helvetica, sans-serif; font-size: 8pt; color: #660000}
--> 
</style>
</head>
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginheight="0" marginwidth="0" link="#003399" vlink="#003399" alink="#003399">

... (la pagina è troppo lunga x postarla..se serve la metto in + "risposte")

</body>
</HTML>
la pagina funziona normalmente..aggiungo le pgine che voglio visualizzare e il codice mi restituisce tutto quello che mi interessa...

il problema nasce quando inserisco le 2 righe di codice evidenziate in rosso..

mi autentico nell'apposita login, poi clicco il link alla pagina interessata e mi restituisce questo errore:

Microsoft VBScript runtime error '800a01f4'

Variable is undefined: 'Session'

/proteggi.asp, line 3

non riesco a capire come mai, visto che ho usato lo stesso modus operandi per altre pagine che risiedono nell'area riservata..

la pagina proteggi.asp è la seguente:
codice:
<%
'L'utente è passato per una fase di login?
if	(Session("Autenticato")<>"OK") then
	'Se no lo mandiamo ad autenticarsi
	Response.Redirect "login.asp?errore="&Server.URLEncode("La pagina richiesta appartiene ad una zona del sito riservata, prego autenticarsi")&"&paginaOriginale="&Request.ServerVariables("SCRIPT_NAME")
else
	'Se si, ha un livello appropriato?
	if Session("livelloUtente") < livelloPagina then
		Session.Abandon
		Response.Redirect "login.asp?errore="&Server.URLEncode("La pagina richiesta necessita di un livello più alto di sicurezza, prego autenticarsi come altro utente abilitato")&"&paginaOriginale="&Request.ServerVariables("SCRIPT_NAME")
	end if
end if
%>
qualcuno mi sa aiutare?
grazie
ciao