Foros del Web » Programación para mayores de 30 ;) » .NET »

S.O.S Analizar un Query para mostrar Seleccion Mysql-Vb

Estas en el tema de S.O.S Analizar un Query para mostrar Seleccion Mysql-Vb en el foro de .NET en Foros del Web. saludos a todos los genios de este foro. necesito una mano con un sistema que tengo. essta es mi base de datos: --para esto me ...
  #1 (permalink)  
Antiguo 17/01/2018, 11:02
Avatar de gnavarro82  
Fecha de Ingreso: noviembre-2012
Ubicación: Lima
Mensajes: 51
Antigüedad: 11 años, 5 meses
Puntos: 0
Sonrisa S.O.S Analizar un Query para mostrar Seleccion Mysql-Vb

saludos a todos los genios de este foro.
necesito una mano con un sistema que tengo.
essta es mi base de datos:


--para esto me dieron esta solucion:
Cita:
select t1.*, t2.apellido as chofer, t3.apellido as lider, t4.apellido as auxiliar from registroflota as t1
inner join personal as t2 on (t1.cod_chofer=t2.cod_personal)
inner join personal as t3 on (t1.cod_lider=t3.cod_personal)
inner join personal as t4 on (t1.cod_auxiliar1=t4.cod_personal)
Y ahora tengo este metodo que muestra en DataGrid una sentencia select.
ese metodo quiero agregar mi sentencia select anterior
Código:
Public Sub CargaTabla()
        MysqlConn = New MySqlConnection
        MysqlConn.ConnectionString = "server = localhost; user id=root; password=transat; database = transat"
        Dim SDA As New MySqlDataAdapter

        Dim bSource As New BindingSource
        Try
            Dim query As String
            query = "SELECT * FROM registroflota"
           Command = New MySqlCommand(query, MysqlConn) 
            'codigo para llenar el data gridviw
            SDA.SelectCommand = Command
            SDA.Fill(dbDataset)
            bSource.DataSource = dbDataset
            DataGridViewRF.DataSource = bSource
            SDA.Update(dbDataset)

        Catch ex As MySqlException
            MessageBox.Show(ex.Message)
        Finally
            MysqlConn.Dispose()

        End Try
    End Sub
ahora, lo que necesito es que en la parte del Query de visalB pueda colocar la nueva sentencia, no se como elaboar el query, por que de la forma en que lo tengo no lo detecta
Código:
Try
            Dim query As String
            query = 
           select t1.*, t2.apellido as chofer, t3.apellido as lider, t4.apellido as auxiliar from registroflota as t1
           inner join personal as t2 on (t1.cod_chofer=t2.cod_personal)
           inner join personal as t3 on (t1.cod_lider=t3.cod_personal)
           inner join personal as t4 on (t1.cod_auxiliar1=t4.cod_personal)
           Command = New MySqlCommand(query, MysqlConn) 
            'codigo para llenar el data gridviw
            SDA.SelectCommand = Command
            SDA.Fill(dbDataset)
            bSource.DataSource = dbDataset
            DataGridViewRF.DataSource = bSource
            SDA.Update(dbDataset)

        Catch ex As MySqlException
            MessageBox.Show(ex.Message)
        Finally
            MysqlConn.Dispose()

Última edición por gnavarro82; 17/01/2018 a las 15:07
  #2 (permalink)  
Antiguo 18/01/2018, 12:06
Avatar de gnavarro82  
Fecha de Ingreso: noviembre-2012
Ubicación: Lima
Mensajes: 51
Antigüedad: 11 años, 5 meses
Puntos: 0
Respuesta: S.O.S Analizar un Query para mostrar Seleccion Mysql-Vb

Solucion final
Cita:
query = "select t1.codregistro,t1.fecha, t2.placa as Placa, t3.apellidos as chofer, t4.apellidos as lider, t5.apellidos as auxiliar from registroflota as t1
inner join unidad as t2 on (t1.cod_unidad = t2.codunidad)
inner join personal as t3 on (t1.cod_chofer = t3.codpersonal)
inner join personal as t4 on (t1.cod_lider = t4.codpersonal)
inner join personal as t5 on (t1.cod_auxiliar1 = t5.codpersonal)"
gracias por su apoyo

Etiquetas: query, seleccion
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 06:51.