السلام عليكم احبائي
عندي مشكلة في عمل ابديت لجدول بسبب التاريخ
جملة الابديت دي
كود :
cmd1 = New OleDbCommand("update Youm Set fr = " & new & " where youm = #" & SaleTime.Value.ToString("yyyy/MM/dd") & "#)", con)
و دي المشكلة
[
attachment=25506]
ارجو المساعدة
وعليكم السلام...
أولاً: تأكد من تنسيق التاريخ كما هو في الجهاز ثم تأكد من حقل التاريخ بأنه 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
المشكلة اني كل البرنامج شغال في التواريخ علي نفس التنسيق و كله تمام #" & SaleTime.Value.ToString("yyyy/MM/dd") & "#
مش عارف ايه اللي حاصل بقي لما بعمل ابديت بشرط تطابق التاريخ
و كمان في الاكسس التنسيق مظبوط yyyy/MM/dd
تم حل المشكلة بمراجعه الكود جيدا اكثر من مرة و جدت خطأ في الكتابة
شكرا