Visual Basic - Combobox desde access con 2 condiciones

Life is soft - evento anual de software empresarial
 
Vista:

Combobox desde access con 2 condiciones

Publicado por Eduardo Acuña (1 intervención) el 21/01/2009 12:37:43
Hola a todos, les cuento que estoy en un problema en VB6, tengo una funcion que carga los valores de un combo desde una tabla de access segun cierta condicion. Hasta ahí funciona ok con la siguiente funcion:

'****Carga el Combo de Comercializadores****
Private Sub CargarListaComercializadores()
Dim cnn As ADODB.Connection
Set cnn = New ADODB.Connection
Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset
Dim n As Integer
n = -1

cnn.ConnectionString = StrConn
cnn.Open

rst.Open "SELECT * FROM COMERCIALIZADORES where EstadoComercializador = 'Habilitado'", cnn, adOpenDynamic, adLockOptimistic

If rst.EOF = False Then
rst.MoveFirst
End If

While Not rst.EOF
comboComercializador.AddItem rst.Fields("Comercializador").Value, n + 1
rst.MoveNext
Wend

Set rst = Nothing
Set cnn = N
'****FIN****

Y lo que estoy necesitando, es que ademas del filtro por 'Habilitado', me tome el valor de otro combo que tengo en el mismo form, y para mi la consulta queda así, pero al ejecutarla no me muestra valores:

SELECT * FROM COMERCIALIZADORES where EstadoComercializador = 'Habilitado' AND ProvinciaPertenece = '" & comboProvincias.Text & "'"

Alguien podrá tener idea que ocurre?
Saludos y muchas gracias!!!
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:Combobox desde access con 2 condiciones

Publicado por P3L30N2009 (699 intervenciones) el 21/01/2009 22:26:56
no te muestra valores, qué quiere decir? que el recordset no arroja ningún resultado, o que dá algún error?

¿has verificado que haya realmente algún registro que cumpla ambas condiciones?
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