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] <blocked::mailto:[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
