Gestione utenti e password

[zanzimania]

Salve a tutti vi chiedo un piccolo o meglio per me un grande aiuto.
Ho creato in asp un'area riservata collegata a un database access al quale accedo tramite login e password come amministratore.
Ora vorrei far accedere a degli utenti alle pagine personali dando la possibilità di campbiare dei dati e aggiornarli on line. Le password e login le assegnerei io.
Come posso fare?
grazie

[zanzimania]

nessuno mi aiuta?
grazie

[Mems]

Fai una form con i seguenti campi:
username
vecchiaPassword
nuovaPassword

La form fa POST ad una pagina che recupera i tre campi dalla form con request.form("nomeCampoForm")
I primi due li passi ad una query che verifica che username e vecchiaPassword corrispondano. Se c'è una corrispondenza, allora recuperi l'ID di quell'utente e con una ulteriore query di update aggiorni il campo password con il valore nuovaPassword dove l'ID corrisponde a quello recuperato dalla query precedente.

Ecco.

[zanzimania]

scusa ma io non intendevo dire recupro password devo proprio gestire le password.
ossia attribuisco ad un utente A una password e login. Quando entra nell'area riservata devo permettergli di entrare e modificare i dati
grazie

[Mems]

Ed io che cosa ho detto?

[zanzimania]

Ho trovato questo esempio. ho fatto tutto, solo che dopo che inserisco email,user e password mi da errore
dove sbagio:
<%
'Creo la variabile Action
Dim Action
Action = request.form("act")

'Se Action è vuoto stampo il modulo
if Action = "" then
%>

<form method="POST">
<input type="hidden" name="act" value="salva">
<table border="0">
<tr><td>Tua Email</td><td><input type="text" name="email" size="30"></td></tr>
<tr><td>Username</td><td><input type="text" name="user" size="30"></td></tr>
<tr><td>Password</td><td><input type="password" name="pass" size="30"></td></tr>
<tr><td colspan="2"><input type="submit" value="ISCRIVITI"></td></tr>
</table>
</form>

<%
'Se Action ha come valore "salva"...
'Inserisco i valori del modulo nel DB
elseif Action = "salva" then

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

'Aggiungo un nuovo record al DB
Dim Rs
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open "UTENTI", conn, 1, 3
Rs.AddNew()
Rs("email") = request.form("email")
Rs("user") = request.form("user")
Rs("pass") = request.form("pass")
Rs("stato") = False
Rs.Update

'chiudo recordset e connessione
Rs.Close
set Rs = Nothing
Conn.Close
set Conn = Nothing

'Messaggio a video di conferma
response.write "Registrazione avvenuta con successo"
response.end

end if
%>

[Mems]

E l'errore cosa dice?

[zanzimania]

ecco l'errore:
Impossibile visualizzare la pagina
HTTP 500
Cause più probabili:
Il sito Web è in manutenzione.
Il sito Web contiene un errore di programmazione.

[Roby_72]

Disabilita gli errori HTTP brevi dal menu strumenti --> opzioni internet --> avanzate di Internet Explorer.

Roby

[zanzimania]

fatto, grazie.
ecco l'errore:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Cannot update. Database or object is read-only.

/registrati.asp, line 40