Consulta inner join VB
Me disculpas si te hago muchas preguntas pero deseo aprender y antes de hacerlas quemo un poco de neuraneas, a veces con resultado y a veces no.
Quiero hacer una consulta inner join a un trio de tablas. La idea es que cuando ingrese cualquier un numero de guía me traiga el destinatario, el producto, el estado y el mensajero que la lleva.
Actualmente tengo esto pero solo me consulta la el numero de guía.:
Function ConsultarGuia(ByVal guia As Integer)
Dim conMyData As SqlConnection
Dim strSql As String
strSql = "select NumeroGuia from Guia where NumeroGuia like '%" & guia & "%'"
'Conexión a la base de datos
conMyData = New SqlConnection(System.Configuration.ConfigurationManager.ConnectionStrings("StrCon").ConnectionString)
'
Try 'Control de errores
conMyData.Open()
'crea y ejecuta la consulta al sqldataadapter que devuelve registros
Dim sda As SqlDataAdapter = New SqlDataAdapter(strSql, conMyData)
'crea un nuevo dataset vacio
Dim ds As DataSet = New DataSet
sda.Fill(ds)
conMyData.Close()
Return ds
Catch ex As Exception 'Se produce error en el uso del procedimiento
Dim err As String
err = ex.Message
Return err
End Try
End Function
Si utilizo inner join seria algo asi? (Para no extenderme te resumo solo destinatario y guía)
StrSql = "select * from guia inner join destinatario on ... Aqui no se como ingresar el numero de guia para que lo consulte... Estoy leyendo unos tutoriales pero trabaja con valores ya registrados pero si apenas voy a ingresar un numero de guia tambien iria "like"?...
Quiero hacer una consulta inner join a un trio de tablas. La idea es que cuando ingrese cualquier un numero de guía me traiga el destinatario, el producto, el estado y el mensajero que la lleva.
Actualmente tengo esto pero solo me consulta la el numero de guía.:
Function ConsultarGuia(ByVal guia As Integer)
Dim conMyData As SqlConnection
Dim strSql As String
strSql = "select NumeroGuia from Guia where NumeroGuia like '%" & guia & "%'"
'Conexión a la base de datos
conMyData = New SqlConnection(System.Configuration.ConfigurationManager.ConnectionStrings("StrCon").ConnectionString)
'
Try 'Control de errores
conMyData.Open()
'crea y ejecuta la consulta al sqldataadapter que devuelve registros
Dim sda As SqlDataAdapter = New SqlDataAdapter(strSql, conMyData)
'crea un nuevo dataset vacio
Dim ds As DataSet = New DataSet
sda.Fill(ds)
conMyData.Close()
Return ds
Catch ex As Exception 'Se produce error en el uso del procedimiento
Dim err As String
err = ex.Message
Return err
End Try
End Function
Si utilizo inner join seria algo asi? (Para no extenderme te resumo solo destinatario y guía)
StrSql = "select * from guia inner join destinatario on ... Aqui no se como ingresar el numero de guia para que lo consulte... Estoy leyendo unos tutoriales pero trabaja con valores ya registrados pero si apenas voy a ingresar un numero de guia tambien iria "like"?...
4 Respuestas
Respuesta de Eduardo Saligari
1
Respuesta de jerryeagle
1
Respuesta de carloscharly
1
Respuesta de arkide