salve. ho questa pagina in asp che inserisce i dati in un database access. ora vorrei fare in modo che se all'interno de database esiste già un campo con lo stesso nome esca un alert.
esempio: campo login, nel database e già presente il nome "enrico", se un utente vuole registrarsi sempre con la stessa login, esca un alert con scritto login già presente. o meglio ancora se riuscirei ad affiancare una casella che mi dica in tempo reale se disponibile o no. o qualcosa di simile.
sapete aiutarmi?
grazie !!!
questo e per l'inserimento dei dati nel database:
<html>
<head>
<title>INSERIMENTO DI DATI IN UN DATABASE</title>
</head>
<body>
<%
login = trim(Request.form("login"))
login = replace(login,"'","''")
pass = trim(Request.form("pass"))
pass = replace(pass,"'","''")
nome = trim(Request.form("nome"))
nome = replace(nome,"'","''")
cognome = trim(Request.form("cognome"))
cognome = replace(cognome,"'","''")
email = trim(Request.form("email"))
email = replace(email ,"'","''")
data_di_nascita = trim(Request.form("data_di_nascita"))
data_di_nascita = replace(data_di_nascita,"'","''")
codice_fiscale_o_partita_iva = trim(Request.form("codice_fiscale_o_partita_iva"))
codice_fiscale_o_partita_iva = replace(codice_fiscale_o_partita_iva,"'","''")
indirizzo = trim(Request.form("indirizzo"))
indirizzo = replace(indirizzo,"'","''")
civico = trim(Request.form("civico"))
civico = replace(civico,"'","''")
cap = trim(Request.form("cap"))
cap = replace(cap,"'","''")
citta = trim(Request.form("citta"))
citta = replace(citta,"'","''")
provincia = trim(Request.form("provincia"))
provincia = replace(provincia,"'","''")
regione = trim(Request.form("regione"))
regione = replace(regione,"'","''")
nazione = trim(Request.form("nazione"))
nazione = replace(nazione,"'","''")
telefono = trim(Request.form("telefono"))
telefono = replace(telefono,"'","''")
cellulare = trim(Request.form("cellulare"))
cellulare = replace(cellulare,"'","''")
fax = trim(Request.form("fax"))
fax = replace(fax,"'","''")
sito_internet = trim(Request.form("sito_internet"))
sito_internet = replace(sito_internet,"'","''")
Come_ci_hai_conosciuto = trim(Request.form("Come_ci_hai_conosciuto"))
Come_ci_hai_conosciuto = replace(Come_ci_hai_conosciuto,"'","''")
dim objconn,dbPath,dbConnString
dbPath = server.mapPath("mdb-database/utenti.mdb")
dbConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& dbpath
set objConn = server.createObject("ADODB.Connection")
objConn.open dbConnString
SQL = "INSERT INTO utenti (login, pass, nome, cognome, email, data_di_nascita, codice_fiscale_o_partita_iva, indirizzo, civico, cap, citta, provincia, regione, nazione, telefono, cellulare, fax, sito_internet, Come_ci_hai_conosciuto) "&_
"VALUES ('" & login & "','" & pass & "','" & nome & "','" & cognome & "','" & email & "','" & data_di_nascita & "','" & codice_fiscale_o_partita_iva & "','" & indirizzo & "','" & civico & "','" & cap & "','" & citta & "','" & provincia & "','" & regione & "','" & nazione & "','" & telefono & "','" & cellulare & "','" & fax & "','" & sito_internet & "','" & Come_ci_hai_conosciuto & "')"
objconn.Execute(sql)
response.write "
I dati sono stati inseriti correttamente!</p>"
objconn.Close
set objConn = nothing
%>
<hr>
<%
Response.Write("Torna alla pagina precedente")
%>
</p>
</body>
</html>
Rispondi quotando
