Problema con registro de parámetros

Naheru · #1 (**permalink**) 16/07/2008, 08:34

Saludos comunidad:
Y de nuevo me ha saltado un error con estos condenados formularios =( Ahora les explico bien:

Resulta que estaba creando una página de registro de eventos (a un estilo memes) usando como base un formulario de registro de usuarios que escribí junto con mi profesor, el cual sería éste:

Código:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Documento sin t&iacute;tulo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">


<% 

VNombre=request.form("Nombre")
VApellido=request.form("Apellido")
VCuenta=request.form("Cuenta")
VContrasena=request.form("Contrasena")
VOficio=request.form("Oficio")
VDireccion=request.form("Direccion")





cadena="PROVIDER=Microsoft.Jet.Oledb.4.0;Data Source=" & server.MapPath("Database1.mdb")

Set Conn = Server.CreateObject("ADODB.Connection")

Conn.Open Cadena

Conn.execute "insert into usuarios (usuario,contrasena,oficio,nombre,apellido,direccion) values('" & vcuenta & "','" & vcontrasena & "','" & voficio & "','" & vnombre & "','" & vapellido & "','" & vdireccion & "')"

%>


</head>

<body>
<a href="registro.asp">Volver al formulario de registro
</a>
</body>
</html>

Entonces, la página de encuentros sería la siguiente:

Código:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"><html>
<head>
<title>Documento sin t&iacute;tulo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">


<% 

VNombre=request.form("nombre")
VDia=request.form("dia")
VMes=request.form("mes")
VMagnitud=request.form("magnitud")
VDescripcion=request.form("descripcion")
VPrecio=request.form("precio")

cadena="PROVIDER=Microsoft.Jet.Oledb.4.0;Data Source=" & server.MapPath("Database1.mdb")

Set Conn = Server.CreateObject("AD0DB.Connection")

Conn.Open Cadena

Conn.execute "insert into encuentros (nombre,dia,mes,magnitud,descripcion,precio) values('" & vnombre & "','" & vdia & "','" & vmes & "','" & vmagnitud & "','" vdescripcion & "','" & vprecio & "')"

%>

</head>

<body>
<a href="elencuentro_ingreso.asp">Volver al formulario de registro
</a>
</body>
</html>

Firefox me presenta el siguiente error:

Tipo de error:
Error de compilación de Microsoft VBScript (0x800A0401)
Se esperaba un final de instrucción
/portaldeartesanos/elencuentro_resultador.asp, línea 24, columna 160
Conn.execute "insert into encuentros (nombre,dia,mes,magnitud,descripcion,precio) values('" & vnombre & "','" & vdia & "','" & vmes & "','" & vmagnitud & "','" vdescripcion & "','" & vprecio & "')"

Sinceramente desconozco cuál es el problema, ya que ambos formularios son básicamente espejados, ambos usan la misma base de datos (diferentes tablas) e incluso el código es espejado, sólo que cambiado con sus respectivos valores.

Agradecería mucho ayuda con éste problema, aunque tal vez pida demasiado

Desde ya, ¡muchas gracias!

Naheru~

JuanRAPerez · #2 (**permalink**) 16/07/2008, 08:49

el error es producido porque en algun momento tu cadenas de texto estan truncando el sql
o porque te falta un espacio despues de values[ESPACIO] ('"

SQL = "insert into encuentros "
SQL = SQL & "(nombre,dia,mes,magnitud,descripcion,precio) "
SQL = SQL & "values ('" & vnombre & "','" & vdia & "','" & vmes & "','" & vmagnitud & "','" vdescripcion & "','" & vprecio & "')"
Conn.execute SQL

si alguna variable por ejemplo si tu variable vdescripcion contiene apostrofes o comillas dobles es lo que puede estarte truncando el SQL y por eso no ejecuta correctamente la inserción

limpia las variables de comillas y prueba

suerte

Lebennin · #3 (**permalink**) 16/07/2008, 09:20

Justo antes del vdescripcion te falta un caracter & para poder concatenarlo.

Lebennin · #4 (**permalink**) 16/07/2008, 09:21

Y por cierto JuanRa,

pones la concatenación del SQL tb mal y luego encima pones como ejemplo la variable donde justo esta el problema jejejeje. Joer, ya es puntería ;)

Naheru · #5 (**permalink**) 16/07/2008, 09:36

¡Gracias! Pude solucionar ése problema. Pero ahora apareció otro:

Tipo de error:
Objeto Server, ASP 0177 (0x800401F3)
Cadena clase no válida
/portaldeartesanos/elencuentro_resultador.asp, línea 20

La línea 20 sería la siguiente:

Set Conn = Server.CreateObject("AD0DB.Connection")

Gracias.
Naheru~

JuanRAPerez · #6 (**permalink**) 16/07/2008, 09:59

Cita:

Iniciado por Lebennin

Y por cierto JuanRa,

pones la concatenación del SQL tb mal y luego encima pones como ejemplo la variable donde justo esta el problema jejejeje. Joer, ya es puntería ;)

jajajajajaja

ando un poco perdido este día

Lebennin · #7 (**permalink**) 16/07/2008, 10:08

Cita:

Iniciado por Naheru

¡Gracias! Pude solucionar ése problema. Pero ahora apareció otro:

Tipo de error:
Objeto Server, ASP 0177 (0x800401F3)
Cadena clase no válida
/portaldeartesanos/elencuentro_resultador.asp, línea 20

La línea 20 sería la siguiente:

Set Conn = Server.CreateObject("AD0DB.Connection")

Gracias.
Naheru~

Esto..... en adodb parece mas bien un 0 que una O. Juraría que estas poniendo un cero en vez de la o tipica.

Naheru · #8 (**permalink**) 16/07/2008, 11:49

Sí, me di cuenta de ésto un poco tarde. Les juro que ya me estaba sacando hernias =P

Gracias, y disculpen la necedad!

Naheru~

Lebennin · #9 (**permalink**) 17/07/2008, 01:40

Nada tio, los errores mejor se ven entre varios, pues anda que no me ha pasado veces estar horas buscando un error y cuando le encuentras es una gilipollez.