مكون ASP Content Rotator (ASP 3.0)

مثال

مكون Content Rotator
يعرض المكون النصوص HTML المختلفة كلما زار المستخدم أو قام بتحديث الصفحة.

مكون ASP Content Rotator

يخلق مكون ASP Content Rotator عنصر ContentRotator، ويتم عرض سلسلة نصوص HTML مختلفة كلما زار المستخدم أو قام بتحديث صفحة.

يمكن أن تحتوي سلاسل النصوص على علامات HTML، مما يتيح لك عرض أي محتوى يمكن أن يتمثل به HTML: نصوص، صور، ألوان أو روابط.

النحو

<%
Set cr=Server.CreateObject("MSWC.ContentRotator")
%>

عندما يزور المستخدم صفحة ويب، يتم عرض محتوى مختلف في هذا المثال. أولاً، قم بإنشاء ملف "textads.txt" في مجلد فرعي "text" في مجلد جذر الموقع.

"textads.txt":

%% #1
هذا يوم عظيم!!
%% #2 
<h1>Smile</h1>
%% #3
<img src="smiley.gif">
%% #4
هذا رابط <a href="http://www.codew3c.com">رابط</a>

ملاحظة:رقم #المستوى في بداية كل سلسلة نصوص محتوى. هذا الرقم هو متغير اختياري، ويستخدم لتحديد وزن النصوص HTML بشكل نسبي. في هذا المثال، Content Rotator لديه فرصة واحدة من عشرة لعرض النص الأول، وفرصة اثنتين لعرض النص الثاني، وفرصة ثلاثة لعرض النص الثالث، والنص الرابع له فرصة أربعة.

ثم، قم بإنشاء ملف ASP، وأضف الكود التالي:

<html>
<body>
<%
set cr=server.createobject("MSWC.ContentRotator")
response.write(cr.ChooseContent("text/textads.txt"))
%>
</body>
</html>

طريقة مكون ASP Content Rotator

الطريقة وصف مثال
ChooseContent الحصول وتظهر سلسلة نصوص معينة 
	<%
    dim cr
    Set cr=Server.CreateObject("MSWC.ContentRotator") 
    response.write(cr.ChooseContent("text/textads.txt"))
    %>

الناتج:
GetAllContent استرجاع وتظهر جميع سلاسل النصوص في ملف النصوص 
	<%
    dim cr
    Set cr=Server.CreateObject("MSWC.ContentRotator") 
    response.write(cr.GetAllContent("text/textads.txt"))
    %>

الناتج: