Mensajes

muchas gracias por tu aporte me funciono barbaro

MUY BUENAS NOCHES ME LLAMO JOSE Y TENGO UN PROBLEMA AL TRABAJAR CON VB 2008 EXPRESS EDITION
EL PROYECTO QUE ESTOY DESARROLLANDO CONSISTE EN DAR DE ALTA Y BAJA UNOS EQUIPOS POR LO QUE HICE PRIMERAMENTE UNA BD EN ACCESS E HICE LA CONEXION EN VB, PARA INSERTAR REGISTROS NO TUVE PROBLEMA EL PROBLEMA COMENZO CUANDO ELIMINO LOS REGISTROS, PARA ELIMINAR LOS REGISTROS TENGO UN FORMULARIO CON UN DATAGRIDVIEW UN DATA SET UN BINDING SOURCE Y UN TABLE ADAPTER , CUANDO SELECCIONO LA FILA A ELIMINAR Y DOY CLICK EN EL BOTON "DAR DE BAJA" LO ELIMINA PERFECTAMENTE DE LA BASE DE DATOS ACCESS PERO NO DEL DATAGRIDVIEW EH INTENTADO VARIOS CODIGOS PERO NO ACTUALIZA EL DATAGRIDVIEW DESPUES DE ELIMINAR EL REGISTRO

ESTE ES EL CODIGO QUE UTILIZO PARA ELIMINAR UN REGISTRO
If MsgBox("¿Esta seguro que desea quitar este consumible?", MsgBoxStyle.YesNo + MsgBoxStyle.Question, "Baja Consumibles") = MsgBoxResult.Yes Then
            Dim cnn As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Jose Luis\Documents\Visual Studio 2008\Projects\CONTROL DE INVENTARIOS\CONTROL DE INVENTARIOS\Consumibles Sicori.accdb;Persist Security Info=False")
            cnn.Open()
            Dim q As String
            Dim id, exis As Integer
            Dim infox As OleDb.OleDbCommand
            q = "delete  from Consumibles where Id='" & TextBox1.Text & "'"
            infox = New OleDb.OleDbCommand(q, cnn)
            infox.ExecuteNonQuery()
            infox.Connection.Close()
            MsgBox("El Consumible se elimino correctamente", MsgBoxStyle.OkOnly + MsgBoxStyle.Information, "Baja de Consumibles")
            TextBox1.Clear()

AGRADECERIA MUCHO QUE ME AYUDARAN PARA ACTUALIZAR EL DATAGRIDVIEW DESPUES DE ELIMINAR UN REGISTRO GRACIAS