protezione pagine

[KiKkO_helpME]

ciao a tutti..
io ho messo in una pagina asp una form con degli input che si collegano ad un db e se il login e la password sn corretti la pagina si visualizza..
il problema è far visualizzare altre pagine agli utenti senza dover loggare di nuovo..
in alto a queste pagine ho messo questo codice



.....e il codice del file protect.asp è questo

<%
'Specifico la URL della pagina di Login
Dim LoginPage
LoginPage = "http://localhost/drs/login.asp"

'Creo le variabili User e Pass
'recuperando il valore della session corrispondente
Dim LoginU, LoginP
LoginU = Session("User")
LoginP = Session("Pass")

'Se le variabili sono vuote...
'rimando alla pagina di login
if LoginU="" or LoginP="" then
response.redirect LoginPage
response.end
end if

'Apro la connessione al DB
Dim LoginConn
Set LoginConn = Server.CreateObject("ADODB.Connection")
LoginConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq = "&_
Server.MapPath("db/utenti_sito.mdb")

'Imposto la query ed apro il recordset
Dim LoginQuery, LoginRs
LoginQuery = "select * from UTENTI where user = '" & LoginU & "' "&_
"and pass = '" & LoginP & "'"
Set LoginRs = Server.CreateObject("ADODB.Recordset")
LoginRs.Open LoginQuery, LoginConn, 3, 3

'Se l'utente non viene trovato...
'rimando alla pagina di login
if LoginRs.EOF then
response.redirect LoginPage
response.end
end if
%>

..quindi se un utente nn si è loggato viene rimandato alla pagina login.asp ma se si è loggato appare un errore come questo..

File: C:\Active Server Page\drs\loggato_o no.asp
Source: Microsoft OLE DB Provider for ODBC Drivers
Error: 80004005
Description: [Microsoft][Driver ODBC Microsoft Access] Nome file non valido.
Line: 22 Column: 0
Code: LoginConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq = "&_

cosa c'è di sbagliato?
:master:

[Roby_72]

LoginConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq = "& Server.MapPath("db/utenti_sito.mdb")

Dopo il login correttamente effettuato devi attivare una variabile di sessione e controllarla in tutte le pagine che vuoi che siano protette.
Ne abbiamo parlato ieri. Ci sono cmq articoli su http://freeasp.html.it

Roby

[KiKkO_helpME]

grazie mille
mo' vado a vedere

[KiKkO_helpME]

ah...oh
ma l'oggetto session io l'avevo già messo..

Dim LoginU, LoginP
LoginU = Session("User")
LoginP = Session("Pass")

eh..ma pecchè nn va allora?
:master:

[Shagrat]

perchè sevi fare il contrario...

Session("User") = LoginU
Session("Pass") = LoginP

anche se basta solo una cosa tipo:

Session("accessoOK")="OK"

[teorema55]

Non credo che si possa usare un nome contenente uno spazio vuoto per un file, usa

loggato_o_no

[Roby_72]

L'errore che ti da è un altro. E te l'ho corretto...

Roby

[KiKkO_helpME]

ragazzi..
nn riesco ancora...
si che l'utente è loggato sia che nn lo è m rimanda alla pagina login.asp..

[Roby_72]

Riposta tutta la pagina con la correzione che ti ho fatto e il nome della pagina riservata dove dovrebbe andare dopo il login corretto.

Roby

[KiKkO_helpME]

<%
'Specifico la URL della pagina di Login
Dim LoginPage
LoginPage = "http://localhost/drs/login.asp"

'Creo le variabili User e Pass
'recuperando il valore della session corrispondente
Dim LoginU, LoginP
Session("User") = LoginU
Session("Pass") = LoginP
'Se le variabili sono vuote...
'rimando alla pagina di login
if LoginU="" or LoginP="" then
response.redirect LoginPage
response.end
end if

'Apro la connessione al DB
Dim LoginConn
Set LoginConn = Server.CreateObject("ADODB.Connection")
LoginConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq = "& Server.MapPath("db/utenti_sito.mdb")
'Imposto la query ed apro il recordset
Dim LoginQuery, LoginRs
LoginQuery = "select * from UTENTI where user = '" & LoginU & "' "&_
"and pass = '" & LoginP & "'"
Set LoginRs = Server.CreateObject("ADODB.Recordset")
LoginRs.Open LoginQuery, LoginConn, 3, 3

'Se l'utente non viene trovato...
'rimando alla pagina di login
if LoginRs.EOF then
response.redirect LoginPage
else
response.end
end if
%>

e la pagina dove dovrebbe andare è a stessa dove ho messo...



che sarebbe(ho messo come esempio loggato_o_no.asp