- Home
- Categorie
- Coding e Sistemistica
- Altri linguaggi per il web
- [ASP]come creare un login e registrazione utenti
-
[ASP]come creare un login e registrazione utenti
Ciao a tutti !
Ho un problemino, realizzando delle pag con Dreamweaver dovrei creare un pagina per poter registrare gli utenti con Access i campi sono 5
Nome - Cognome - Username - Password - email sapreste indicarmi qualche script semplicissimo (data la mia poca esperienza in asp) da poter utilizzare ?Grazie 1000 !!!
-
:bho:
-
Basta una ricerca: http://www.google.it/search?q=area+riservata+asp&start=0&ie=utf-8&hl=it&oe=utf-8&client=firefox-a&rls=org.mozillaofficial
-
Si le avevo già viste, ma non è quello che stavo cercando, io cercavo un codice sorgente per la registrazione dei vari utenti, non il login con password preimpostate, l'unica cosa che ho trovato è questa
http://www.webmasterpoint.org/asp/script/06_registrazione.asp
ma troppo complicato.
Esiste qualcosa di simile più semplice ?Grazie !!!!
-
Prima di tutto costruisciti il form per l'invio dei dati con tutti i campi che ti serve registrare nel database. L'action del form fallo puntare ad una pagina asp che recupera i dati (es. strNome = Request("nome")) e li inserisce nel database attraverso un "INSERT INTO nomeTabella (nome, cognome,...,n) VALUES (strNome, strCognome,...,strN)"
-
IL form riesco a realizzarlo
il problema è tutto il resto
potresti postare il codice grazie !!!
-
Vorrei qualcosa simile all'esempio fatto qui
http://www.amicopc.com/asp/register.asp
solo che qui non esiste un comando che verifica se un utente si è registrato
con l'user e passw uguali ad un'altro !
E quindi due utenti possono registrarsi tranquillamente con la stessa user e passw.
-
Puoi usare quello script e modificarlo secondo le tue esigenze, per controllare se esiste già un determinatu user nel database basta una semplice query
"SELECT * FROM tabella WHERE nick = " & request.form("nick")
-
Non avendo mai fatto applicazioni del genere, potresti indicarmi dove copiare questa query
"SELECT * FROM tabella WHERE nick = " & request.form("nick")
da te suggerita ?
-
Dove siete Legolas e Madai, mi avete risolto tanti problemi datemi una mano anche per questo !!!!x:x
-
posta la pagina dove inserisci gli utenti nel db e vediamo che si può fare
Ciao
-
Sapevo di poter contare su di voi
il file si chiama registrami.asp, il contenuto è questo:
<%
dim nome
dim user
dim pwd
nome=request.form("form_nome")
user=request.form("form_user")
pwd=request.form("form_password")
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("mdb-database/pass.mdb")
sql = "SELECT * FROM pass"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3
RS.AddNew
rs.Fields("nome")=nome
rs.Fields("user")=user
rs.Fields("pwd")=pwd
rs.update
RS.Close
Set RS=Nothing
conn.Close
Set conn=Nothing
response.redirect("reg_ok.htm")
%>
-
esiste poi un'altro file che si chiama validate.asp che ha il compito di verificare i dati inseriti nel database, il contenuto è questo:
<%
dim url
url=request.querystring("url")
%>
<form method="POST" action="check.asp">
<p align="center">Username<br>
<input type="text" name="form_user" size="20"></p>
<p align="center">Password<br>
<input type="password" name="form_password" size="20"></p>
<p align="center"><input type="submit" value="Invia" name="B1"><input type="reset" value="Reimposta" name="B2"></p>
<input type="hidden" name="form_url" value="<% = url %>">
-
Non mi abbandonate
-
Prova così, facci sapere, ciao:
<% dim nome dim user dim pwd 'evitiamo l'SQL Injection replicando gli apici nome=**Replace(**request.form("form_nome")**,"'","''")** user=**Replace(**request.form("form_user")**,"'","''")** password=**Replace(**request.form("form_password")**,"'","''")** Dim conn Set conn = Server.CreateObject("ADODB.Connection") conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("mdb-database/pass.mdb") sql = "SELECT * FROM pass** WHERE user = '" & user & "'**" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn, 3, 3 **If rs.EOF then** RS.AddNew rs.Fields("nome")=nome rs.Fields("user")=user rs.Fields("pwd")=pwd rs.update RS.Close Set RS=Nothing conn.Close Set conn=Nothing response.redirect("reg_ok.htm") **Else Response.Write("User giá esistente") Response.End RS.Close Set RS=Nothing conn.Close Set conn=Nothing End if** %>
-
Funziona siete sempre i migliori grazie 1000 !
Se avete anche sotto mano uno script con l'aggiunta dell'opzione dell'invio dei dati tramite email sarebbe il massimo !!!
Grazieeeeeee !!!!
-
Ciao, scusa se non ti ho risposto prima ma ho la linead che da agosto non funziona e aspetto il tecnico...
Comuqnue per inviare una mail (ipotizzando che usi cdosys) basta fare così:
Dim objMail, objConfig Set objMail = Server.createObject("CDO.Message") Set objConfig = Server.createObject ("CDO.Configuration") With objConfig .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "il tuo smtp" .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 .Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 .Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 .Fields.update End With Set objMail.Configuration = objConfig objMail.From = "[email protected]" ' Mittente objMail.To = "qui ci metti la mail del destinatario" ' Destinatario objMail.Subject = "Oggetto mail" objMail.HTMLBody = "Ciao la tua user è: " & user & " e la tua password è:" & password objMail.Send() Set objMail = Nothing
Ciao
-
Legolas questo va copiato sempre su "registrami.asp" ?
-
@gelova said:
Legolas questo va copiato sempre su "registrami.asp" ?
Si.
Magari però prima di fare copia incolla leggiti lo script perchè alcune voci le devi editere teCiao
-
@Legolas said:
objMail.From = "[email protected]" ' Mittente objMail.To = "qui ci metti la mail del destinatario" ' Destinatario
Infatti non ho ben capito questi passaggi.....se "[email protected]" si iscrive
il proprietario del sito ad esempio "[email protected]" dovrebbe ricevere un'email da "[email protected]".....come faccio ad inserire l'email del mittente se non so chi si iscrive ? :bho: