ok ...subito....Public Class Macellazione
Private Sub Macellazione_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim instance As BindingSource
Dim value As IList
value = instance.List
DataSet1.Clear()
OleDbDataAdapter1.Fill(DataSet1)
Try
Me.Validate()
Me.BindingSource1.EndEdit()
Me.MacellazioneTableAdapter1.Update(Me.DataSet1.Cu stomers)
MsgBox("Update successful")
Catch ex As Exception
MsgBox("Update failed")
End Try
End Sub
End class
"non vi spaventate per la parola macellazione "

Rispondi quotando
