Error al abrir recordset!!

[j.koroso]

Hola amigos!

Tengo un problema al abrr un recordset, con la sentencia sql.

sql = "SELECT Cod_Produc, Pre_Cat, Descripción, Medidas, Material FROM Productos"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, cn, adOpenDynamic, adLockOptimistic

así me coge todos los registros de la tabla y sin problemas, el problema es cuando quiero coger unos en concreto usando el WHERE

a="40 cm"
sql = "SELECT Cod_Produc, Pre_Cat, Descripción, Medidas, Material FROM Productos WHERE (Medidas="&a&")"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, cn, adOpenDynamic, adLockOptimistic

asi me da e siguiente error

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

[Microsoft][Controlador ODBC Microsoft Access] Error de sintaxis (falta operador) en la expresión de consulta '(Medidas=40 cm)'.

he intentado de muchas maneras y siempre me da error, supongo ke sera una tonteria pero soy nuevo no entiendo que falla, muchas gracias por vuestra ayuda

Saludos

Joseba

[JuanRAPerez]

40 cm

si solo fuera 40 (numeros) es valido no poner comillas simples, pero como es "40 cm" tu consulta tienen que ir asi

a="40 cm"
sql = "SELECT Cod_Produc, Pre_Cat, Descripción, Medidas, Material FROM Productos WHERE (Medidas='"&a&"')"

haz ese cambios y prueba

suerte