Hola gente... le cuento que estoy desarrollando un examen final para la facultad, y me trabé en lo más básico, una consulta
La idea es que en el formulario, segun el radiobutton checked, se utilice esa opcion de filtro, se mande la consulta y se muestren los datos en un datagrid.
Les pego el código:
Código:
Private Sub bt_listar_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles bt_listar.MouseUp
If rbt_cliente.Checked = True Then
consulta = "SELECT * FROM clientes WHERE cli_cliente = '" & combx_filtro.Text & "' INNER JOIN piezas ON clientes.cli_idcliente = piezas.pie_cliente"
Else
If rbt_prod.Checked = True Then
consulta = "SELECT * FROM productos WHERE pro_producto = '" & combx_filtro.Text & "' INNER JOIN piezas ON productos.pro_idproducto = piezas.pie_producto"
Else
If rbt_sist.Checked = True Then
consulta = "SELECT * FROM sistemas WHERE sis_sistema = '" & combx_filtro.Text & "' INNER JOIN piezas ON sistemas.sis_idsistema = piezas.pie_sistema"
Else
If rbt_ano.Checked = True Then
consulta = "SELECT * FROM piezas WHERE pie_ano = '" & combx_filtro.Text & "'"""
Else
MsgBox("Seleccione un filtro para listar.", MsgBoxStyle.Information, "Error")
Exit Sub
End If
End If
End If
End If
midataset.Clear()
adapter.SelectCommand.CommandText = consulta
adapter.Fill(midataset)
dgd_listado.DataSource = midataset
dgd_listado.Refresh()
también capturé la pantalla con le formulario y el error (1024multimedia.com.ar/formu.jpg - 1024multimedia.com.ar/error.jpg)
El tema es que me está dando error (famoso) de excepción no controlada cuando llega a cargar el dataset nuevamente.
Ahora bien: no estoy seguro si es error en la sintaxis de la consulta (aunque no creo). Me suena más a algun error de declaración de adpaters, datasets y esas cosas que "aprendimos de memoria"
Les dejo a disposicion el .VB como .txt en: 1024multimedia.com.ar/ABM.txt
Algun voluntario que me tire un 'F1' ??
(Por favor, tengo fecha de entrega 02/03/07 !
)
Gracias de antemano!
