• Domingo 22 de Diciembre de 2024, 23:23

Autor Tema:  Error en sentencia SELECT  (Leído 1573 veces)

mexican2

  • Nuevo Miembro
  • *
  • Mensajes: 4
    • Ver Perfil
Error en sentencia SELECT
« en: Miércoles 5 de Noviembre de 2008, 22:25 »
0
Hola y Saludos

Hace tiempo que no entraba en el foro

Si me pueden ayudar con este ERROR cuando hago click en un combo
NOTA: el combo1.text se rellena con nombres y apellidos cuando inicia el Form_Load

este es el codigo:

Private Sub Combo1_Click()

Dim i As Integer

    SQL = "SELECT * FROM Personas WHERE Nombre = " & Trim(Combo1.Text) & ""

    Set rs = New ADODB.Recordset
    rs.Open SQL, cnn, adOpenForwardOnly, adLockReadOnly, adCmdText
    CostoCB(0).Text = rs!Precio1
    CostoCB(5).Text = rs!FechaDeAlta
End Sub


Y ME MARCA EL SIGUIENTE ERROR:

Error'-2147217900 (8004e14)' en tiempo de ejecucion:

Error de sintaxis (falta operador) en la expresion de consulta 'Nombre
= CF Carta'.

m0skit0

  • Miembro de PLATA
  • *****
  • Mensajes: 2337
  • Nacionalidad: ma
    • Ver Perfil
    • http://fr33kk0mpu73r.blogspot.com/
Re: Error en sentencia SELECT
« Respuesta #1 en: Jueves 6 de Noviembre de 2008, 08:34 »
0
Te faltan las comillas en Nombre = "CF Carta"

mexican2

  • Nuevo Miembro
  • *
  • Mensajes: 4
    • Ver Perfil
Re: Error en sentencia SELECT
« Respuesta #2 en: Jueves 6 de Noviembre de 2008, 17:04 »
0
Gracias m0skit0
Ya lo resolvi

El problema era que ponia el apostrofe en la sentancia SELECT  

SQL = "SELECT * FROM Personas WHERE Nombre = '" & Trim(Combo1.Text) & "'"