Salve sto cercando di realizzare un login per la sezione amministrativa di un sito, in cui ci sono diversi moderatori, ed ognuno può accedere a sezioni diverse. Qualcuno mi può aiutare.
o mi sapete indicare uno script già funzionante?
Salve sto cercando di realizzare un login per la sezione amministrativa di un sito, in cui ci sono diversi moderatori, ed ognuno può accedere a sezioni diverse. Qualcuno mi può aiutare.
o mi sapete indicare uno script già funzionante?
Giò
Creati un login a livelli. Praticamente dividi i moderatori in livelli di utenza. Successivamente rendi le pagine visibili solo per chi ha il livello di utenza desiderato.
Matrix è ovunque, è intorno a noi, anche adesso nella stanza in cui siamo. È quello che vedi quando ti affacci alla finestra o quando accendi il televisore. L'avverti quando vai al lavoro, quando vai in chiesa, quando paghi le tasse. È il mondo che ti è stato messo dinanzi agli occhi, per nasconderti la verità.
Si è quello che ho fatto, sto avendo dei problemi con il codice.
Quando mi collego come mod2 mi fa ripetere il login 2 volte, come mod 3 lo devo ripetere 3 volte. Ho inserito male qualche if else, ma non riesco ad uscirne fuori
Giò
Se posti il codice ci diamo un'occhiata...
Matrix è ovunque, è intorno a noi, anche adesso nella stanza in cui siamo. È quello che vedi quando ti affacci alla finestra o quando accendi il televisore. L'avverti quando vai al lavoro, quando vai in chiesa, quando paghi le tasse. È il mondo che ti è stato messo dinanzi agli occhi, per nasconderti la verità.
[CODE]
<%
If Request.QueryString("step") = "2" THEN
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
if rs_login.EOF _
or rs_login.BOF Then
Response.Redirect("badlogin.asp")
else
Response.Cookies("Login")("userCode") = rs_login("code")
if adminEmail = "mail@mail.net" AND str_password = "admin" then
Response.Redirect("setup.asp?setup=firstTime")
else
if str_users_authority = "mod1" Then
Response.redirect("mydefault.asp")
else
if str_users_authority = "mod2" Then
Response.redirect("index3.asp")
End if
End if
End if
End if
End if
%>
[/CODE}
Giò
scusa ma str_user_authority dove la valorizzi?
Purtroppo bisogna imparare che il computer non sbaglia...fa solo quello che gli dici di fare
www.netpolaris.it
str_users_authority = rsUserLog("authority")
è un campo del db
Giò
e dove la valorizzi? in questa parte di codice non ce sta...
Purtroppo bisogna imparare che il computer non sbaglia...fa solo quello che gli dici di fare
www.netpolaris.it
Questo codice funziona, ok?
l'unico problema è che quando faccio il login come mod 2 lo devo fare 2 volte per poter accedere al pannello
Giò
e allora il codice non funziona....
Purtroppo bisogna imparare che il computer non sbaglia...fa solo quello che gli dici di fare
www.netpolaris.it
Permessi di invio
Rispondi quotando