تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
حصر عدد الرتب في التكست بوكس
#1
السلام عليكم

اخواني الكرام

أريد جميع الرتب الموجودة في قاعدة البيانات حتى اعرف عددها وتم توضيح ذلك في المشروع المرفق.

شاكر و مقدر لكم


الملفات المرفقة
.rar   WindowsLocasin.rar (الحجم : 118.92 ك ب / التحميلات : 37)
اللهم ارحم من أسس هذا المنتدى (اباليث) و أجعل كل علم نافع تعلمناه في هذا المنتدى أجر له و صدقة تنفعه في قبره
الرد }}}
تم الشكر بواسطة:
#2
PHP كود :
Using cm As New OleDbCommand("SELECT count(rotba) FROM Embo2018 where rotba='جندي'"Conn)
 
           If Conn.State ConnectionState.Closed Then Conn.Open()
 
           TextBox4.Text cm.ExecuteScalar
            If Conn
.State ConnectionState.Open Then Conn.Close()
 
       End Using

        Using cm 
As New OleDbCommand("SELECT count(rotba) FROM Embo2018 where rotba='جندي أول'"Conn)
 
           If Conn.State ConnectionState.Closed Then Conn.Open()
 
           TextBox5.Text cm.ExecuteScalar
            If Conn
.State ConnectionState.Open Then Conn.Close()
 
       End Using


        Using cm 
As New OleDbCommand("SELECT count(rotba) FROM Embo2018 where rotba='عريف'"Conn)
 
           If Conn.State ConnectionState.Closed Then Conn.Open()
 
           TextBox6.Text cm.ExecuteScalar
            If Conn
.State ConnectionState.Open Then Conn.Close()
 
       End Using

        TextBox7
.Text Val(TextBox4.Text) + Val(TextBox5.Text) + Val(TextBox6.Text


الملفات المرفقة
.zip   WindowsLocasin.zip (الحجم : 252.47 ك ب / التحميلات : 35)
الرد }}}
#3
ضع هذا الكود فى نهاية كود تحميل النموذج 


كود :
       TextBox4.Text = DataSet1.Tables("Embo2018").Compute("Count(rotba)", "rotba='جندي'")
       TextBox5.Text = DataSet1.Tables("Embo2018").Compute("Count(rotba)", "rotba='جندي أول'")
       TextBox6.Text = DataSet1.Tables("Embo2018").Compute("Count(rotba)", "rotba='عريف'")
       TextBox7.Text = DataSet1.Tables("Embo2018").Rows.Count
الرد }}}
#4
إذا أردت أن تكون الأمور ديناميكية فيجب أن تكون بهذا الشكل
أي بمعنى لن نقوم بتحديد رتبة في الكود , بل سنجلب كل رتبة موجودة في قاعدة البيانات , وبناءاً عليها مجموع تكرار هذة الرتبة

   



جملة الأستعلام جعلتها في سطر واحد لأنة لو قسمتها على أسطر سيظهر لديك خطأ
   



لدي في الـ Visual Studio 2017 أستطيع أن أكتب الجملة بهذا الشكل : هي نفس الجملة في الأعلى ولكن فقط موضوع ترتيب شكل الكود
   


الملفات المرفقة
.rar   WindowsLocasin v2.rar (الحجم : 1.73 م ب / التحميلات : 45)
الرد }}}
#5
ما شاء الله الاخوة ما قصرت

مبارك عليكم شهر رمضان
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: سعود , أبووسم
#6
اكواد الاتصال المتصل ساحبة تفكيري كلهSmile
 برضو كدا يمشي
PHP كود :
       TextBox4.Text DataSet1.Tables(0).Select("[rotba]='جندي'").Length
        TextBox5
.Text DataSet1.Tables(0).Select("[rotba]='جندي أول'").Length
        TextBox6
.Text DataSet1.Tables(0).Select("[rotba]='عريف'").Length 
الرد }}}
تم الشكر بواسطة: elgokr , elgokr , أبووسم , عبد العزيز البسكري
#7
جزاكم الله كل خير ، و الله يعجز لساني عن الثناء عليكم لوقفتكم الواحدة والتي تثلج الصدر لتواجدي في هذا المنتدى القيم ،

اسأل الله ان يحرم وجوهكم و وجه من أسس هذا المنتدى عن النار و أن يوفقكم لما يحب ويرضى
اللهم ارحم من أسس هذا المنتدى (اباليث) و أجعل كل علم نافع تعلمناه في هذا المنتدى أجر له و صدقة تنفعه في قبره
الرد }}}
تم الشكر بواسطة: سعود , عبدالله الدوسري


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تظليل التكست بوكس عند وضع المؤشر مصمم هاوي 2 159 02-03-24, 08:48 AM
آخر رد: مصمم هاوي
  بحث بالكومبو بوكس لا ى جزء من النص Lathe1 3 476 28-02-24, 02:59 AM
آخر رد: معاند الحظ
  كيف ارسل مجموع 3 تكست بوكس إلى واحد بالترتيب ؟ أبووسم 3 344 18-12-23, 05:17 PM
آخر رد: أبووسم
  [سؤال] توزيع الارقام على أكثر من تكست بوكس أبووسم 11 728 17-11-23, 12:04 AM
آخر رد: أبووسم
  كود تغيير قيمة تكست بوكس فى تاريخ معين Ahmed.vb 2 962 11-10-23, 10:35 PM
آخر رد: aljzazy
  [VB.NET] اريد كود البحث او الفلترة عن طريق تيكست بوكس و عرض النتيجة في داتا جريد فيو الحسين احمد 6 10,629 10-06-23, 01:01 PM
آخر رد: mahmoud mostafa 2023
  [VB.NET] إرسال البيانات من التكست بوكس إلى الداتا قريد أبووسم 5 739 28-04-23, 04:15 PM
آخر رد: أبووسم
  [VB.NET] محتاج كود اضهار مسج بوكس كل يوم سبت او احد mac9 8 845 27-03-23, 10:44 PM
آخر رد: sanyor77
  مشكلة في كومبو بوكس فراس محي 3 576 14-03-23, 06:40 PM
آخر رد: عضو جديد
  [VB.NET] راديو بوتن & شيك بوكس الزويي 2 501 19-01-23, 05:25 PM
آخر رد: الزويي

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم