Visualizzare nome utente dopo il login

[andreabolognesi]

Salve a tutti, il mio problema è questo: vorrei mostrare il nome utente all'utente appena loggato.
Al momento ho:

1 pagina "login.asp" con i soliti 2 campi Utente e Password.
1 pagina "elabora_login.asp" che controlla se nome utente e password sono all'interno di un DB access.
Se Utente e Password esistono, apre la pagina 4 "index.asp", altrimenti va a finire alla pagina di errore "errore.asp"

Premessa: la pagina index.asp contiene 2 frame html (menu, e elenco_lezioni)

Il problema è che non riesco a visualizzare nella pagina "elenco_lezioni.htm" il nome dell'utente appena loggato.

Nella pagina "index.asp" (e in tutte quelle dove voglio tenere aperta la sessione) ho inserito anche il seguente codice:

<%
if Session("Autenticato")<>"OK" then
Response.Redirect("../iscritti/login.asp")
end if
%>

(il listato di "elabora_login.asp" è questo)

<%
Dim nome_ut
Dim pass
nome_ut = Replace(Request.Form("nome_utente"), "'", "''")
pass = Replace(Request.Form("password"), "'", "''")

Dim cn
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("../../fpdb/iscritti.mdb")
Dim sql
sql = "SELECT ID FROM Investigatore_privato WHERE nomeutente='" &nome_ut& "' AND password='" &pass& "'"
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("../../corsi/ip/index.asp")
else
Response.Redirect("errore.asp")
end if
%>

Grazie a tutti in anticipo

 

[Majinbu]

Le pagine .html non vengono processate dal server, non puoi leggere il nome utente con un response o cmq in vbscript.

 

[lotus]

In sostanza vuoi conoscere gli utenti che sono connessi attualmente all'area riservata tramite la pagina indicata?

 

[Paolo69]

Prova a far così:

Dim autenticato
if rs.eof then
autenticato = false
else
[B]UserActive = Session("nome_ut")[/B]
autenticato = true
end if

Successivamente nelle pagine del tuo sito inserisci:

Response.Write("UserActive")

oppure....
<%=UserActive%>

Facci sapere