كما نلاحظ بأعلى منتدانا وجود شريط متحرك خاص بالمواضيع الساخنة في المنتدى .. فكيف يتم ذلك ؟؟
هذا موضوع سهل جدا و موجه للمبتدئين كتدريب على أشكال العرض من قاعدة البيانات ..
هذا هو كل الكود لشريط التمرير :
Set conn = CreateObject("ADODB.Connection")
conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" & _
Server.MapPath("/marq/db/db.mdb"))
set rs=conn.Execute("SELECT * FROM config")
%>
while not rs.Eof
response.write ""
response.write rs("site") & _
" "
rs.MoveNext
Wend
%>خطوات العمل كالتالي :
انشاء مجلد للعمل و لنجعل اسمه marq .
إنشاء ملف لقاعدة البيانات في المجلد الفرعي db باسم db.mdb .
قاعدة البينات تحوي على جدول اسمه config به حقلان هما site و url كمثال لعرض مجموعة مواقع مع وصلات تؤدي لهم
حفظ الملف السابق بأي اسم .
شرح المثال ..
لو كنا كتبنا كود HTML كالتالي :
الحالة الأولى المدرسة العربية للويب الحالة الثانية المدرسة العربية للويب
لكان الكود الأول أظهر وصلة ثابتة تقوم بفتح نافذة جديدة تحمل ارتباط الموقع كعنوان لها .
و الحالة الثانية نفس الحالة الأولى إلا أن الفرق أن الوصلة الثانية ستظهر متحركة ..
اعتقد إذا فهمنا هذه الحالتين انحلت المشكلة ..
كل ما فعلناه بالكود الأصلي إذا هو عمل دوارة لاظهار جميع أسماء المواقع المخزنة في قاعدة البينات مع اظهارها
على شكل وصلات و جعل مسافات بينهما حتى لا تظهر ملتصقة بعضها ببعض ...
أتمنى أن تكون الفكرة قد وصلت ..
مع تحياتي للجميع ..