veran actualmente diseño un programita para llevar control de asistencias, pero sucede que cuando extraigo datos por medio de un combobox me pasa que por ejemplo:
al selecionar un nombre me extrae los datos y los muestra en unos text.text pero al selecionar otro nombre dejando los datos del nombre anterior se montan encima de los otros, y esto no me puede pasar porque el usuario si coloca un nombre que no es, y va a colocar otra que es la correcta va a suceder ese error
el codigo que utilice fue:
Set con = CreateObject("ADODB.Connection")
con.Open ("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & "C:\Documents and Settings\eparra01\Escritorio\asistencia\asis.mdb")
busca = Combo1.Text
SQL = "SELECT * FROM ANALISTA WHERE APELLIDOYNOMBRE LIKE '" & busca & "'"
Set RS = con.Execute(SQL)
Do While Not RS.EOF
Text1.Text = Text1.Text & RS("P00")
Text2.Text = Text2.Text & RS("CEDULA")
Text3.Text = Text3.Text & RS("CARGO")
Text4.Text = Text4.Text & RS("UNIDAD")
RS.MoveNext
Loop
atento a los comentarios.
