Error en Insert

Acostag · #1 (**permalink**) 25/12/2002, 17:07

Alguien me puede decir donde esta el ERROR... Please!!!!

Tengo este IF, el cual saca de una Tabla un Valor Numerico (Guia)
y si es el Ultimo Registro.. el Suma 1 y despues lo Inserta en la
mism a Tabla... Va el Codigo..

<%
dim parcial
Set oConn = Server.CreateObject ("ADODB.Connection")
Set RS = Server.CreateObject ("ADODB.RecordSet")
oconn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& server.mappath("Trans_Cantu.mdb")

sql = "SELECT Guias FROM Datos"
RS.Open sql, oConn, 1,3

If RS.EOF then

Else
Response.Write "Hasta este momento esta pagina fue ""visitada"": "&RS("guias")&""
parcial=rs("guias")+1
rs("guias")=parcial
Response.Write "Hasta este momento esta pagina fue ""visitada"": "&RS("guias")&""
sql="insert into datos (guias) values ("&request.form("Guias")&")"
oConn.Execute(sql)
Response.Write "Hasta este momento esta pagina fue ""visitada"": "&RS("guias")&""
End IF

rs.close
oConn.Close
Set RS = nothing
Set oConn = nothing
%>

podrian Ayudarme.. ???

Saludos

Luis.R.Acosta

CHuLoSoY · #2 (**permalink**) 25/12/2002, 17:20

CREO que está aquí
sql="insert into datos (guias) values ("&request.form("Guias")&")"

Prueba así:

sql="insert into datos (guias) values (request.form("Guias"))"

Acostag · #3 (**permalink**) 25/12/2002, 17:23

No jala... ahora me sale este Error ..

Falta final de instrucción
/guia.asp, line 18
sql="insert into datos (guias) values (request.form("Guias"))"
------------------------------------------------------------------^

CHuLoSoY · #4 (**permalink**) 25/12/2002, 17:30

y antes qué error t tiraba?

Acostag · #5 (**permalink**) 25/12/2002, 17:32

este es el error marcaba antes...

[Microsoft][ODBC Microsoft Access Driver]
Syntax error in INSERT INTO statement.

CHuLoSoY · #6 (**permalink**) 25/12/2002, 17:36

Yo para insertar uso así:

rs.Addnew
rs("campo") = variable
rs.Update

y para actualizar un campo (no añadir uno nuevo, modificarlo)

rs("campo") = variable
rs.Update

En tu caso sería:

rs.Addnew
rs("guias") = request.form("Guias")
rs.Update

o para modificar:

rs("guias") = request.form("Guias")
rs.Update

Saludos y cuéntanos que tal.

Por cierto, no iba mal encaminado, el error está en esa línea ;)

Acostag · #7 (**permalink**) 25/12/2002, 17:43

Ya lo puse en Ejecuccion.. y si Trabaja.,... Solo un Detalle...

este campo Guia... me servira a mi.. para insertar Otros campos..
Junto con el Nuevo Guia.. en este Caso

Guia...Cliente...Cantidad...Monto...

y con esta Instruccion solo Actualizaria el Registro...

Saludos

Luis.R.Acosta