الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كود التعديل

بدأه بت دفع الله في 16 أكتوبر 2012 · 1 رد · 500 مشاهدة · في ASP.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

Protected Sub Button5_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button5.Click

conn.Open()

Dim savinto As New OleDb.OleDbCommand

savinto.Connection = conn

savinto.CommandType = CommandType.Text

savinto.CommandText = " update Patient set Patient_name='" & TextBox2.Text & "', Mobile='" & TextBox3.Text & "', Email='" & TextBox4.Text & "', Address='" & TextBox5.Text & "', Age='" & TextBox6.Text & "', Date_tran='" & TextBox7.Text & "'"

savinto.ExecuteNonQuery()

MsgBox("ok that ")

conn.Close()

End Sub

عند تنفيذ الكود تظهر لي رسالة الخطأ التالية :

Conversion failed when converting datetime from character string.

#2

السلام عليكم ورحمة الله وبركاته

الرسالة تظهر عدم امكانية تحويل السلسلة النصية الموجودة داخل TextBox7 الى تاريخ

جرب هذا الكود بدل اللي عندك

Protected Sub Button5_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button5.Click
conn.Open()
Dim savinto As New OleDb.OleDbCommand
savinto.Connection = conn
savinto.CommandType = CommandType.Text
savinto.CommandText = " update Patient set Patient_name='" & TextBox2.Text & "', Mobile='" & TextBox3.Text & "', Email='" & TextBox4.Text & "', Address='" & TextBox5.Text & "', Age='" & TextBox6.Text & "', Date_tran=@dt1"
savinto.Parameters.Add("@dt1", OleDbType.Date).Value = dt1;
savinto.ExecuteNonQuery()
MsgBox("ok that ")
conn.Close()
End Sub

ويجب ان تراجع صيغة التاريخ من قاعدة البيانات لتعرف كيفية الادخال

بالتوفيق

تم تعديل هذه المشاركة بواسطة mallokbakkar1 في 16 أكتوبر 2012 في 22:17

1

مواضيع مشابهة