|
使用ACTIVEX成分(component)
ACTIVEX SERVER COMPONENTS扩展你的脚本程序以适应现在日益增长
的信息格式.比如数据库成分可以使脚本控制数据库.并且,无论何时
你想使用脚本来控制一个数据库,你都可以使用数据库成分.你不必为
此写混合的代码.你可以随时使用任何支持AUTOMATION的编程语言调用
数据库成分.在本单元中,你将学会如何在一个脚本文件中使用数据库
成分来使你的WEBSITE活动.
到现在,你应该学会如何建立基本的ASP文件,如果你还不知道,请去
单元一看看.
注意:为了更好的学习本章,你应该有一台安装有Asp的电脑.
课程一:
使用广告交换成分(AD ROTATOR)
在互联网络上常常保留一定的广告空间.为了使站点有动态特性并且
在一个很小的空间里显示更多的广告,你也许希望能动态循环地显示几组广告.使用AD
ROTATOR成分将很容易完成这个任务,并且将很容易添加新的内容.在本课中,你将建立一个脚本程序来调用AD
ROTATOR成分,这样可以循环地显示四个广告.
建立AD数据文件:
你将建立一个简单的文本文件来告诉Ad
Rotator哪些广告将被显示和它们的间隔时间.我们已经建立了一个这样的文件,请参考你们的课程目录下的Adrot.txt文件。
如果你没有安装ASP,那么你不可能看到这个文件,这里我给出此文件代码:
Adrot.txt
redirect /advworks/adredir.htm
width 460
height 60
border 1
/advworks/multimedia/images/ad_1.gif
http://www.microsoft.com
Astro Mt. Bike Company
20
/advworks/multimedia/images/ad_2.gif
http://www.microsoft.com
Arbor Shoes
20
/advworks/multimedia/images/ad_3.gif
http://www.microsoft.com
Clocktower Sporting Goods
30
/advworks/multimedia/images/ad_4.gif
http://www.microsoft.com
GG&G
30
文件分为几个段落,基本上每个段落表示了一个广告的信息。请看第一个段落.第一行设定用户选择广告时候调用哪一个脚本文件.在本例中,将使用Adredir.htm后面三行说明广告图的长度,宽度和边框的大小.接下去的几段,就是真正的广告信息。对于每个广告,包含了使用哪个图,用户去那个url,图的说明文字和图的间隔时间.
通过一个文本文件来维护广告信息,可以使别的部门在修改广告信息时不必通过你而修改asp文件.不同的部门可以使用不同的文本文件来包含不同的广告信息.
建立脚本:
1.打开你的文本编辑器
2.打开你的Ad.htm文件,并且在<!Turoual Lesson>后面加入新的代码：如果你没有Ad.htm，请参考下面的代码：
<%@ LANGUAGE =
VBScript %>
<HTML>
<HEAD>
<TITLE>Adventure Works Base Camp</TITLE>
</HEAD>
<BODY BACKGROUND="/advworks/multimedia/images/back_sub.gif" LINK="#800000"
VLINK="#008040">
<FONT FACE="MS SANS SERIF" SIZE=4>
<TABLE WIDTH=600 BORDER=0>
<TR>
<TD>
<IMG SRC="/advworks/multimedia/images/spacer.GIF" WIDTH=110>
</TD>
<TD COLSPAN=3>
<IMG SRC="/advworks/Multimedia/Images/BaseCComp.jpg" ALIGN=center BORDER=0
ALT="Base Camp"><BR>
<HR SIZE=4>
</TD>
</TR>
<TR>
<TD ROWSPAN=4 VALIGN=TOP ALIGN=LEFT>
<A HREF="/advworks/equipment/default.htm">
<IMG SRC="/advworks/multimedia/images/icon_sub_equipment.GIF" ALIGN=CENTER
BORDER=0 ALT="Equipment"></A><BR>
<A HREF="/advworks/excursions/default.htm">
<IMG SRC="/advworks/multimedia/images/icon_sub_excursions.GIF" ALIGN=CENTER
BORDER=0 ALT="Membership and Excursions"></A><BR>
<A HREF="/advworks/resources/default.htm">
<IMG SRC="/advworks/multimedia/images/icon_sub_resources.GIF" ALIGN=CENTER
BORDER=0 ALT="Resources"></A><BR>
<A HREF="/advworks/internal/default.htm">
<IMG SRC="/advworks/multimedia/images/icon_sub_internal.GIF" ALIGN=CENTER
BORDER=0 ALT="Internal"></A><BR>
<A HREF="/advworks/default.htm">
<IMG SRC="/advworks/multimedia/images/icon_sub_home.GIF" ALIGN=CENTER
BORDER=0 ALT="Home"></A><BR>
</TD>
<TD VALIGN=TOP ALIGN=LEFT>
<FONT FACE="ARIAL NARROW" SIZE=4>
<STRONG>
<A HREF="/advworks/excursions/excursions.htm">
<IMG SRC="/advworks/Multimedia/Images/bullet.gif" ALIGN=MIDDLE
BORDER=0>Excursions</A><BR>
<P>
<A HREF="/advworks/excursions/membership.htm">
<IMG SRC="/advworks/Multimedia/Images/bullet.gif" ALIGN=MIDDLE
BORDER=0>Membership</A><BR>
<P>
<A HREF="/advworks/excursions/trivia.htm">
<IMG SRC="/advworks/Multimedia/Images/bullet.gif" ALIGN=MIDDLE
BORDER=0>Climbing Games and Trivia</A><BR>
</STRONG>
</FONT>
<P>
</TD>
</TR>
<TR>
<TD>
<IMG SRC="/advworks/multimedia/images/spacer.gif" HEIGHT=10>
</TD>
</TR>
<!-- BEGIN advertisement -->
<TR>
<TD VALIGN=TOP ALIGN=LEFT>
<!--Tutorial Lesson: Start Browser Capabilities-->
<!--Tutorial Lesson: Ad Rotator-->
<!--Tutorial Lesson: End Browser Capabilities-->
<FONT FACE="MS SANS SERIF" SIZE=1><CENTER>
Billboard control provided by NCompass. Not for distribution or commercial
use.<P>
</CENTER></FONT>
</TD>
</TR>
<!-- END advertisement -->
<TR>
<TD COLSPAN=2 VALIGN=TOP ALIGN=LEFT>
<HR SIZE=4>
<FONT FACE="MS SANS SERIF" SIZE=1>
The names of companies, products, people, characters, and/or data mentioned
herein are fictitious and are in no way intended to represent any real
individual,
company, product, or event, unless otherwise noted.
<P>
<IMG SRC="/advworks/multimedia/images/ie_anim.gif" ALIGN=RIGHT>
<SUP>©</SUP>1996 Adventure Works<BR>
Photos Corbis and courtesy of REI<SUP>®</SUP>
</FONT>
</TD>
</TR>
</TABLE>
</FONT>
</BODY>
</HTML>
请加入代码
<% Set Ad = Server.CreateObject("MSWC.Adrotator") %>
4.为了取得AD.TXT的信息，使用AD成分内的GETADVERTISEMENT属性。将下面命令加入脚本：
<%= Ad.GetAdvertisement("/aspsamp/tutorial/lessons/adrot.txt") %>
GETADVERTISEMENT属性使用一个参数（提供信息的文件名字，在本例中使用ADROT.TXT）。
5。保存Ad.htm中的修改。就可以了。 |
