[اسامه الهرماوي]

السلام عليكم...
سؤال بسيط:انا بستخدم كود الاستعلام وافراغ التيجة في التيسكت بوكس بالطريقة اللي في الكود.
بس واجهتني ان حقل ال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.تسجيل_مرضي")

[alsalamoni]

(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

[اسامه الهرماوي]

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

[egypt 2020]

(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

[اسامه الهرماوي]

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

[egypt 2020]

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

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