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

احد يحلي هذا الخطأ

بدأه AiVoX في 22 مايو 2010 · 6 رد · 1,025 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اذا حبيت اضيف حقل آخر في البرنامج وضفه في القاعدة البيانات المصنوعة من اكسس

وطلعتلي هذه الرسالة

Conversion from type 'DBNull' to type 'String' is not valid.

ما معنى هذه الجملة مع العلم ان الحقل الذي اضفته نوعه text ??

Form3.TextBox7.Text = DataGridView1.SelectedRows(0).Cells("Address").Value

Form3.TextBox5.Text = DataGridView1.SelectedRows(0).Cells("Date").Value

Form3.TextBox6.Text = DataGridView1.SelectedRows(0).Cells("Price").Value

Form3.ComboBox1.Text = DataGridView1.SelectedRows(0).Cells("Area").Value

Form3.TextBox8.Text = DataGridView1.SelectedRows(0).Cells("phone_no").Value

ويطلعلي الايرور في آخر جملة اللي توني ضايفتها !

#2

أنت تحاول قراءة Value من النوع DBNull لتسندها إلى Text property وهذا خطأ.

#3
اقتباس
ويطلعلي الايرور في آخر جملة اللي توني ضايفتها !

السلام عليكم

حاول أن تدخل نص في الجدول الخاص بقاعدة البيانات ....

الرسالة معناها ان الحقل المضاف مؤخرا لا يحتوي على نص لذلك يجب ان تضيف نص ....

معالجتها اضف متغير من نوع Boolean او تضع نص في الجدول

او تضع هذه الجملة On Error Resume Next

كالتالي 

On Error Resume Next
Form3.TextBox7.Text = DataGridView1.SelectedRows(0).Cells("Address").Value
Form3.TextBox5.Text = DataGridView1.SelectedRows(0).Cells("Date").Value
Form3.TextBox6.Text = DataGridView1.SelectedRows(0).Cells("Price").Value
Form3.ComboBox1.Text = DataGridView1.SelectedRows(0).Cells("Area").Value
Form3.TextBox8.Text = DataGridView1.SelectedRows(0).Cells("phone_no").Value

رَبِّ لَا تَذَرْنِي فَرْداً وَأَنتَ خَيْرُ الْوَارِثِينَ

#4

بسم الله الرحمن الرحيم

اخى العزيز

ممكن تستخدم isnull

#5

أخي ممكن تضع هذا الكود وقت تعبئة البيانات في الداتا جريد ومعناه انه اذا غادر المؤشر الخلية المحددة التدي تحددها ولم يضع قيمة ووصل لاخر الصف يضيف صفر وهذا الكود يضع في الحدث Private Sub DataGridView1_CellLeave

[code If e.ColumnIndex = DataGridView1.Columns(7).Index Then
If DataGridView1.CurrentRow.Cells(4).Value = "" Then
DataGridView1.CurrentRow.Cells(4).Value = 0
End If] 

 If e.ColumnIndex = DataGridView1.Columns(7).Index Then
If DataGridView1.CurrentRow.Cells(4).Value = "" Then
DataGridView1.CurrentRow.Cells(4).Value = 0
End If
#6

شكرا انحلت المشكله بعد ما اضفت في القاعده بيانات في الحقل الجديد

#7

الحل هو ان تضيف tostring

Form3.TextBox7.Text = DataGridView1.SelectedRows(0).Cells("Address").Value.tostring

وما من كاتب إلا سيفني .. ويبقي الدهر ما كتبت يداه.

فلا تكتب بكفك غير شئ .. يسرك في القيامة ان تراه.

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