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

عدد المشاركات

مغلق
بدأه أحمد عدلي في 28 يناير 2003 · 3 رد · 754 مشاهدة · في منتدى تصميم صفحات الويب
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

عندي جدولين الأول به أسماء الطلاب و بياناتهم و الثاني به بيانات المواد الدراسية

و كل طالب يدرس أكثر من مدة

وانا أريد ان احسب عدد المواد التي يدرسها كل صالب مع العلم ان اسم الطالب هو الذي يتكرر في جدول المواد

وانا اريد عمل استعلام يكتب في جدول اسم الطالب وبياناته (طبعا دي مقدور عليها :))

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

sql = "select * from students order by student.ID desc"

set rs = ADO.execute(sql)



studentID = rs("ID")



totalrs =  "select count(*) as total from sups where sups.student = "&studentID

    set rs2 = ADO.execute(totalrs)



do while not rs.EOF



response.write rs2("total")



rs.movenext

loop

و طبعا sups.studentهي الحقل الذي يحتوي على الاي دي الخاص بكل طالب في جدول المواد

#2

هذا الكود الصحيح (ان شاء الله) :

sql = "select * from students order by student.ID desc"

set rs = ADO.execute(sql)



studentID = rs("ID")



totalrs =  "select count(sups.student)  from sups where sups.student = "&studentID

    set rs2 = ADO.execute(totalrs)



do while not rs.EOF



response.write rs2("count(sups.student)")



rs.movenext

loop
#3

يمكنك استخدام استعلام به الشرط الذي تريده و في مثالك سيكون رقم الطالب و هو ال FK الذي يربطك بجدول الطلبة ... ثم تستخدم خصائص ال ADO لتقوم بعرض عدد السجلات(طبعا الاستعلام مع الشرط يظهر لك جدول وهمي شبية بالحقيقي لكن بعد انتقاء السجلات التي تطابق الشرط) ..

مثال :

totalrs =  "select count(sups.student)  from sups where sups.student = "&studentID

set rs=createObject("ADODB.recordset")

rs.open totalrs,connObj,3,3

response.write " The total records is :" & rs.recordCount

You can fly while you can touch the sky

#4 
sql = "select * from students order by student.ID desc"

set rs = ADO.execute(sql)

do while not rs.EOF

studentID = rs("ID")



totalrs =  "select count(sups.student)  from sups where sups.student = "&studentID

    set rs2 = ADO.execute(totalrs)







response.write rs2("count(sups.student)")

rs2.close

rs.movenext

loop

هذا الموضوع مغلق.

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