24/02/2002, 21:33
|
 | | | Fecha de Ingreso: mayo-2001 Ubicación: Cali
Mensajes: 2.423
Antigüedad: 23 años, 10 meses Puntos: 20 | |
| ayuda con este codigo urgente
Tengo el siguiente codigo, y me sale el siguiente error:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][Controlador ODBC Microsoft Access] Error de sintaxis en la instrucción INSERT INTO.
Que pasa?
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
Dim nombre, apellidos, telefono, email, login, password
Dim correcto
Dim oConn, rs, SQL
'recogemos el formulario
nombre=Request.Form("nombre")
apellidos=Request.Form("Apellidos")
telefono=Request.Form("telefono")
email=Request.Form("email")
login=Request.Form("username")
password=Request.Form("password")
Correcto=True
'comprobamos que no hay campos vacios
if nombre="" then correcto=False end if
if apellidos="" then correcto=False end if
if telefono="" then correcto=False end if
if email="" then correcto=False end if
if login="" then correcto=False end if
if password="" then correcto=False end if
'si todo esta bien, comprobamos con la bd
set oConn=Server.CreateObject("ADODB.Connection&q uot;)
oConn.Open "base"
SQL="SELECT * FROM datos where (Login='"&Login&"');"
'éjecutamos la consulta
set rs=oConn.Execute(SQL)
'si no nos devuelve vacio es que el login ya esta en uso
if not rs.EOF then
Response.Write("El nombre de usuario ya esta siendo utilizado")
Response.Write("Por favor escoja otro")
else
'es vacio, asi que lo insertamos en la bd
SQL="INSERT INTO datos " & _
"(Login, Password, Nombre, Apellidos, Tlf, E-mail)"
SQL=SQL & " VALUES ('"&login&"', '"&password & _
"', '"&nombre&"','"&apellid os&"','"&telefono&"','& quot;&email&"');"
oConn.Execute(SQL)
Response.Write("Gracias por registrarte, "& nombre)
end if
'limpiamos objetos
rs.Close
oConn.Close
set rs=nothing
set oConn=nothing
'else
'el usuario ha metido datos incorrectos
' Response.Write("Datos incorrectos")
'end if
% |