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:
también capturé la pantalla con le formulario y el error (1024multimedia.com.ar/formu.jpg - 1024multimedia.com.ar/error.jpg)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, "clientes") dgd_listado.DataSource = midataset dgd_listado.Refresh()
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. Me traen duda los ' ' en el texto que viene del combobox, puesto que es un string , aunque probé SIN ellos, y tampoco me funciona...
Algun voluntario que me tire un 'F1' ??
Gracias de antemano!