Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Por Favor Me Pueden Ayudar Con La Forma De Llenar Un Combo Box Con Gambas 2...
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Por Favor Me Pueden Ayudar Con La Forma De Llenar Un Combo Box Con Gambas 2.13 Y Postgresql 8.4 (ubuntu 9.1) 
 
Auxiilio pot favor, alguien por favor me puede decir porque no se cargan los datos de una tabla en un combo box. les dejo el codigo:

PUBLIC cn AS NEW Connection
PUBLIC rs AS Result

PUBLIC SUB Form_Open()
    ME.Center
    
    WITH cn
    .type = "postgresql"
    .host = "localhost"
    .login = "postgres"
    .password = "anagaha"
    .name = "fdch"
    
    TRY cn.OPEN
        IF ERROR THEN
            Message.Error("Error abriendo la base de datos!!!\n" & Error.Text)
            cn.Close
        ELSE
            'se selecciona los campos de la tabla que contiene la BD
            rs = cn.Exec("SELECT * FROM fdch_provincias")
            rs.MoveFirst
         END IF
    END WITH
END

PUBLIC SUB ComboBox1_GotFocus()
  DO WHILE rs.available 'aquí lleno el combo
     cbx_provincias.add(rs!Provincias)  'AQUI ME SALE UNKNOWN FIELD: PROVINCIAS, pero este campo forma parte de la tabla fdch_provincias
     rs.movenext
  LOOP
END
 



 
última edición por anahaga el Jueves, 04 Febrero 2010, 01:50; editado 2 veces 
anahaga - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Por Favor Me Pueden Ayudar Con La Forma De Llenar Un Combo Box Con Gambas 2.13 Y Postgresql 8.4 (ubuntu 9.1) 
 
Hola.
Lo que has puesto está mal.
Primero te conectas

public sub form_open()
Dim cn as new connection, Rs as result
Cn=Conectar() 'me conecto a la base de datos



Ahora lleno un result con los datos que quiero
Rs=cn.exec("SELECT * FROM fdch_provincias") 'ejecutar una consulta sobre esa conexión

Ahora recorro ese result de principio a fin
do while rs.available 'mientras haya registro disponible
   combo.add(rs!campo) 'añado el campo que quiero en el combo
   rs.movenext
loop 'cuando sale de aquí ya no hay mas registros
end


la función de conectar
private function Conectar() as connection 'función que establece una conexión y la devuelve
Dim Cn as new connection
cn.host=... 'los parámetros de conexión que sean
cn.user=...
cn.password=...
cn.type=...
cn.name=...

cn.open 'abrir la conexión
return cn 'devolver la conexión abierta
end

 



 
última edición por soplo el Jueves, 04 Febrero 2010, 04:18; editado 1 vez 
soplo - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Por Favor Me Pueden Ayudar Con La Forma De Llenar Un Combo Box Con Gambas 2.13 Y Postgresql 8.4 (ubuntu 9.1) 
 
Gracias, el codigo en si estuvo bien al parecer porque el mismo codigo le utilce para conectarle a una BD en MySql y funciono, claro cambiando:

.type = "postgresql"
.host = "localhost"
.login = "postgres"
.password = "anagaha"
.name = "fdch"

Por:

.type = "mysql"
.host = "localhost"
.login = "root"
.password = "useradmin"
.name = "fdch"
 



 
anahaga - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Actualizar Combo [Solved] BrunoIV General 1 Domingo, 13 Junio 2010, 06:49 Ver último mensaje
Invitado
No hay nuevos mensajes Ayuda Con Una Variable Por Favor...! Atacar General 4 Domingo, 25 Noviembre 2012, 12:56 Ver último mensaje
jguardon
No hay nuevos mensajes Un Cronómetro, Por Favor shordi General 4 Jueves, 06 Febrero 2014, 20:35 Ver último mensaje
shordi
No hay nuevos mensajes Dalton: Programa Para Ayudar A Los Daltoni... jsbsan Aplicaciones/Fragmentos de Código 5 Miercoles, 28 Febrero 2018, 21:36 Ver último mensaje
tincho
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario



  

 

cron