Ver Mensaje Individual
  #1 (permalink)  
Antiguo 05/08/2005, 09:55
Avatar de UID
UID
 
Fecha de Ingreso: febrero-2004
Ubicación: Villahermosa tabasco cent
Mensajes: 251
Antigüedad: 21 años, 2 meses
Puntos: 0
Error de lectura o duplicado? Ayuda.

Hola.. Bueno sere breve.
Tengo una base de datos en access.. uso el ADO para accesar a ella.
EL problema esta en que cuando quiero cargar una lista de nombres en un list1 me carga todos los nombres.. el problema que tengo es que los nombres estab duplicados por ejemplo tengo tres nombres asi:
cactus
cactus
cactus.
la darles click en cualquiera de los nombres me aparece la informacion de ellos pero la misma informacion se repite en las tres..a pesar de que las tres tienen diferente informacion.. cual es mi error o que tengo que hacer.. les dejo el codigo.

Con Este Se Carga en el list1 todos los nombres:


Código:
Private Sub Form_Load()
bd.Refresh
cont = bd.Recordset.RecordCount
For i = 1 To cont
List1.AddItem (bd.Recordset.Fields("pozo"))
bd.Recordset.MoveNext
Next
End Sub
Y con este se carga la informacion en un label1 o text1:
Código:
Private Sub List1_Click()
bd.Refresh
bd.Recordset.Find "pozo ='" & List1.Text & "'"
If Not (bd.Recordset.EOF) Then
   Text1.Text = bd.Recordset("observacion")
   lbregoexp.Caption = bd.Recordset("regoexp")
   lbbarra.Caption = bd.Recordset("barra")
   lbcaja.Caption = bd.Recordset("caja")
   lbpozo.Caption = bd.Recordset("pozo")
   lbmnemonico.Caption = bd.Recordset("mnemonico")
   Label4.Caption = bd.Recordset("actualizacion")
   Label2.Visible = True
  
   End If
    
End Sub
la base de datos esta asi:

Código:
Pozo       Observacion   Caja

cactus     pozo vacion   MPCS
cactus     pozo lleno      MPC
cactus     pozo sucio     MPCR
Se supone que deberia mostrar la descipcion de cada uno pero me muestra solo la informacion de uno en los tres.. espero haberme explicado.. si no diganme que onda e igual les mando el programa y el proyecto.
__________________
http://www.xpresatelibre.com La Xpresion Al Maximo Nivel