[mostafa12]

انا مستعمل داله الحفظ بجميع الفورم وتعمل 100 بلميه

Sub save_date()
Dim save As New OleDbCommandBuilder(da)
save.QuotePrefix = "["
save.QuoteSuffix = "]"
da.Update(dt)
dt.AcceptChanges()
End Sub