منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] حقل من نوع Bit في قاعدة sql - نسخة قابلة للطباعة

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

حقل من نوع Bit في قاعدة sql - اسامه الهرماوي - 03-02-20

السلام عليكم...
سؤال بسيط:انا بستخدم كود الاستعلام وافراغ التيجة في التيسكت بوكس بالطريقة اللي في الكود.
بس واجهتني ان حقل الBit عايز اظهر نتيجتة في اداة checkbox فممكن ابدل Text باي امتداد.
كود :
 SQLstr = "SELECT * FROM users1 WHERE اسم_المستخدم = '" & T1.Text & "'"
           DataSet.Clear()
   Dim DataAdapter1 As New SqlDataAdapter(SQLstr, con)
           DataAdapter1.Fill(DataSet, "users1")
           اسم.DataBindings.Add("Text", DataSet, "users1.اسم_الموظف")
           اسم.DataBindings.Clear()

           checkbox1.DataBindings.Clear()
           checkbox1.DataBindings.Add("Text", DataSet, "users1.تسجيل_مرضي")


RE: حقل من نوع Bit في قاعدة sql - alsalamoni - 03-02-20

(03-02-20, 03:11 PM)اسامه الهرماوي كتب : السلام عليكم...
سؤال بسيط:انا بستخدم كود الاستعلام وافراغ التيجة في التيسكت بوكس بالطريقة اللي في الكود.
بس واجهتني ان حقل الBit عايز اظهر نتيجتة في اداة checkbox فممكن ابدل Text باي امتداد.
كود :
 SQLstr = "SELECT * FROM users1 WHERE اسم_المستخدم = '" & T1.Text & "'"
           DataSet.Clear()
   Dim DataAdapter1 As New SqlDataAdapter(SQLstr, con)
           DataAdapter1.Fill(DataSet, "users1")
           اسم.DataBindings.Add("Text", DataSet, "users1.اسم_الموظف")
           اسم.DataBindings.Clear()

           checkbox1.DataBindings.Clear()
           checkbox1.DataBindings.Add("Text", DataSet, "users1.تسجيل_مرضي")

بدل Text الى Checked

RE: حقل من نوع Bit في قاعدة sql - اسامه الهرماوي - 05-02-20

للأسف لم تفلح.

RE: حقل من نوع Bit في قاعدة sql - egypt 2020 - 05-02-20

(05-02-20, 12:55 AM)اسامه الهرماوي كتب : للأسف لم تفلح.

لو انا فاهم صح وانتا عايز قيمة الشيك تظهر من قاعدة البيانات حيث (تسجيل_مرضي.users1 ) هوا عمود القيمة true or false


كود :
If DataSet.Tables("users1").Rows.Count > 0 Then
               CHECK_ADDEMPLO.Checked = DataSet.Tables("users1").Rows(0)("users1.تسجيل_مرضي").ToString
               Exit Sub
           End If


RE: حقل من نوع Bit في قاعدة sql - اسامه الهرماوي - 06-02-20

السلام عليكم...
كلا الطريقتين صحيحتين ولكن عندي الجهاز فصل مرة واحدة ففقد مكتبات فكان بيعطي خطأ وانا شاكرا لكم اخواني الاعزاء.

RE: حقل من نوع Bit في قاعدة sql - egypt 2020 - 06-02-20

(06-02-20, 02:25 AM)اسامه الهرماوي كتب : السلام عليكم...
كلا الطريقتين صحيحتين ولكن عندي الجهاز فصل مرة واحدة ففقد مكتبات فكان بيعطي خطأ وانا شاكرا لكم اخواني الاعزاء.

خير إنشاء الله اهم شيء مشكلتك اتحلت .