Bueno, voy al grano, estoy desarrollando una aplicacion en visual basic de gestion de cartera de clientes como herramienta para aprender bien VB6, pero me surge el siguiente problema al intentar hacer lo que sigue:
Tengo una base de datos enlazada mediante un DSN con varias tablas, dos de ellas son "Clientes" que tiene como caracteristica que cada vez que se añade un nuevo registro, un valor llamado [Bandera] se pone TRUE. y "Asistencias"
pues bien, en un determinado formulario, todo lo que añada quedara grabado en la tabla "Asistencias" pero en ese formulario hay un ComboBox (CClientes) que me gustaria que recuperase todos los nombres de los clientes de la tabla "Clientes" para que solo fuera necesario seleccionarlos.
Yo lo he planteado de la siguiente manera:
Código vb:
Ver original
Private Sub Form_Load() Set base = New Connection Set tabla = New Recordset Set tabla2 = New Recordset Set temp = New Recordset base.Open "dsn=data" tabla.Open "Asistencias", base, adOpenDynamic, adLockOptimistic tabla2.Open "Clientes", base, adOpenDynamic, adLockOptimistic With tabla2 If .BOF = False And .EOF = False Then .MoveFirst Do While Not .EOF If bandera = True Then CClientes.AddItem !Nombre .MoveNext Loop If bandera = False Then End If End If End sub
Esto seguramente esta mal, pero mas que darme cabezazos contra el teclado no hago, y no hay manera, he buscado por mil sitios y probado mil soluciones sin siquiera entenderlas, y tampoco.
Muchas gracias de antemano!
S4lu2!!!