si scusa l'errore da ciuco.....
nella pagina noentry recupero l'indirizzo da dove provengo:
codice:
refer = request.serverVariables("HTTP_REFERER")
e poi la passo alla pagina login con:
dalla pagina login :
codice:
<%
referlogin = Request.QueryString("referlogin") 'richiamo la variabile
If Request.QueryString("step") = "2" THEN
'Rimuovo l'username e la password da caratteri illegali come per esempio '.
str_username = Replace(Request.Form("username"), "'", "''")
str_password = Replace(Request.Form("password"), "'", "''")
Set rs_login = Server.CreateObject ("ADODB.RecordSet")
strSQL = "SELECT * FROM tbl_authors WHERE name='" & str_username & "' AND pass='" & str_password & "'"
rs_login.open strSQL,adoCon
'Se la combinazione username e password non esiste, reindirizzo l'utente ad un altra pagina
If rs_login.EOF _
Or rs_login.BOF Then
Response.Redirect("login_errato.asp")
Else
'Scrivo l'user code nel cookie
Response.Cookies("Login")("userCode") = rs_login("code")
'Reindirizzo alla pagina appropriata
If adminEmail = "gguidaa@raffygio.com" AND str_password = "admin" Then
Response.Redirect("setup.asp?setup=firstTime")
Else
If referlogin <> "" then
Response.Redirect referlogin 'qua me la vede vuota
Else
Response.Redirect("visualizza_profilo.asp?referlogin1="& referlogin)
End If
End If
End If
End If
%>
torna da dove provieni qua funziona .....