ASP Content Rotator 组件 (ASP 3.0)
ASP Content Rotator 组件
ASP Content Rotator 组件创建一个 ContentRotator 对象,每当访客进入网站或刷新页面时,该对象就会显示一段不同的内容字符串。
有关内容字符串的信息是包含在一个名为内容目录文件(Content Schedule File)的文本文件中。
内容字符串可包含 HTML 标签,这样您就可以显示 HTML 可呈现的任何类型的内容:文本、图像、颜色或者超链接。
语法
<%
Set cr=Server.CreateObject("MSWC.ContentRotator")
%>
Set cr=Server.CreateObject("MSWC.ContentRotator")
%>
ASP Content Rotator 实例
每当访客浏览网页时,下面的实例就会显示不同的内容。
首先,创建一个名为 "textads.txt" 的文本文件,并把它放置在名为 "text" 的子文件夹中。
"textads.txt":
%% #3
<h2>This is a great day!!</h2>
%% #3
<img src="smiley.gif">
%% #4
<a href="http://study.sucai8.cn">Visit W3CSchool.cc</a>
<h2>This is a great day!!</h2>
%% #3
<img src="smiley.gif">
%% #4
<a href="http://study.sucai8.cn">Visit W3CSchool.cc</a>
请注意在每个内容字符串起始位置的 # 号码。这个号码是一个可选的参数,用来指示 HTML 内容字符串的相对权重。在上面的文本文件中,Content Rotator 有十分之三的几率显示第一个内容字符串,有十分之三的几率显示第二个内容字符串,有十分之四的几率显示第三个字符串。
然后,创建一个 ASP 文件,并插入下面的代码:
实例
<html>
<body>
<%
set cr=server.createobject("MSWC.ContentRotator")
response.write(cr.ChooseContent("text/textads.txt"))
%>
</body>
</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")) %> 输出: This is a great day!! |