ASP教程第五章

合集下载

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

5.2 任务5-1：广告轮显网页——广告轮显组件Ad
Rotator
（5）启动浏览器，在地址栏输入： http://LocalHost/ASPE/CH05/Task5_1/Task5_1.ASP后按回车键，将会出现类似于如图5-4所示的显示广告图片网页。此时单击图片会跳转到与该广告图片对应的网站，但单击广告图片下面的超链接，依然显示不出广告被点击的次数。（6）再次启动记事本，在其中输入如下代码，并把它保存到D:\ASPExample\ch05\Task5_1文件夹下，取名为Task5_1_HitsNum.asp，该文件为显示广告点击次数网页文件。
•广告轮换计划文件的一般格式如下：
Redirection 广告网页重定向文件URL Width m （图片的宽度，以像素为单位，默认值为440像素） Height n （图片的高度，以像素为单位，默认值为60像素） Border k （图片边框的宽度，默认值为1，无边框时，值为0） * 广告1图片文件名广告1客户网页的URL 广告1说明文本广告1出现次数比例广告2图片文件名广告2客户网页的URL 广告2说明文本广告2出现次数比例 ……
5.2 任务5-1：广告轮显网页——广告轮显组件Ad
Rotator

任务5-1描述：编写一个网页，用来为丰田花冠汽车、惠普打印机和超级女生娱乐频道做广告，当用户打开该网页时，随机显示相应的广告图片，广告图片的显示总体次数比例为1（花冠汽车）：2（惠普打印机）：1（超级女生）。在浏览器中浏览该广告网页时，首先将会出现如图5-4所示的显示广告图片的页面（每次访问显示的图片可能不同），单击图片将会跳转到相应的网页。单击“显示广告点击次数”超链接，将会出现如图5-5所示的显示广告点击次数网页，在该网页中显示出每一幅的广告被点击的总次数。
ASP动态网页设计
本章任务：

广告轮显与点击次数统计。图书馆新书通报。馆长意见簿。
本章要点：

广告轮显组件Ad Rotator的作用及使用方法。文件超链接组件Content Linking的作用及其使用方法。文件存取组件File Access的作用及其使用方法。网页计数器组件PageCounter的作用及其使用方法。。
在VB的集成开发环境中执行“工程”→“引用”菜单命令，将会出现5-1所示的引用对话框，在该对话框中浏览到以 MSWC开头的组件，这些组件都是ASP组件。选中某组件左侧的复选框，然后按“确定” 按钮即把该组件加载到VB的工程中。图5-1 就是把Content Linking 组件加载到VB的工程中。
5.2 任务5-1：广告轮显网页——广告轮显组件Ad
Rotator

使用广告轮显组件一般步骤如下：（1）创建一个广告轮换计划文件，指明轮显的广告图片、显示次数比例等；（2）创建一个广告网页重定向文件，用来重定向到用户单击的广告对应的网页；（3）创建一个广告图片显示网页，用来调用Ad Rotator组件来显示和轮换广告。
5.2 任务5-1：广告轮显网页——广告轮显组件Ad
Rotator
（3）启动浏览器，在地址栏输入： http://LocalHost/ASPE/CH05/Task5_1/Task5_1.ASP后按回车键，将会出现类似于如图5-4所示的显示广告图片网页，但显示的广告图片可能不一样，例如图5-6就是某一次访问该网页时出现的广告图片。不过此时单击图片及图片下的超链接，均会出现找不到网页的错误，原因是相应的网页并没有编写。
Rotator
（2）再次启动记事本，在其中输入如下代码，并把它保存到D:\ASPExample\ch05\Task5_1文件夹下，取名为 Task5_1.asp，该文件为广告图片显示网页。
<html> <head> <title>轮回显示广告网页</title> </head> <body> <h2 Align=center>单击下面图片，将链接到相应的网站。</h2> <% Dim objAR Set objAR=Server.Createobject("MSWC.AdRotator") Response.Write(objAR.GetAdvertisement("Task5_1_Schdule.txt")) %> <br> <a href="task5_1_HitsNum.asp">显示广告点击次数</a> </body> </html>
图5-1 VB的“引用”对话框
图5-2 “对象浏览器”窗口
5.1 ASP组件概述

按“F2”键，将会出现“对象浏览器”窗口。在该窗口的“类库”下拉式列表框中列出了当前工程所用到的所有类库，如图5-2所示。选中相应类库，即可浏览相应类库中组件的信息。如选中“NextLink”类库，该类库中组件的浏览情况如图5-3所示。
5.2 任务5-1：广告轮显网页——广告轮显组件Ad
Rotator

说明

当用户单击广告图片时，浏览器将会自动定向到广告网页重定向文件，并且向该文件传送被点击广告的URL地址，在广告网页重定向文件中，可通过Request的QueryString集合取得该URL地址。
5.2 任务5-1：广告轮显网页——广告轮显组件Ad
•其中第一节是可选的，如果忽略了一项或多项参数，而且没有明确设置对象属性，那么参数将使用默认值，如果忽略了所有参数，仍需把“*”作为文件的第一行。 •第二节必须存在，它提供了各个广告条细节，需定义四个参数，含义如下：
广告图片文件名。用来指定广告图片文件的虚拟路径和文件名。广告客户网页的URL。用来指定单击广告图片时，跳转到的URL，用“-”表示该广告没有链接。广告说明文本。用来指定浏览器不支持图片时显示的说明文本。广告出现次数比例。用来指出此广告条出现的比例，假设有三个广告条，广告出现比例分别设置为2、3和5，那么用户访问该网页时，有 20%可能出现第一幅广告，有30%可能出现第二幅广告，有50%可能出现第三幅广告。
5.2 任务5-1：广告轮显网页——广告轮显组件Ad
Rotator

本任务的实现过程如下。
（1）用记事本打开D:\ASPExample文件夹下的 Global.asa文件，在Application_OnStart事件代码中添加下列程序代码并保存。
Application.Lock Application("hgCarNum")=0 '花冠汽车点击次数 Application("HpPrinterNum")=0 '惠普打印机点击次数 Application("HyperGirlNum")=0 '超级女生点击次数 Application.Unlock
图5-4 显示广告图片网页
图5-5 显示广告点击次数网页
5.2 任务5-1：广告轮显网页——广告轮显组件Ad
Rotator

任务分析：可使用内置的广告轮显组件Ad Rotator 来实现广告轮显功能。使用该组件来实现广告轮显，首先需建立一个广告轮换计划文件，该文件指明要显示的广告图片、广告图片的大小、广告的注释信息、单击广告后的重定向信息及广告显示次数比例的数字。为统计各广告被点击的次数，可定义若干个应用程序级变量，当用户单击广告图片时，将转向到广告网页重定向文件，在该文件中判断用户单击的是哪一幅广告图片（通过获取的URL地址来判断），再把相应的广告点击次数加1，然后定位到 URL地址指定的网站或网页。
图5-3 “NextLink组件信息浏览”窗口
5.2 任务5-1：广告轮显网页——广告轮显组件Ad
Rotator

利用ASP提供的内置的广告轮显组件Ad Rotator，在构建自己的Web网站时，用户也可以方便地建立功能完善的广告系统。利用广告轮显组件Ad Rotator可以实现按一定的比例随机显示广告图片，当用户单击某个广告图片时跳转到相应的网页，统计用户单击各个广告的次数等。
5.1 ASP组件概述

ASP内置组件是指在安装ASP时自动注册到ASP Web服务器上的组件，主要的 ASP内置组件如表5-1所示。这些组件存放在Microsoft Web Class类库中， Microsoft Web Class类库的缩写是 MSWC。
5.1 ASP组件概述
查看ASP组件信息 Nhomakorabea5.2 任务5-1：广告轮显网页——广告轮显组件Ad
Rotator

说明
①该网页首先使用Server.Createobject方法创建了一个Ad Rotator对象，然后调用该对象的GetAdvertisement方法从广告轮换文件获取随机广告并显示出来。网页的最后还制作了一个超链接，链接到显示各广告被用户点击次数的网页。 ②创建广告轮显组件的一般格式如下： Set 变量名=Server.Createobject("MSWC.AdRotator") 其中，变量名用来存放要创建的广告轮显组件对象，参数 MSWC.AdRotator是广告轮显组件的类名。 ③获取随机广告可使用广告轮显组件的GetAdvertisement方法，调用该方法的一般格式如下。对象名. GetAdvertisement("广告轮换计划文件名") 其中，对象名为广告轮显组件对象名。
<html> <head> <title>显示点击次数</title> </head> <body> <center> <h2>各广告的点击次数如下：<h2><BR> <TABLE Border=1> <TR><TD>花冠汽车（丰田汽车）<TD><%=Application("hgCarNum")%> <TR><TD>惠普打印机（惠普公司） <TD><%=Application("HpPrinterNum")%> <TR><TD>超级女生进行时（搜狐娱乐） <TD><%=Application("HyperGirlNum")%> </TABLE> </center> </body> </html>
（2）启动记事本，在记事本中输入如下代码，并把它保存到D:\ASPExample\ch05\Task5_1文件夹下，取名为Task5_1_Schdule.txt，该文件为广告轮换计划文件。
Redirect Task5_1_NumAdd.asp Width 700 Height 100 Border 1 * A1.JPG 花冠汽车 1 A2.jpg 惠普打印机 2 A3.JPG /casio 超级女声进行时 1
<html> <head> <title>为点击网页增加次数</title> </head> <body> <% dim strURL strURL=Request.QueryString("url") Select Case lcase(strURL)
Case "" Application.Lock Application("hgCarNum")=Application("hgCarNum")+1 Application.Unlock case "" Application.lock Application("HpPrinterNum")=Application("hgCarNum")+1 Application.unlock case "/casio" Application.lock Application("HyperGirlNum")=Application("hgCarNum")+1 Application.Unlock End Select Response.Redirect strURL %> </body> </html>
图5-6 显示广告图片网页的某一次访问情况
5.2 任务5-1：广告轮显网页——广告轮显组件Ad
Rotator
（4）再次启动记事本，在其中输入如下代码，并把它保存到D:\ASPExample\ch05\Task5_1文件夹下，取名为 Task5_1_NumAdd.asp，该文件为广告网页重定向文件。