pero has analziado lo que haces alli, digo si cargas usando
data.Fill(ds)
como sabes que hay una tabla de nombre "Pedido" a la cual acceder
es mas si solo es una tabla porque suas un dataset, usa un datatable es mas directo
Dim data AsNew OleDbDataAdapter(cmd)Dim dt AsNew Data.DataTable data.Fill(dt)Me.ListViePedidos.Items.Clear()ForEach drw As DataRow In dt.Rows Dim item AsNew ListViewItem(CStr(drw("PEDIDO"))) item.SubItems.Add(CStr(drw("FECHA"))) item.SubItems.Add(CStr(drw("HORA"))) item.SubItems.Add(CStr(drw("DESCUENTO").ToString)) item.SubItems.Add(CStr(drw("TOTAL").ToString)) ListViePedidos.Items.Add(item) Next
compara esto que pongo aqui con lo que tienes
saludos
Leandro Tuttini
Blog
Buenos Aires
Argentina