|
سنصمم في هذا الدرس صفحة باسم
(news_list.asp) تحتوي على قائمة بعناوين
الأخبار وأمام كل عنوان خياران أحدهما "تحرير" والآخر "مسح". سأقوم
الآن بعرض الـ Code
كاملا للصفحة ثم سأقوم بشرح الأوامر الجديدة التي لم
يسبق التطرق لها في الدروس السابقة - إن وجدت.
|
<%@ Language=VBScript CodePage =
"1256"%>
<html dir=rtl>
<!--#include file="connection.txt"
-->
<%
'أوامر
اختيار جدول الأخبار العامة واستدعاء البيانات
منه
selectnewsSQL="select * from general_news order by
add_dat desc"
set
rsnews=ADO.execute(selectnewsSQL)
'أوامر اختيار جدول
الأخبار التقنية واستدعاء البيانات
منه
selecttechSQL="select * from tech_news order by
add_dat desc"
set
rstech=ADO.execute(selecttechSQL)
%>
<p align="center"><b><font face="Simplified
Arabic" color="#C11111" size="7">
تحرير أو حذف أخبار</font></b></p>
<p><b><font
face="Simplified Arabic">قائمة الأخبار العامة</font></b></p>
<table
border="1"
cellpadding="0"
cellspacing="0"
style="border-collapse: collapse"
bordercolor="#111111"
width="100%"
id="AutoNumber1">
<tr>
<td
width="80%">
<p
align="center"><font
face="Simplified Arabic"><b>العنوان</b></font></td>
<td
width="10%"
align="center"><font
face="Simplified Arabic"><b>تحرير</b></font></td>
<td
width="10%"
align="center"><font
face="Simplified Arabic"><b>مسح</b></font></td>
</tr>
</table>
<%
'أوامر استعراض عناوين الأخبار
العامة
do while not
rsnews.eof
%>
<table border="1"
cellpadding="0"
cellspacing="0"
style="border-collapse: collapse"
bordercolor="#111111"
width="100%"
id="AutoNumber1">
<tr>
<td
width="80%">
<p
align="center"><font
face="Simplified Arabic"><b><%=rsnews("subject")%> </b></font></td>
<td
width="10%"
align="center"><font
face="Simplified Arabic"><a
href="news_upd.asp?id=<%=rsnews("id")%>"><b>تحرير</b></font></td>
<td
width="10%"
align="center"><font
face="Simplified Arabic"><a
href="news_del.asp?id=<%=rsnews("id")%>"><b>مسح</b></font></td>
</tr>
</table>
<%
rsnews.movenext
loop
%>
<p> </p>
<p><b><font
face="Simplified Arabic">قائمة الأخبار التقنية</font></b></p>
<table
border="1"
cellpadding="0"
cellspacing="0"
style="border-collapse: collapse"
bordercolor="#111111"
width="100%"
id="AutoNumber1">
<tr>
<td
width="80%">
<p
align="center"><font
face="Simplified Arabic"><b>العنوان</b></font></td>
<td
width="10%"
align="center"><font
face="Simplified Arabic"><b>تحرير</b></font></td>
<td
width="10%"
align="center"><font
face="Simplified Arabic"><b>مسح</b></font></td>
</tr>
</table>
<%
'أوامر استعراض عناوين الأخبار
التقنية
do while not
rstech.eof
%>
<table border="1"
cellpadding="0"
cellspacing="0"
style="border-collapse: collapse"
bordercolor="#111111"
width="100%"
id="AutoNumber1">
<tr>
<td
width="80%">
<p
align="center"><font
face="Simplified Arabic"><b><%=rstech("subject")%> </b></font></td>
<td
width="10%"
align="center"><font
face="Simplified Arabic"><a
href="tech_upd.asp?id=<%=rstech("id")%>"><b>تحرير</b></font></td>
<td
width="10%"
align="center"><font
face="Simplified Arabic"><a
href="tech_del.asp?id=<%=rstech("id")%>"><b>مسح</b></font></td>
</tr>
</table>
<%
rstech.movenext
loop
ADO.close
Set
ADO=Nothing
%>
</body>
</html> |
لم نقم بكتابة أي أوامر جديدة في هذه
الصفحة.. كل ما قمنا به هو الاتصال بقاعدة البيانات، وفتح جداول
الأخبار العامة والأخبار التقنية، ثم عرض عناوين الأخبار في جداول،
وأمام كل عنوان كلمتان: تحرير، حذف. ووضعنا روابط على هذه الكلمات.
فعند الضغط على "تحرير" ستفتح الصفحة news_upd.asp إن كان الأمر
لتحرير الأخبار العامة، أو ستفتح الصفحة tech_upd.asp إن كان التحرير للأخبار التقنية. وبالمثل فهنالك صفحتان
"للمسح" news_del.asp و
tech_del.asp كل واحدة تختص بقسم من
الأخبار.
لاحظ معي أنه عند كتابة الروابط لأوامر
التحرير والمسح تم إضافة ?id=<%=rstech("id")%> وهذا الأمر قد تم شرحه
سابقا عند تصميم صفحات عرض البيانات والأخبار. والمقصود به باختصار هو:
تحديد الخبر المراد تعديله أو حذفه، وذلك عن طريق إرسال قيمة
id للخبر للصفحة التي ستقوم بالعمليات.
الذي أود الإشارة إليه هنا، أنه بالإمكان عمل صفحة تحرير
واحدة لكلا النوعان، وصفحة مسح واحدة لكلا النوعان. لكن لرغبتي في
تصميم الموقع بأبسط صورة ممكنة ليمكن للمبتدئ متابعة الدروس بسهولة
قررت تصميم صفحة لكل قسم. وهذا يتيح المجال للمتعلم لبذلك جهد إضافي
بعد الانتهاء من الدروس لتطوير الموقع وتقليص عدد
صفحاته.
إعداد: خالد الحر
| 
