السلام عليكم
عندي مشكلة في التعامل مع check box
فعندما عملت Data binding للكونترول check box أصبحت عندي مشكلة وهي عدم قدرتي على إدخال البيانات وتظهر رسالة تفيد بعدم القدرة على إدخال القيمة null في الحقل الذي هو عبار عن PK
وعندما لغيت هذا الكونترول check box من الفورم ذهبت تلك المشكلة.
أتمنى أن أجد عندكم الحل
ردوا عليه بسرعة أرجوكم
صدقوني بحث كثيرا في المنتدى ولم أجد مرادي .. شكر الله لكم
السلام عليكم ورحمة الله وبركاته
check box = pk :blink:
:unsure: :wacko: <_< :s B)
اول حاجة CheckBox بيرجع Boolean يعنى False او True
وحتى لو عملنا Convert ليها
Dim Check As Int32 Check = System.Convert.ToInt32(Me.CheckBox1.Checked)
هيرجع 0 او 1
{وَاتَّقُواْ يَوْمًا تُرْجَعُونَ فِيهِ إِلَى اللّهِ ثُمَّ تُوَفَّى كُلُّ نَفْسٍ مَّا كَسَبَتْ وَهُمْ لاَ يُظْلَمُونَ} (281) سورة البقرة
أنا راح أوضح أكتر
تخيل أنك تملك جدول موجود على sqlserver وبه حقلين الأول رقم الهوية وهو عبارة عن PK والثاني حقل صح أم خطأ يعني booleen وطبعا نوعه سيكون Bit
الآن بواسطة الويزارد للسرعة إختر داتا فورم جديد من خلال vb.net ثم بعد تصميمه شغل البرنامج وحاول أن تعمل إضافة سجل جديد Add
عند هذه النقطة يتم رفض فتح سجل جديد وتظهر لي رسالة تفيد بأنه لايمكن تخزين القيمة null في رقم الهوية مع أني مازلت لم أبدأ الإدخال أصلا
وعندما ألغيت ربط حق ال booleen بالcheck box أي أصبح unbound عندها إشتغل البرنامج واستطعت إضافة سجلات جديدة
إذا كان الموضوع غير واضح أبلغوني بذلك حتى أرفق نسخة من المشروع
يعطيك ألف عافية أخي waleedhm وجزاك الله خيرا
السلام عليكم
من الواضح ان فى مشكلة فى المنتدى فى الملف المرفق
على العموم الكود التالى لعملية الحفظ
اول حاجة اعمل مشروع جديد
اضف TextBox وCheckBox وButton
اضاف الكود التالى
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim con As New SqlClient.SqlConnection("workstation id=WALEEDHM;packet size=4096;integrated security=SSPI;data source=localhost;persist security info=False;initial catalog=Northwind")
Dim Check1 As Int32
Check1 = System.Convert.ToInt32(CheckBox1.Checked)
Dim cmd As New SqlClient.SqlCommand
cmd.Connection = con
Try
If con.State <> ConnectionState.Open Then
con.Open()
Dim sql As String = "INSERT INTO Products([ProductName],[Discontinued])VALUES ('" & Me.TextBox1.Text.Trim & "', '" & Check1 & " ' )"
cmd.CommandText = sql
cmd.ExecuteNonQuery()
MsgBox("Adding is successful", MsgBoxStyle.Exclamation, "Products")
Me.TextBox1.Text = ""
Me.TextBox1.Focus()
CheckBox1.Checked = False
con.Close()
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
con.Close()
End Try
End Sub{وَاتَّقُواْ يَوْمًا تُرْجَعُونَ فِيهِ إِلَى اللّهِ ثُمَّ تُوَفَّى كُلُّ نَفْسٍ مَّا كَسَبَتْ وَهُمْ لاَ يُظْلَمُونَ} (281) سورة البقرة
الملف المرفق من الاخ waleedhm
Technical Lead Developer
اللهم قنى شر الجهل و الجهلاء
( اقْتَرَبَ لِلنَّاسِ حِسَابُهُمْ وَهُمْ فِي غَفْلَةٍ مَّعْرِضُونَ ) {الأنبياء:1}
وعليكم السلام
وعليكم السلام
وعليكم السلام
أه أه أه
جزاك الله خير waleedhm فعلا لقد استفدت من طريقتك في تخزين قيمة الcheck box وأخذت من وقتك الكثير
ولكن عندي استفسار وهو كيف سأعرض قيمة ال checkbox على الفورم أثناء إستعراض المستخدم للبيانات بينما الcheck box يعتبر unbound أي غير مربوط بالحقل في الجدول (بدون data binding)
هل أيضا سأستخدم الكود في ذلك وكلما انتقل المستخدم لسجل آخر أعيد الكرة واستخرج قيمة الcheck box بالكود ؟
ملاحظة: العزيز طارق إبراهيم الملف المرفق يوجد مشكلة في تحميله أتمنى تصحيح الخطأ
تم التحميل بنجاح
للرفع
مازالت المشكلة قائمة ولم يجبني أحد إجابة كافية
السؤالكما سبق :
تخيل أنك تملك جدول موجود على sqlserver وبه حقلين الأول رقم الهوية وهو عبارة عن PK والثاني حقل صح أم خطأ يعني booleen وطبعا نوعه سيكون Bit
الآن بواسطة الويزارد للسرعة إختر داتا فورم جديد من خلال vb.net ثم بعد تصميمه شغل البرنامج وحاول أن تعمل إضافة سجل جديد Add
عند هذه النقطة يتم رفض فتح سجل جديد وتظهر لي رسالة تفيد بأنه لايمكن تخزين القيمة null في رقم الهوية مع أني مازلت لم أبدأ الإدخال أصلا
وعندما ألغيت ربط حق ال booleen بالcheck box أي أصبح unbound عندها إشتغل البرنامج واستطعت إضافة سجلات جديدة
هذا الموضوع مغلق.