[Hazem1]

بسم الله الرحمن الرحيم

الحمد لله البرنامج يعمل بشكل سليم ولكن في بعض الأحيان يتوقف زر الحفظ Save عند الضغط عليه ولا يقوم بحفظ البيانات ولا تظهر الرسالة المُعتاد 

علمًا بأني استخدم قاعدة بيانات أكسس، هل أقوم بتغيير شيء في الكود سواء بالأضافة أو التغيير والحذف لحل هذه المُشكلة وجزاكم الله خيراً  


الكود المُستخدم في الحفظ هو ما يلي : ،   

PHP كود :

​ 


PHP كود :

Private Sub Button3_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        On Error GoTo saveErr
        Table15BindingSource.EndEdit()
        Table15TableAdapter.Update(A18DataSet.Table15)

        Select Case MsgBox("Data saved successfully, Add New Data?", MsgBoxStyle.YesNo, ":::::::::: Save ::::::::::")
            Case MsgBoxResult.Yes

                TextBox1.Select()
                Table15BindingSource.AddNew()


            Case MsgBoxResult.No

                Me.Table15TableAdapter.Fill(Me.A18DataSet.Table15)
                With DataGridView1
                    .ClearSelection()
                    .ReadOnly = True
                    .MultiSelect = False
                End With

        End Select
saveErr:
        Exit Sub
    End Sub