Ver Mensaje Individual
  #3 (permalink)  
Antiguo 20/10/2008, 01:56
Avellaneda
Colaborador
 
Fecha de Ingreso: enero-2008
Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 16 años, 4 meses
Puntos: 37
Respuesta: Varios Registros en TextBox

Cita:
Iniciado por _cronos_ Ver Mensaje
Hola amigos tengo la siguiente duda, que la consulta me liste los registros de un campo en un textbox multiline.

lo probe de la siguiente manera pero no me funciono

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.CursorType = adOpenStatic
rs.LockType = adLockReadOnly
rs.Open "SELECT Rol FROM datos", conn
Set Historial.DataSource = rs

Historial es el textbox

alguien sabe que puede faltar?

saludos.
Hola, faltaría asignar la propiedad "DataFied" al TextBox, pero aún así solamente mostraría el primer registro (aunque el TextBox sea multiline).

Puedes hacer algo como esto:

Código:
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
With rs
    .CursorLocation = adUseClient
    .CursorType = adOpenStatic
    .LockType = adLockReadOnly
    .Open "SELECT Rol FROM datos", conn
End With
Do Until rs.EOF
    Historial.Text = Historial.Text & rs!Rol & vbNewLine
    rs.MoveNext
Loop