Ver Mensaje Individual
  #2 (permalink)  
Antiguo 26/03/2010, 08:12
Phillip
 
Fecha de Ingreso: agosto-2008
Mensajes: 101
Antigüedad: 16 años, 6 meses
Puntos: 1
Respuesta: Consulta de Datos en Access desde VB 05

Hola Rafuru

Llenalo de esta forma:

Código PHP:

        Dim cnn 
As OleDb.OleDbConnection
        Dim cadenacon 
As String "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\ORDENES.mdb"
        
cnn = New OleDb.OleDbConnection
        cnn
.ConnectionString cadenacon
        cnn
.Open()
        
Dim sSQL As String " SELECT  cedula,nombre+ ' ' + apellidos as lista  FROM EMPLEADOS WHERE EMPLEADOS.cedula LIKE '%" TxtNombre.Text "%'   ORDER BY nombre"
        
Dim oDataSet As DataSet = New DataSet
        Dim oDataAdapter 
As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter
        Dim oCommand 
As OleDb.OleDbCommand = New OleDb.OleDbCommand
        oCommand
.Connection cnn

        oCommand
.CommandText sSQL
        oCommand
.CommandTimeout 120
        oDataAdapter
.SelectCommand oCommand
        oDataAdapter
.Fill(oDataSet"EMPLEADOS")

        
With ListBoxEmpleados
            
.DataSource oDataSet.Tables("EMPLEADOS")
            .
DisplayMember "lista"
       
        
End With 
De esta forma llenas comodamente tu ListBox, se ejecuta una consulta SQL que trae todos los que coincida con lo que se ingreso
en el TextBoxt TxtNombre.Text, en la consulta se concatena el nombre y el apellido y se guarda en una variable llamada "lista", esta variable concatenada en la que se mostrara en el ListBox.
Simplemente adaptalo a tus tablas.

Saludos

Última edición por Phillip; 26/03/2010 a las 08:18