Problema con INSERT INTO....

[chilli]

Hola tengo un problema con un insert, bueno lo que pasa es que tengo mi formulario para que mis usuarios se registren, pero cuando paso los datos a la pagina que me deberia guardar todo en la BD no lo hace, y no bota ningun error.

************Aqui envio el codigo*****************
<%
Dim oConn
nombre = request.Form("nombre")
mail = request.Form("mail")
apellido = request.Form("apellido")
dia = request.Form("dia")
mes = request.Form("mes")
ano = request.Form("ano")
empresa = request.Form("empresa")
direccion = request.Form("direccion")
tel = request.Form("tel")
fax = request.Form("fax")
pais = request.Form("pais")
ciudad = request.Form("ciudad")
usu = request.Form("usuario")
contra = request.Form("contra")
ir = request.Form("lista")


Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("bd/login.mdb")


sql = "INSERT INTO VER (usuario, password, nombre, apellido, mail, dia, mes, ano, empresa, direccion, tel, fax, pais, ciudad, ir)"
sql = sql & "VALUES ('"& usu &"','"& contra &"','"& nombre &"','"& apellido &"','"& mail &"','"& dia &"','"& mes &"','"& ano &"','"& empresa &"','"& direccion &"','"& tel &"','"& fax &"','"& pais &"','"& ciudad &"','"& ir &"')"



set Conn = Nothing
response.write sql
%>

**********************************************
y la pagina me responde...
***********************************************
INSERT INTO VER (usuario, password, nombre, apellido, mail, dia, mes, ano, empresa, direccion, tel, fax, pais, ciudad, ir)VALUES ('Pedrito','amigo','Pedro','Perez','Pepez@hotmail. com','3','Agosto','1979','PJ','cll115 # 36 - 20','4555556','4445589','Cualquiera','Tambien','si ')

cual es el problema....
Chau

[deprabado]

cambia la linea slq=blblblblb por:

Set insertar= oConn.execute("INSERT INTO VER (usuario, password, nombre, apellido, mail, dia, mes, ano, empresa, direccion, tel, fax, pais, ciudad, ir)"
sql = sql & "VALUES ('"& usu &"','"& contra &"','"& nombre &"','"& apellido &"','"& mail &"','"& dia &"','"& mes &"','"& ano &"','"& empresa &"','"& direccion &"','"& tel &"','"& fax &"','"& pais &"','"& ciudad &"','"& ir &"')")
y si no quieres que te muestre la cadena SQL quita


response.write sql

[chilli]

Listo Deprabado , ya cambie por el que me diste pero ahora si me bota un error....
************codigo*******************

<%
Dim oConn
nombre = request.Form("nombre")
mail = request.Form("mail")
apellido = request.Form("apellido")
dia = request.Form("dia")
mes = request.Form("mes")
ano = request.Form("ano")
empresa = request.Form("empresa")
direccion = request.Form("direccion")
tel = request.Form("tel")
fax = request.Form("fax")
pais = request.Form("pais")
ciudad = request.Form("ciudad")
usu = request.Form("usuario")
contra = request.Form("contra")
ir = request.Form("lista")


Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("bd/login.mdb")


Set insertar= oConn.execute("INSERT INTO VER (usuario, password, nombre,apellido, mail, dia, mes, ano, empresa, direccion, tel, fax, pais, ciudad, ir)")
sql = sql & ("VALUES ('"& usu &"','"& contra &"','"& nombre &"','"& apellido &"','"& mail &"','"& dia &"','"& mes &"','"& ano &"','"& empresa &"','"& direccion &"','"& tel &"','"& fax &"','"& pais &"','"& ciudad &"','"& ir &"')")

set Conn = Nothing
response.write sql
%>


****************************
y el error...........
****************************
Microsoft JET Database Engine error '80040e14'

Error de sintaxis en la instrucción INSERT INTO.

/robert/guardar.asp, line 24
*****************************

que paso hay...????

[rashid]

yo estaba trabajando con un servidor que conectaba asp con MySQL y estaba asi, no me mandava errores, pero los habia.

ha sido dificil, lo que hice fue cortar los insert poco a poco hasta descubrir donde estaba el error.

veo un # en un insert, cambia eso.

bye