Navigazione

    Privacy - Termini e condizioni
    © 2020 Search On Media Group S.r.l.
    • Registrati
    • Accedi
    • CATEGORIES
    • Discussioni
    • Non letti
    • Recenti
    • Hashtags
    • Popolare
    • Utenti
    • Stream
    • Interest
    • Categories
    1. Home
    2. Categorie
    3. Coding e Sistemistica
    4. Coding
    5. [ASP]come creare un login e registrazione utenti
    Questa discussione è stata cancellata. Solo gli utenti con diritti di gestione possono vederla.
    • G
      gelova User Attivo • ultima modifica di

      [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 !!!

      0 Miglior Risposta Ringrazia Cita Rispondi

        1 Risposta Ultima Risposta
      • G
        gelova User Attivo • ultima modifica di

        :bho:

        0 Miglior Risposta Ringrazia Cita Rispondi

          1 Risposta Ultima Risposta
        • M
          madai User Attivo • ultima modifica di

          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.mozilla🇮🇹official

          🙂

          0 Miglior Risposta Ringrazia Cita Rispondi

            1 Risposta Ultima Risposta
          • G
            gelova User Attivo • ultima modifica di

            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 !!!!

            0 Miglior Risposta Ringrazia Cita Rispondi

              1 Risposta Ultima Risposta
            • M
              madai User Attivo • ultima modifica di

              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)"

              0 Miglior Risposta Ringrazia Cita Rispondi

                1 Risposta Ultima Risposta
              • G
                gelova User Attivo • ultima modifica di

                IL form riesco a realizzarlo
                il problema è tutto il resto
                potresti postare il codice grazie !!!

                0 Miglior Risposta Ringrazia Cita Rispondi

                  1 Risposta Ultima Risposta
                • G
                  gelova User Attivo • ultima modifica di

                  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.

                  0 Miglior Risposta Ringrazia Cita Rispondi

                    1 Risposta Ultima Risposta
                  • L
                    legolas Moderatore • ultima modifica di

                    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")

                    :ciauz:

                    0 Miglior Risposta Ringrazia Cita Rispondi

                      1 Risposta Ultima Risposta
                    • G
                      gelova User Attivo • ultima modifica di

                      Non avendo mai fatto applicazioni del genere, potresti indicarmi dove copiare questa query
                      "SELECT * FROM tabella WHERE nick = " & request.form("nick")
                      da te suggerita ?

                      0 Miglior Risposta Ringrazia Cita Rispondi

                        1 Risposta Ultima Risposta
                      • G
                        gelova User Attivo • ultima modifica di

                        Dove siete Legolas e Madai, mi avete risolto tanti problemi datemi una mano anche per questo !!!!❌x:x

                        0 Miglior Risposta Ringrazia Cita Rispondi

                          1 Risposta Ultima Risposta
                        • L
                          legolas Moderatore • ultima modifica di

                          posta la pagina dove inserisci gli utenti nel db e vediamo che si può fare 😉

                          Ciao:ciauz::ciauz:

                          0 Miglior Risposta Ringrazia Cita Rispondi

                            1 Risposta Ultima Risposta
                          • G
                            gelova User Attivo • ultima modifica di

                            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")
                            %>

                            0 Miglior Risposta Ringrazia Cita Rispondi

                              1 Risposta Ultima Risposta
                            • G
                              gelova User Attivo • ultima modifica di

                              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 %>">

                              0 Miglior Risposta Ringrazia Cita Rispondi

                                1 Risposta Ultima Risposta
                              • G
                                gelova User Attivo • ultima modifica di

                                Non mi abbandonate 😢

                                0 Miglior Risposta Ringrazia Cita Rispondi

                                  1 Risposta Ultima Risposta
                                • M
                                  madai User Attivo • ultima modifica di

                                  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&aacute; esistente")
                                  Response.End
                                  RS.Close
                                   Set RS=Nothing
                                   conn.Close
                                   Set conn=Nothing
                                  
                                  End if**
                                  %>
                                  
                                  
                                  0 Miglior Risposta Ringrazia Cita Rispondi

                                    1 Risposta Ultima Risposta
                                  • G
                                    gelova User Attivo • ultima modifica di

                                    Funziona siete sempre i migliori grazie 1000 ! 😉 :yuppi:

                                    Se avete anche sotto mano uno script con l'aggiunta dell'opzione dell'invio dei dati tramite email sarebbe il massimo !!!

                                    Grazieeeeeee !!!!

                                    0 Miglior Risposta Ringrazia Cita Rispondi

                                      1 Risposta Ultima Risposta
                                    • L
                                      legolas Moderatore • ultima modifica di

                                      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 :ciauz::ciauz:

                                      0 Miglior Risposta Ringrazia Cita Rispondi

                                        1 Risposta Ultima Risposta
                                      • G
                                        gelova User Attivo • ultima modifica di

                                        Legolas questo va copiato sempre su "registrami.asp" ?

                                        0 Miglior Risposta Ringrazia Cita Rispondi

                                          1 Risposta Ultima Risposta
                                        • L
                                          legolas Moderatore • ultima modifica di

                                          @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 te

                                          Ciao
                                          :ciauz::ciauz:

                                          0 Miglior Risposta Ringrazia Cita Rispondi

                                            1 Risposta Ultima Risposta
                                          • G
                                            gelova User Attivo • ultima modifica di

                                            @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:

                                            0 Miglior Risposta Ringrazia Cita Rispondi

                                              1 Risposta Ultima Risposta
                                            Caricamento altri post
                                            Rispondi
                                            • Topic risposta
                                            Effettua l'accesso per rispondere
                                            • Da Vecchi a Nuovi
                                            • Da Nuovi a Vecchi
                                            • Più Voti