Hace lo siguiente:
agrega esta linea:
debug.print "SELECT * FROM COMERCIALIZADORES where EstadoComercializador =
'Habilitado' AND ProvinciaPertenece='" & comboprovincias.Text & "'"
Y fijate que te pone en la ventana de inmediato.
otra cosa, luego del open haces:
If rst.EOF = False Then
rst.MoveFirst
End If
Esto tiene sentido, solo se posicionará en eof luego del open se el
recordset esta vacio.
Fijate que retorna el Debug.print, incluso podes copiar el resulatdo y
tratar de ejecutarlo contra la database desde el analizador de consultas si
es SQL o como una consulta si es access.
Contame
Daniel Calvin
El 16 de enero de 2009 13:46, Eduardo - Los Tres Cerros Ltda. <
[email protected]> escribió:
> El Query es el siguiente:
>
>
>
> '****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' AND ProvinciaPertenece='" & comboprovincias.Text & "'", 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 = Nothing
>
> End Sub
>
>
>
>
>
>
>
> *Eduardo Acuña
> Jefe de Área Operativa*
>
> Los Tres Cerros Ltda.
> Paraguay 776 Piso 11 (1057)
> CABA Argentina
> 54-011-4312-8810
> [email protected]
> ------------------------------
>
> *De:* [email protected] [mailto:[email protected]] *En nombre de *Daniel
> Calvin
> *Enviado el:* Viernes, 16 de Enero de 2009 02:38 p.m.
> *Para:* vbusers List Member
> *Asunto:* [vbusers] Problemas con sintaxis
>
>
>
> Hola Eduardo
>
> Me parece que tu problema es otro, vb no es sensible may/min. Podes tener
> una variable declarada con ese nombre o mal escrito el nombre de la combo.
>
> Te recomeindo que le habilites a todos los modulos el *option explicit* y
> trates de compilar, ahi te va a decir claramente que te eta pasando, o
> debería....
>
> Fijate, si no es eso no se me ocurre... podes copiar las lineas donde armas
> el query para que lo veamos???
>
> Saludos
>
> Daniel Calvin
>
> 2009/1/16 Eduardo - Los Tres Cerros Ltda. <[email protected]>
>
> Hola a todos!
>
> Quisiera hacerles una consulta, tengo un form con varios combos, uno se
> llama comboProvincias, el problema es que al referenciarlo en una query, por
> alguna razon automáticamente se cambia a comboprovincias (p minúscula)
> entonces no me resuelve la Query.
>
> Alguien sabe que puede estar pasando?
>
> Saludos, buen finde y gracias a todos!
>
>
>
>
>
> *Eduardo Acuña
> Jefe de Área Operativa*
>
> Los Tres Cerros Ltda.
> Paraguay 776 Piso 11 (1057)
> CABA Argentina
> 54-011-4312-8810
> [email protected]
>
>
>
>
>
>
> --
> Daniel A. Calvin
> Cooperator Team Member
> http://www.cooperator.com.ar
> Microsoft Certified Professional
>
--
Daniel A. Calvin
Cooperator Team Member
http://www.cooperator.com.ar
Microsoft Certified Professional
