Access - busqueda con sql

 
Vista:

busqueda con sql

Publicado por auro (8 intervenciones) el 17/04/2002 09:43:17
Necesito ayuda! Estoy haciendo una busqueda con sql, para que me busque en una tabla lo que voy seleccionando en combos de un formulario, pero como puede que en algunos combos no elija nada y esten vacios he puesto lo siguiente para comparar cada combo. El caso es que me da error me dice "pocos parametros se esperaba 1" que puede ser ? que tengo mal? por favor que alguien me ayude no se que hacer ya.

este es el codigo:

sql = "select maquinas.NumMaquina from maquinas where true"
If Form_FormBusquedaDeMaquinas.cmbRpm.Value <> "" Then
sql = sql & " and idRpm=" & Form_FormBusquedaDeMaquinas.cmbRpm.Value
End If
If Form_FormBusquedaDeMaquinas.cmbOrientEje.Value <> "" Then
sql = sql & " and [idOrientEje]=" & Form_FormBusquedaDeMaquinas.cmbOrientEje.Value
End If
If Form_FormBusquedaDeMaquinas.cmbMesaGiratoria.Value <> "" Then
sql = sql & " and [idMesaGiratoria]=" & Form_FormBusquedaDeMaquinas.cmbMesaGiratoria.Value
End If
----------------------------
AQUI SE PARA EL CODIGO Y DA EL ERROR
---------------------------
Set rstMaquinas = dbslocal.OpenRecordset(sql)
If rstMaquinas.NoMatch Then
'Form_FormResulIgual.lstMaquina = "Máquina no encontrada"
MsgBox "Máquina no encontrada", vbInformation, "Fin de Busqueda"
Else
While Not rstMaquinas.EOF
lista = lista & rstMaquinas("NumMaquina") & ";"
rstMaquinas.MoveNext
Wend
lstMaquina.RowSourceType = "Lista de valores"
lstMaquina.RowSource = UCase(lista)
End If
End Sub

GRACIAS DE ANTEMANO.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:busqueda con sql

Publicado por Victoria (1530 intervenciones) el 06/06/2002 11:18:25
Hola
Mira, en la variable sql te falta poner a que campo es igual true:
sql = "select maquinas.NumMaquina from maquinas where TuCampo=true"
Espero haberte solucionado algo
Victoria

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar