Quería proponer lo siguiente, a ver cuál de las opciones piensan que que puede tener una respuesta más rápida:
OPCION 1
Código vb.net:
OPCION 2Ver original
Public Function Lista1() As DataTable Dim sSQL As String = "SELECT * FROM Clientes" Dim dA As New SqlDataAdapter(sSQL, Conn) Dim dS As DataSet dA.Fill(dS, "Clientes") Return dS.Tables("Clientes") End Function
Código vb.net:
Ver original
Public Function Lista2() As List(Of DetallesCliente) Dim sSQL As String = "SELECT * FROM Clientes" Dim cM As New SqlCommand(sSQL, Conn) Dim misClientes As New List(Of DetallesCliente) Dim miCliente As DetallesCliente Conn.Open() Dim dR As SqlDataReader = cM.ExecuteReader While dR.Read miCliente = New DetallesCliente miCliente.Id = dR("Id") miCliente.Nombre = dR("Nombre") miCliente.Apellidos = dR("Apellidos") misClientes.Add(miCliente) End While Return misClientes End Function
Muchas gracias por sus opiniones.
Saludos.