Visual Basic - Llenar datagridview net 2012 con varias tablas access

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

Llenar datagridview net 2012 con varias tablas access

Publicado por Maximiliano (2 intervenciones) el 27/11/2015 16:46:31
Hola, soy nuevo en el foro, espero no incomode esta pregunta pero no puedo lograr que funcione, estoy iniciándome en vb.net “2012” y necesito mostrar dos tablas en un datagrid, el código que arme es el siguiente:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Imports System.Data
Imports System.Data.OleDb
Public Class frmListaContratos
    Dim adaptador As New OleDbDataAdapter
    Dim registros As New DataSet
    Private Sub frmListaContratos_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        conectarse()
        LlenarGrid()
    End Sub
    Private Sub LlenarGrid()
        Dim consultar As String
        consultar = "SELECT a.id_alquiler,a.id_inmueble FROM alquileres a, clientes b WHERE a.idlocatario=b.id_clientes"
        adaptador = New OleDbDataAdapter(consultar, conexion)
        registros = New DataSet
        adaptador.Fill(registros, "alquileres") 'ACA SE DA EL ERROR NO SE COMO INDICAR LAS DOS TABLAS
        dgv1.DataSource = adaptador
        dgv1.DataMember = "alquileres"
    End Sub
End Class
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

Llenar datagridview net 2012 con varias tablas access

Publicado por Maximiliano (2 intervenciones) el 28/11/2015 00:20:26
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Imports System.Data
Imports System.Data.OleDb
Public Class frmListaContratos
    Dim adaptador As New OleDbDataAdapter
    Dim registros As New DataSet
    Private Sub frmListaContratos_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        conectarse()
        LlenarGrid()
    End Sub
    Private Sub LlenarGrid()
        Dim consultar As String
        consultar = "SELECT a.id_alquiler,a.id_inmueble FROM alquileres a, clientes b WHERE a.idlocatario=b.id_clientes"
        adaptador = New OleDbDataAdapter(consultar, conexion)
        registros = New DataSet
        adaptador.Fill(registros, "alquileres") 'ACA SE DA EL ERROR NO SE COMO INDICAR LAS DOS TABLAS
        dgv1.DataSource = registros
        dgv1.DataMember = "alquileres"
    End Sub
End Class
Esta solucionado, era un error en la linea 16
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar