في مشاريع ASP الكبيرة ، تتضمن العديد من الصفحات وظيفة بدوره. إذا كتبت كل صفحة برنامج تحول الصفحة ، فإن هذا العمل سيقلل من كفاءة العمل ، ولن يكون مفضيًا إلى تعليمية المشروع ، ولا يمكن إعادة استخدام الكود. لذلك ، من الضروري تحديد وظائف مثل تحول الصفحة.
طريقة التصميم:
1. عند استدعاء هذه الوحدة ، تحتاج فقط إلى تمرير مجموعة السجلات وعدد السجلات المعروضة في كل صفحة ؛
2. يمكنك النقر فوق الرابط لتحويل الصفحة ، أو يمكنك إدخال رقم الصفحة مباشرة وتحويل الصفحة بعد الضغط ؛
3. لا تفكر في اسم الملف ، يمكن أن يكون البرنامج على الصفحة الحالية في كل مرة يتحول فيها.
بعد التفكير من خلال الأسئلة الثلاثة أعلاه ، يمكن أن تبدأ وحدة تحول صفحتنا العامة.
<٪
'++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
اسم الوحدة النمطية: الوحدة النمطية للصفحة العامة
'◆ اسم الملف: turnpage.asp
'◆ المعلمات الواردة: RS_TMP (مجموعة السجلات) ، pagesize (عدد السجلات المعروضة لكل صفحة)
'◆ الإخراج: صفحة السجلات بدوره بعرض وظيفة عرض
'++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
'
subturnpage (byrefrs_tmp ، pagesize) 'RS_TMP SET ؛ قم بتطوير عدد السجلات المعروضة لكل صفحة ؛
صفحات DimTotalPage'total
Dimpageno 'في أي صفحة يتم عرضها حاليًا
DimRecordCount'total عدد السجلات
rs_tmp.pagesize = pagesize
RecordCount = rs_tmp.recordCount
TotalPage = int (RecoutCount/pagesize*-1)*-1
Pageno = request.querystring ("Pageno")
قم بإدخال عدد الصفحات مباشرة إلى عدد الصفحات ؛
ifrequest.form ("pageno") <> "" thenpageno = request.form ("Pageno")
إذا لم يتم تحديد الصفحة ، فسيتم عرض الصفحة الأولى افتراضيًا ؛
ifpageno = "" thenpageno = 1
ifrecordCount <> 0then
rs_tmp.absolutepage = pageno
Endif
احصل على اسم الملف الحالي بحيث يتم تنفيذ كل صفحة على الصفحة الحالية ؛
dimfilename ، الموقف
filename = request.ServerVariables ("Script_Name")
postion = Instrrev (اسم الملف ، "/")+1
احصل على اسم الملف الحالي بحيث يشير رابط تحول الصفحة إلى الملف الحالي ؛
اسم الملف = منتصف (اسم الملف ، البريد)
٪>
<tableborder = 0width = '100 ٪'>
<tr>
<tdalign = left> إجمالي عدد الصفحات: <fontcolor =#ff3333> <٪ = totalpage ٪> </font> صفحة
الصفحة الحالية <fontcolor =#ff3333> <٪ = pageno ٪> </font>
<tdalign = "right">
<٪ ifrecordCount = 0ortotalPage = 1th
Response.write "الصفحة الرئيسية | الصفحة السابقة | الصفحة التالية | الصفحة الأخيرة"
آخر ٪>
<hhref = "<٪ = filename ٪>؟ pageno = 1"> home | </a>