listview

siosss
30 de Junio del 2005
hola!
necesito el codigo de cargar en un listview unos datos determinados de una bd acces. las columnas siempre son las mismas pero las filas depende del codigo q consulte.
necesito este codigo a poder ser usando datareader. solo kiero el codigo de la funcion cargar_listview para asi ponerlo en un modulo aparte y del los sub simplemente hacer llamadas a esa funcion.

alguien me lo puede facilitar?
gracias!

pd: kiero mas o menos lo mismo q esto(pero en vez de datagrid para listview)

Public Overloads Shared Sub Carga2(ByVal sql As String, ByVal tabla As String, ByVal dataG As DataGrid, Optional ByVal titulo As String = "")
Try
Dim DataAdapter As OleDbDataAdapter = New OleDbDataAdapter(sql, CadenaConexion2)

Dim MiData As DataSet = New DataSet
Dim datav As New DataView
DataAdapter.Fill(MiData, tabla)
datav.Table = MiData.Tables(tabla)
dataG.DataSource = datav
If titulo <> "" Then dataG.CaptionText = titulo
Catch Errores As Exception
MsgBox(Errores.ToString)
End Try
End Sub

+Pablo
30 de Junio del 2005
asi lleno y un combo espero te ayude
Dim drw1,drw2 As datarow
OleDbCommand1.CommandText = "SELECT TEC_Descripcion FROM TBL_Especializacion"
OleDbConnection1.Open()
OleDbDataAdapter1.Fill(dataset2)
ComboBox2.DataSource = DataSet2.tables(0)
ComboBox2.DisplayMember = Dataset2.Tables(0).columns("TEC_Descripcion").ToString()
OleDbConnection1.Close()


Private Sub ComboBox2SelectedIndexChanged(sender As System.Object, e As System.EventArgs)
PopulateTextBoxes1(ComboBox2.SelectedIndex)
End Sub

Sub PopulateTextBoxes1(ByVal RowID As Integer)
drw1 = Dataset2.Tables(0).Rows(RowID)

End Sub