ASP Content Rotator 组件 (ASP 3.0)

Isis ·
更新时间:2024-09-21
· 830 次阅读

ASP Content Rotator 组件 (ASP 3.0) ASP Content Rotator 组件

ASP Content Rotator 组件创建一个 ContentRotator 对象,每当访客进入网站或刷新页面时,该对象就会显示一段不同的内容字符串。

有关内容字符串的信息是包含在一个名为内容目录文件(Content Schedule File)的文本文件中。

内容字符串可包含 HTML 标签,这样您就可以显示 HTML 可呈现的任何类型的内容:文本、图像、颜色或者超链接。

语法 <%
Set cr=Server.CreateObject("MSWC.ContentRotator")
%>
ASP Content Rotator 实例

每当访客浏览网页时,下面的实例就会显示不同的内容。

首先,创建一个名为 "textads.txt" 的文本文件,并把它放置在名为 "text" 的子文件夹中。

"textads.txt":

%% #3

This is a great day!!


%% #3

%% #4
Visit RUNOOB

请注意在每个内容字符串起始位置的 # 号码。这个号码是一个可选的参数,用来指示 HTML 内容字符串的相对权重。在上面的文本文件中,Content Rotator 有十分之三的几率显示第一个内容字符串,有十分之三的几率显示第二个内容字符串,有十分之四的几率显示第三个字符串。

然后,创建一个 ASP 文件,并插入下面的代码:

实例

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



ASP Content Rotator 组件的方法
方法 描述 实例
ChooseContent 获取并显示某个内容字符串。 <%
dim cr
Set cr=Server.CreateObject("MSWC.ContentRotator")
response.write(cr.ChooseContent("text/textads.txt"))
%>

输出:
Smiley

GetAllContent 取回并显示文本文件中所有的内容字符串。 <%
dim cr
Set cr=Server.CreateObject("MSWC.ContentRotator")
response.write(cr.GetAllContent("text/textads.txt"))
%>

输出:

This is a great day!!

Smiley

Visit RUNOOB




content ASP

需要 登录 后方可回复, 如果你还没有账号请 注册新账号