Ciao, premetto che io non sono un programmatore, ma mi diverto a creare qualche cosa per il mio sito.
Per quanto riguarda la gestione di registrazione in un database, puoi utilizzare questo esempio:
codice:
<%
'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
%>
questo è un codice di registrazione dati in un database.
Rispondi quotando
