Siempre Syntax error (missing operator) in query expression 'ID='

wpp · #1 (**permalink**) 23/11/2005, 15:33

Siempre error Syntax error (missing operator) in query expression 'ID=' en edit.asp, line 26

(LÍNEA 26 QUE DA ERROR) RS.Open sql, Conn

Paso código.
Envío los dos valores ID y fname por form.

Código:

<%

Dim ID, fname, Conn, RS

	ID = Request.Form("ID")
	fname = Request.Form("fname")


'Instanciamos y abrimos nuestro objeto conexion 
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("/mdb-database/FileDB.mdb")
sql = "SELECT * FROM files WHERE ID= " & ID & ""

Set RS = Server.CreateObject ("ADODB.RecordSet")
(LÍNEA 26 QUE DA ERROR) RS.Open sql, Conn
'Si el valor EOF (fin de la tabla elegida) es verdadero, no existe el dni.
If (RS.EOF = false) then

'Ahora creamos la sentencia SQL 
	  SQL="Update files Set fname= " & fname & " where ID= " & ID
	  Conn.execute (sql) 

Response.Write "<meta http-equiv=refresh content='2;URL=../tries/show.asp'>"
Response.Write "<div align=center><font type=verdana><b>Referencia <b><font color=red>" & ID & "</b></font> ha sido editada correctamente.</b></div>"
Response.Write "<br><br><div align=center><a href=javascript:history.go(-1); title='VOLVER ATRÁS'><b><font face='Flat Brush' color=#008080 style=font-size:10pt><u>Atrás</u></font></b></em></a></span></div>"

Else
Response.Write "<meta http-equiv=refresh content='2;URL=../tries/show.asp'>"
Response.Write "<div align=center><font type=verdana><b>No ha sido editado correctamente.</b></div>"
Response.Write "<div align=center><font type=verdana><b>El ID <b><font color=red>" & ID & "</b></font> no es correcto, o no ha sido registrado previamente.</b></div>"
Response.Write "<br><br><div align=center><a href=javascript:history.go(-1); title='VOLVER ATRÁS'><b><font face='Flat Brush' color=#008080 style=font-size:10pt><u>Atrás</u></font></b></em></a></span></div>"
End If

'Cerramos el sistema de conexion
Conn.Close
%>

No sé como evitar ese dichoso mensaje de error en query expressión ID.

u_goldman · #2 (**permalink**) 23/11/2005, 15:44

1. Debuguea:

sql = "SELECT * FROM files WHERE ID= " & ID & ""
Response.write(sql)
response.end

Ve cual es la salida, que el ID llegue correctamente.

2. Si todo llega correctamente, entonces puede ser un problema con el tipo de dato que ocupas.

Salu2,

wpp · #3 (**permalink**) 23/11/2005, 15:55

REsponde esto:

SELECT * FROM files WHERE ID=

O sea no llega valor, no entiendo nada.

Code que envia los valores.

<html>
<head>
<title>Editar datos en una Bd</title>
<style>
body, input { font-family:verdana,arial; font-size:10pt; }
</style>
</head>
<body>
<p align="center">
<br>
<a href="show.asp">Para ver datos insertados pulse aquí</a>
</p>

<table border="0" align="center" height="89">
<tr>
<form method="POST" enctype="multipart/form-data" action="edit.asp">
<td height="22"><span style="font-size: 8pt">Localidad :</span></td>
<td height="22">
<input type="text" name="fname" size="23"></td>
</tr>
<td height="22"><span style="font-size: 8pt">Vivienda :</span></td>
<td height="22">
<input type="text" name="ID" size="23"> </td></tr>

<td height="1"> </td><td height="1">
<span style="font-size: 8pt">
<input type="submit" value="Submit"></span></td>
</tr>
</form>
</tr>
</table>

</body>
</html>

u_goldman · #4 (**permalink**) 23/11/2005, 16:12

Trata cambiando el form asi:

<form method="POST" action="edit.asp">

wpp · #5 (**permalink**) 23/11/2005, 16:32

Okey, me dí cuenta cuando lo envié.

Pero ahora me da error en otros parámetros, mira por fa que hago mal con las comas y esos rollos, todo es texto menos profesion e ID.

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in UPDATE statement.

/triys/edit.asp, line 34

Code:
sql = "Update files Set "
sql = sql & " fname= " & fname & ","
sql = sql & " lname= " & lname & ","
sql = sql & " profesion= " & profesion
sql = sql & " Where ID=" & ID
Conn.execute (sql)

u_goldman · #6 (**permalink**) 23/11/2005, 16:43

Si el campo a actualizar es de texto necesitas concatenarlo con apostrofes:

sql = sql & " fname= '" & fname & "',"

Y asi para cada campo de texto, por ahi debe andar el problema, tambien asegurate que esten llegando los valores correctos como se hizo anteriormente.

Salu2,

JuanRAPerez · #7 (**permalink**) 23/11/2005, 16:46

proba poniendo comillas simple y dobnles
yo tube un lio similar
y verifica el lname que no vi que lo hales en el codigo que pegastes

sql = "Update files Set fname= '" & fname & "' , lname= '"& lname &"' profesion= '" & profesion &"'"
sql = sql & " Where ID=" & ID
Conn.execute (sql)

wpp · #8 (**permalink**) 23/11/2005, 17:07

Bueno esto es la leche.

Ahora me dice
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 3.

/triys/edit.asp, line 31

Y os puedo asegurar que llegan los cuatro valores actuales con el form.

CODE:
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("/mdb-database/FileDB.mdb")
sql = "SELECT ID FROM files WHERE ID= " & ID & ""

Set RS = Server.CreateObject ("ADODB.RecordSet")
RS.Open sql, Conn
'Si el valor EOF (fin de la tabla elegida) es verdadero, no existe el dni.
If (RS.EOF = false) then

'Ahora creamos la sentencia SQL

sql = "Update files Set fname= '" & fname & "', lname= '"& lname &"', profesion= '" & profesion &"'"
sql = sql & " Where ID=" & ID
Conn.execute (sql)

Gracias por que soy un rato pesao.

wpp · #9 (**permalink**) 23/11/2005, 17:25

Paso todo el código por si vosotros detectáis el error para que responda Syntax Error en UPDATE Statment.

Código:

<%
	ID = Request.Form("ID")
	fname = Request.Form("fname")
	lname = Request.Form("lname")
	profesion = Request.Form("profesion")

'Instanciamos y abrimos nuestro objeto conexion 
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("/mdb-database/FileDB.mdb")
sql = "SELECT ID FROM files WHERE ID= " & ID & ""

Set RS = Server.CreateObject ("ADODB.RecordSet")
RS.Open sql, Conn
'Si el valor EOF (fin de la tabla elegida) es verdadero, no existe el dni.
If (RS.EOF = false) then

'Ahora creamos la sentencia SQL 

sql = "Update files Set fname= '" & fname & "', lname= '"& lname &"', profesion= '" & profesion &"',"
sql = sql & " Where ID=" & ID
Conn.execute (sql)

Response.Write "<meta http-equiv=refresh content='2;URL=../tries/show.asp'>"
Response.Write "<div align=center><font type=verdana><b>Referencia <b><font color=red>" & ID & "</b></font> ha sido editada correctamente.</b></div>"
Response.Write "<br><br><div align=center><a href=javascript:history.go(-1); title='VOLVER ATRÁS'><b><font face='Flat Brush' color=#008080 style=font-size:10pt><u>Atrás</u></font></b></em></a></span></div>"

Else
Response.Write "<meta http-equiv=refresh content='2;URL=../tries/show.asp'>"
Response.Write "<div align=center><font type=verdana><b>No ha sido editado correctamente.</b></div>"
Response.Write "<div align=center><font type=verdana><b>El ID <b><font color=red>" & ID & "</b></font> no es correcto, o no ha sido registrado previamente.</b></div>"
Response.Write "<br><br><div align=center><a href=javascript:history.go(-1); title='VOLVER ATRÁS'><b><font face='Flat Brush' color=#008080 style=font-size:10pt><u>Atrás</u></font></b></em></a></span></div>"
End If

'Cerramos el sistema de conexion
Conn.Close
%>

También quiero dejaros claro que los cuatro valores llegan perfectamente con el form, lo he comprobado en varias ocasiones, es decir, por coj..., el error está en este proceso, y estoy cegato.

Gracias.

PD. Por cierto jugando con quitar o poner comillas o comas, sólo gano que me pone:
-Too few parameters. Expected 3-
Pero sigue sin funcionar.

JuanRAPerez · #10 (**permalink**) 23/11/2005, 18:06

proba asi
me equivoque cerre antes

sql = "Update files Set fname= '" & fname & "' , lname= '"& lname &"' profesion= '" & profesion &"' Where ID='" & ID &"'"
Conn.execute (sql)

JuanRAPerez · #11 (**permalink**) 23/11/2005, 18:06

falto la coma de profesion

, profesion =

jejejejej

u_goldman · #12 (**permalink**) 23/11/2005, 18:14

No, asi como que poner todo el código para que te hagamos el trabajo, va a estar un poco difícil, volvemos al principio:

1. Debuguea, ya te mostramos como
2. Agrega comillas simples a los campos de texto
3. Verifica que tus campos se llamen de la misma manera como los estás llamando en tu sentencia.

Salu2,

wpp · #13 (**permalink**) 24/11/2005, 01:20

Ok.

1.- Hice debug y los cuatro valores se envían y recogen perfectamente en edit.asp
2.- Puse comillas simples en los form de texto.
3.- Todos los campos se llaman igual, fname, lname, profesion, ID.

Y con el último cambio que me dijísteis ahora me responde:

Microsoft OLE DB Provider for ODBC Drivers error '80040e10'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 3.

/triys/edit.asp, line 30

wpp · #14 (**permalink**) 24/11/2005, 14:33

Lo conseguí solucionar, gracias a todos.
Era problema de un nombre de la colección en la BD access.