Ragazzi ho un problema che non riesco assolutamente a risolvere >.<
La pagina contiene questo errore:
" Microsoft JET Database Engine error '80040e14'
Errore di sintassi nell'istruzione INSERT INTO. "
Il codice della pagina asp è il seguente, e l'errore è alla riga 31...
Vi ringrazio già in anticipo per l'aiuto =)
La pagina contiene questo errore:
" Microsoft JET Database Engine error '80040e14'
Errore di sintassi nell'istruzione INSERT INTO. "
Il codice della pagina asp è il seguente, e l'errore è alla riga 31...
PHP:
<%@Language=VBScript %>
<%Option Explicit %>
<%
Dim conn, rs, rs1, rs2, StrConn, querylog1, querylog2, useresist, mailesist, rsreg, Username, eMail, Password, Nome, Cognome, Collocazione, Scuola, Gruppo, sql
Set conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
Set rs1 = Server.CreateObject("ADODB.Recordset")
Set rs2 = Server.CreateObject("ADODB.Recordset")
StrConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("apprendinweb.mdb")
conn.Open StrConn
Username=Request.Form("username")
eMail=Request.Form("email")
Password=Request.Form("password")
Nome=Request.Form("nome")
Cognome=Request.Form("cognome")
Collocazione=Request.Form("collocazione")
Scuola=Request.Form("scuola")
Gruppo=Request.Form("gruppo")
querylog1="SELECT utenti.nomeutente FROM utenti WHERE utenti.nomeutente='"&Username&"';"
Set rs1=conn.Execute(querylog1)
querylog2="SELECT utenti.email FROM utenti WHERE utenti.email='"&eMail&"';"
Set rs2=conn.Execute(querylog2)
If rs1.BOF=True And rs1.EOF=True Then
sql="insert into utenti(nomeutente,password,nome,cognome,email,collocazione,scuola,gruppo) values ('"&Username&"','"&Password&"','"&Nome&"','"&Cognome&"','"&eMail&"','"&Collocazione&"','"&Scuola&"',"&Gruppo&");"
conn.Execute (sql)
Response.write ("Record Aggiunto")
Else
Response.write("Nome utente già utilizzato")
End If
rs1.Close: Set rs1=nothing
conn.Close: Set conn=nothing
%>
Vi ringrazio già in anticipo per l'aiuto =)