SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: mexican2 en Miércoles 5 de Noviembre de 2008, 22:25

Título: Error en sentencia SELECT
Publicado por: mexican2 en Miércoles 5 de Noviembre de 2008, 22:25

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'.

Título: Re: Error en sentencia SELECT
Publicado por: m0skit0 en Jueves 6 de Noviembre de 2008, 08:34

Te faltan las comillas en Nombre = "CF Carta"

Título: Re: Error en sentencia SELECT
Publicado por: mexican2 en Jueves 6 de Noviembre de 2008, 17:04

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) & "'"