کامپوننت Content Rotator (ASP 3.0)

مثال

component Content Rotator
هر زمانی که کاربر به یک صفحه یا آن را به‌روزرسانی می‌کند، این component رشته‌های محتوای HTML مختلف را نمایش می‌دهد.

ASP Content Rotator component

ASP Content Rotator component یک Objeckt ContentRotator ایجاد می‌کند، که هر زمانی که کاربر به یک صفحه یا آن را به‌روزرسانی می‌کند، یک رشته محتوای HTML مختلف نمایش می‌دهد. یک فایل متنی به نام Content Schedule File شامل اطلاعات مربوط به رشته‌های محتوایی است.

رشته‌های محتوایی می‌توانند شامل تگ‌های 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 component

روش توضیحات مثال
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"))
    %>
	

خروجی: