منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مشكلة في عمل ابديت لجدول بسبب التاريخ ارجو المساعدة - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مشكلة في عمل ابديت لجدول بسبب التاريخ ارجو المساعدة (/showthread.php?tid=36198)



مشكلة في عمل ابديت لجدول بسبب التاريخ ارجو المساعدة - stiger - 24-08-20

السلام عليكم احبائي 
عندي مشكلة في عمل ابديت لجدول بسبب التاريخ 
جملة الابديت دي
كود :
           cmd1 = New OleDbCommand("update Youm Set fr = " & new & " where youm = #" & SaleTime.Value.ToString("yyyy/MM/dd") & "#)", con)

و دي المشكلة 
[attachment=25506] 

ارجو المساعدة


RE: مشكلة في عمل ابديت لجدول بسبب التاريخ ارجو المساعدة - اسامه الهرماوي - 24-08-20

وعليكم السلام...
أولاً: تأكد من تنسيق التاريخ كما هو في الجهاز ثم تأكد من حقل التاريخ بأنه 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



RE: مشكلة في عمل ابديت لجدول بسبب التاريخ ارجو المساعدة - stiger - 24-08-20

المشكلة اني كل البرنامج شغال في التواريخ علي نفس التنسيق و كله تمام  #" & SaleTime.Value.ToString("yyyy/MM/dd") & "#
مش عارف ايه اللي حاصل بقي لما بعمل ابديت بشرط تطابق التاريخ
و كمان في الاكسس التنسيق مظبوط  yyyy/MM/dd

تم حل المشكلة بمراجعه الكود جيدا اكثر من مرة و جدت خطأ في الكتابة

شكرا