Buongiorno a tutti,
volevo realizzare una pagina di primo accesso che controllasse se i dati erano già stati immessi nel database e in caso contrario inserisse i nuovi. Commetto però un errore di concetto. Il database access si chiama " Archivio" e la tabella " Utenti". Questo lo script:
<%
us=request.form("username")
ps=request.form("password")
Dim conn,sql,rs
Set conn=server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.recordset")
sql="select * from utenti where username= '" & us & "' and password= '" & ps & "'"
conn.open " Provider=Microsoft.Jet.oledb.4.0; data source=" & server.MapPath ("archivio.mdb")
rs.open sql,conn
if rs.EOF then
sql="insert into utenti(username,password) values ('" & us & "', '" & ps & "')"
conn.execute sql
response.redirect" errore.asp?err=105" <!--comunica alla pagina che l'iscrizione è fatta-->
else
response.redirect" errore.asp?err=101" <!--comunica che l'utente è già iscritto-->
End if
conn.close
set conn=nothing
%>
il correttore mi dà errore:
Tipo di errore:
Microsoft JET Database Engine (0x80040E14)
Errore di sintassi nell'istruzione INSERT INTO.
/accesso riservato/provaconn.asp, line 20
ma il problema è senz'altro un altro. Spero che qualche esperto possa aiutarmi. Un saluto
volevo realizzare una pagina di primo accesso che controllasse se i dati erano già stati immessi nel database e in caso contrario inserisse i nuovi. Commetto però un errore di concetto. Il database access si chiama " Archivio" e la tabella " Utenti". Questo lo script:
<%
us=request.form("username")
ps=request.form("password")
Dim conn,sql,rs
Set conn=server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.recordset")
sql="select * from utenti where username= '" & us & "' and password= '" & ps & "'"
conn.open " Provider=Microsoft.Jet.oledb.4.0; data source=" & server.MapPath ("archivio.mdb")
rs.open sql,conn
if rs.EOF then
sql="insert into utenti(username,password) values ('" & us & "', '" & ps & "')"
conn.execute sql
response.redirect" errore.asp?err=105" <!--comunica alla pagina che l'iscrizione è fatta-->
else
response.redirect" errore.asp?err=101" <!--comunica che l'utente è già iscritto-->
End if
conn.close
set conn=nothing
%>
il correttore mi dà errore:
Tipo di errore:
Microsoft JET Database Engine (0x80040E14)
Errore di sintassi nell'istruzione INSERT INTO.
/accesso riservato/provaconn.asp, line 20
ma il problema è senz'altro un altro. Spero che qualche esperto possa aiutarmi. Un saluto