[اسامه الهرماوي]

وعليكم السلام...
أولاً: تأكد من تنسيق التاريخ كما هو في الجهاز ثم تأكد من حقل التاريخ بأنه Date/Time.

ثانياً: يمكنك إستعمال paremeter لهذه العمليه بسهولة, وهي كالتالي:

كود :

Dim Cmd As New OleDbCommand
With Cmd
.Connection = Con
"'"CommandType = CommandType.Text.CommandText = "Update TABLE1 Set youm= @youm Where youm='" & SaleTime.Value.ToString("yyyy/MM/dd") &
.Parameters.Clear()
.Parameters.AddWithValue("@youm", OleDbType.Date ).Value = SaleTime.Value.ToString

End With
If Con.State = 1 Then Con.Close()
COn.Open()
Cmd.ExecuteNonQuery()
COn.Close()
MsgBox("تم تعديل السجل بنجاح", MsgBoxStyle.Information, "تعديل")
Cmd = Nothing