SoloCodigo

Hola Compañeros
Bueno escrio solamente aver si me pueden ayudar mi problema es que
cuando selecciono una fila del datagrid para actualiza datos y cambio los datos y al momento
que le doy actualizar finge que actualiza pero en realidad no lo actualiza en la base de datos
este es mi codigo si me pueden ayudar porfavor
se los agradeceria
jajaja



CODIGO...
Try
            Dim pregunta As String
            pregunta = MsgBox("Desea Actualizar sus Datos", MsgBoxStyle.YesNo + MsgBoxStyle.Information, "ACTUALIZAR")

            If pregunta = vbYes Then
                Me.BindingContext.Item(Me.DsBuscar1.Empleados).EndCurrentEdit()
                Me.OleDbDataAdapter1.SelectCommand.CommandText = "UPDATE Equipos_Seguridad INNER JOIN (Empleados INNER JOIN [Entregado a] ON Empleados.No_Trabajador = [Entregado a].No_trabajador) ON Equipos_Seguridad.No_Equipo = [Entregado a].No_Equipo SET Empleados.[Nombre(s)] = " & Me.txtnombre.Text & ", Empleados.Apellido_Paterno = " & Me.txtapp.Text & ", [Entregado a].Fecha_Entrega = " & Me.DateTimePicker1.Text & ", [Entregado a].Cantidad = " & Me.txtCantiad.Text & ", Equipos_Seguridad.Nombre_Equipo = " & Me.txtNombreEquipo.Text & ""
                Me.DsBuscar1.Empleados.AcceptChanges()
                MsgBox("Datos Actualizados Perfectamente", MsgBoxStyle.Information, "ACTUALIZAR")

            ElseIf pregunta = vbNo Then
                Me.Close()
            End If
        Catch ex As Exception
            MsgBox("Error " + ex.ToString, MsgBoxStyle.Critical, "Error")
        End Try
        Me.DsBuscar1.Empleados.Clear()



GRACIAS
SALUDOS....

Gracias compañero me funciono de maravilla
gracias por tu ayuda
perdon en no contestarr
a qui estoy para ayudarte si puedo bye