Eduardo
Ese texto lo saca de la combo, es el text correspondiente al item
seleccionado en el momento de invocar la función:
CargarListaComercializadores()
Asi que debe haber algo que te esta cambiando el select index de *
comboprovincias*.
Podrias para verificar hacer lo que te digo, en el evento click de
comboprovincias
hace un:
Debug.print comboprovincias.listindex, comboprovincias.text
asi veras si luego de la selección algo hace que cambie el listindex de tu
combo a 0, que debe ser el item que te esta tomando.
Daniel Calvin
El 16 de enero de 2009 14:05, Eduardo - Los Tres Cerros Ltda. <
[email protected]> escribió:
> La linea que me tira es esta: SELECT * FROM COMERCIALIZADORES where
> EstadoComercializador = 'Habilitado' AND ProvinciaPertenece='Seleccione
> Provincia'
>
> -Por lo que veo no me esta tomando el valor del combo donde selecciono la
> provincia.
>
> -Si ejecuto la consulta desde access, agregandole valor a la provincia, me
> retorna los valores correctamente.
>
>
>
>
>
> *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:53 p.m.
>
> *Para:* vbusers List Member
> *Asunto:* [vbusers] Problemas con sintaxis
>
>
>
> 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
>
--
Daniel A. Calvin
Cooperator Team Member
http://www.cooperator.com.ar
Microsoft Certified Professional
