progetto con 2 o + categorie /aree riservate

[fenix2]

Salve a tutti,vorrei creare un progetto con 2 o + categorie e con 2 o +aree riservate ,mi spiego meglio:
-HO 2 categorie,immobili e servizi
e vorrei creare 3 aree riservate:
-->una che permette all' utente l'accesso solo per gli immobili
-->un 'altra che permette all' utente l'accesso solo per i servizi
-->e l'altra che permette all'amministratore di vedere sia gli immobili sia i servizi
qualcuno potrebbe aiutarmi o quanto meno indirizzarmi su qualche fonte online che tratta di un caso simile?
Ringrazio in anticipo tutti per la collaborazione
e buona domenica

 

[PoLe]

Prova così:
nella tabella del DB dove si trovano gli utenti registràti aggiungi al record un campo di nome per esempio 'area' dove verrà inserito il nome dell'area (immobili o servizi) a cui l'utente può accedere.

Così facendo puoi utilizzare un solo form di inserimento login e password, che dovrà chiamare, una volta riempiti questi 2 campi, una ASP di indirizzamento che andrà a verificare prima di tutto se login e password sono corrette, e subito controllerà nel record trovato il valore del campo 'area'.
Se tale valore è 'immobili' l'utente viene automaticamente indirizzato all'area immobili, e lo stesso se il campo 'area' ha come valore 'servizi' l'utente verrà automaticamente indirizzato all'area 'servizi'.
Se invece login e password sono quelle dell'amministratore, si verrà inidirizzari nella rispettiva area.
Eccoti un esempio per iniziar a costruire la base di tutto ciò:

<%
dim log,psw,oggconn,oggrecset,stringaSQL,nm_area
log=request.form("login")
psw=request.form("password")

if log="giallo" and psw="arancio" then
response.redirect "administrator_area.htm"
end if

set oggconn=Server.CreateObject("ADODB.Connection")
oggconn.ConnectionString="DRIVER={Microsoft Access Driver (*.mdb)};"&"DBQ="&Server.MapPath("mdb-database/utenti.mdb")

oggconn.open
stringaSQL="SELECT * FROM tabella_utenti WHERE login='"& log &"' AND password='"& psw &"';"

set oggrecset=Server.CreateObject("ADODB.Recordset")

oggrecset.Open StringaSQL,oggconn

if oggrecset.EOF then
response.redirect "pagina_di_errore.htm"
else
nm_area=oggrecset("area")
response.redirect nm_area & ".htm"
end if

oggrecset.Close
set oggrecset=Nothing

oggconn.Close
set oggconn=Nothing
%>

Se non hai capito qualcosa sono qua! :fonzie:

Salut! :byebye: