لتسهيل استخدام التصنيف، قمت بتحديد فئة جدول التصنيف، والحقول الموجودة بداخلها هي
المعرف (الرقم التلقائي) cat_name (اسم الفئة)parent_id (المعرف الأصلي، المطابق لمعرف هذا الجدول) cat_order (الترتيب) is_show (ما إذا كان سيتم عرضه) u_id (يتم استخدامه للتمييز ما إذا كانت فئة أخبار أم فئة منتج) ، أو فئات أخرى)، ولتسهيل الأمر، قمت بوضع كل هذه الفئات في هذا الجدول.
عند إضافة فئات للعملاء، كان هناك عدد كبير جدًا من الفئات عند عرضها في الأصل على مكتب الاستقبال، تم عرضها جميعًا، وكان ذلك طويلًا جدًا. قام العميل بطرح اقتراحات التعديل وطلب تغييرها للضغط على الفئة الكبيرة حتى يتم عرض فئاتها الفرعية كما يوجد خط منقط تحت كل فئة، ويوجد صورة زائد علامة أمام الفئة الكبيرة، والتي يجب أن تصبح علامة ناقص بعد التوسيع.
<النص البرمجي>
الدالة fd(المعرف، الأعداد)
{
t=$(c+id+_1).style.display;
إذا (ر==لا شيء)
{
t1=block;
t2=images/fll_34.gif;
}
آخر
{
t1=لا شيء;
t2=images/fll_34.gif;
}
ل(i=1;i<=num;i++)
{
$(c+id+_+i).style.display=t1;
$(d_+id).src=t2;
}
}
الدالة $(المعرف)
{
إرجاع document.getElementById(id);
}
</script>
هذا هو رمز فئة العرض غير المحدود لـ asp، ويضيف معرفات إلى هذه الفئات
<%
'الوظيفة: تصنيف عرض غير محدود لـ asp + عرض وإخفاء js
'المعلمات:parent_id هو المعرف الأصلي، والنمط هو الأخبار والمنتجات وفئات المقالات
'المقال الأصلي، يرجى الاحتفاظ ببعض المعلومات عند إعادة الطباعة، شكرًا لك
دالة cat111(parent_id,stype)
تعيين rs1 =server.createobject(adodb.recordset)
sql=select cat_name,cat_id,parent_id من الفئة حيث يتم ترتيبparent_id=&parent_id& وu_id=&stype& وis_show=1 حسب ترتيب cat_order تصاعديًا
تعيين rs1=conn.execute(sql)
إذا rs1.eof ثم
آخر
إذا (ديباث> 2) إذن
Display2=none
آخر
Display2=block
نهاية إذا
خافت ي
ي=1
تفعل في حين لا rs1.eof
cat_name1 = rs1(اسم_القطط)
cat_id1 = rs1(cat_id)
parent_id1=rs1(parent_id)
'******************ما يلي هو ****************** الذي تريد عرضه'
م9=0
sql2=اختر count(cat_id) كـ t من الفئة حيثparent_id=&cat_id1& وu_id=&stype&
تعيين rs2=server.createobject(adodb.recordset)
تعيين rs2=conn.execute(sql2)
إن لم يكن rs2.eof ذلك الحين
م9=RS2(ر)
آخر
م9=0
نهاية إذا
rs2.إغلاق
إذا (depath <= 2) ثم
mgif=images/-.gif
أ=block
آخر
إذا (م9>0) ثم
mgif=images/+.gif
آخر
mgif=images/-.gif
نهاية إذا
إذا (depath = 4) ثم
أ=block
آخر
أ=لا شيء
نهاية إذا
نهاية إذا
catstr=catstr & <tr id=c&parent_id&_&j& style=display:&a&><td width=25 align=center valign=middle class=dotted_class><img src=&mgif& width=12 height=11 id=d_&cat_id1&></td>< فئة td=dotted_class leftcatcss>
إذا (م9>0) ثم
catstr=catstr&<a href=javascript:void(0); _fcksavedurl=javascript:void(0); _fcksavedurl=javascript:void(0); onclick=fd(&cat_id1&,&m9&)> &vbnewline
آخر
catstr=catstr&<a href=products.asp?id=&cat_id1& target=_blank>&vbnewline
نهاية إذا
لأني = 1 إلى العمق
catstr=catstr&
التالي
catstr=catstr&cat_name1&</a></td></tr>&vbnewline
م9=0
sql2=select cat_name,cat_id من الفئة حيثparent_id=&parent_id1& وu_id=&stype& الترتيب حسب cat_order تصاعديًا
تعيين rs2=server.createobject(adodb.recordset)
تعيين rs2=conn.execute(sql2)
إن لم يكن rs2.eof ذلك الحين
ديباث=ديباث+4
استدعاء cat111 (cat_id1، stype)
نهاية إذا
rs2.إغلاق
تعيين rs2 = لا شيء
ديباث = ديباث-4
'******************ما ورد أعلاه هو ****************** الذي تريد عرضه'
ي=ي+1
rs1.movenext
حلقة
نهاية إذا
rs1.إغلاق
تعيين rs1=لا شيء
وظيفة النهاية
%>
قبل استخدام هذه الوظيفة أضف
كاتستر=
ثم اتصل مرة أخرى وأضف السطر المنقط التالي إلى dotted_class في CSS، وبذلك تكون قد انتهيت.
ملحوظة: ما تحصل عليه هنا هو صف جدول يجب تجميعه مع صفوف أخرى ولا يجب إضافته إلى td.