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