1.17k likes | 1.31k Views
第 9 章 ASP 的内置组件. 教学目标 : 了解 ASP 组件的概念 掌握广告轮显组件的属性、方法 能熟练应用计数器组件和页计数器组件 熟练掌握文件操作组件的使用过程. 第 9 章 ASP 的内置组件. 教学内容: 9.1 ASP 组件概述 9.2 广告轮显组件 Ad Rotator 9.3 内容轮显组件 Content Rotator 9.4 浏览器性能组件 Browser Capabilities 9.5 计数器组件 Counter 和页计数器组件 Page Counter
E N D
第9章 ASP的内置组件 • 教学目标: • 了解ASP组件的概念 • 掌握广告轮显组件的属性、方法 • 能熟练应用计数器组件和页计数器组件 • 熟练掌握文件操作组件的使用过程
第9章 ASP的内置组件 • 教学内容: • 9.1 ASP组件概述 • 9.2 广告轮显组件 Ad Rotator • 9.3 内容轮显组件 Content Rotator • 9.4 浏览器性能组件Browser Capabilities • 9.5 计数器组件Counter和页计数器组件Page Counter • 9.6 文件操作组件File Access • 9.7 技能与实训 • 9.8 思考与练习
9.1 ASP组件概述 • ASP组件与ASP对象的区别: • 一个组件可能包含不只一个对象 • 在使用组件之前,要明显的创建一个实例 • 组件可以提供一个或多个对象的方法和属性。调 • 用组件就是要使用组件提供的对象
9.2 广告轮显组件 Ad Rotator • 9.2.1 Ad Rotator 组件相关文件 • 建立一个广告轮显首先要准备以下相关文件: • 图像文件:这是要显示的广告图片。 • 建立一个显示广告的计划文件,要把它保存为后缀名为.txt的文本文件
9.2.1 Ad Rotator 组件相关文件 • 计划文件的格式: • 计划文件的前4行包含广告的全局设置 • 第1行指出广告将成为其热链接的URL。注意,这里不是为广告本身指定的URL,而是将调用的页面的URL,这样你就可以通过这个页面跟踪单击广告的次数。该URL将与包含两个参数的查询字符串一起调用:选定广告主页的URL和图像文件的URL。其余3行简单说明如何显示广告。 • 第2行和第3行以像素为单位指定网页上广告的宽度和高度,默认值是440和60个像素。 • 第4行以像素为单位指定广告四周的边框宽度,默认值是1个像素。如果该参数设置为0,则没有边框。
9.2.2 Ad Rotator 组件的属性和方法 • Border: • Border 属性允许用户指定显示广告时四周是否带 • 边框。 • 语法: Border = size • 参数: size 指定显示的广告四周的边框宽度。其 • 默认值在 Rotator Schedule 文件的文件头中设 • 置。 • 下面的例子显示不带边框的广告。 • <%Set ad = Server.CreateObject("MSWC.AdRotator") • ad.Border = 0 %>
9.2.2 Ad Rotator 组件的属性和方法 • Clickable • Clickable 属性允许用户指定是否将广告作为超链接显示。 • 语法:Clickable = value • 参数 value 指定广告是否为超链接。此参数可为下列值之一。默认值是 TRUE。 • 值的 意义 : • TRUE将广告作为超链接显示。 • FALSE 将广告不作为超链接显示。
9.2.2 Ad Rotator 组件的属性和方法 • 目标框架:TargetFrame 属性指定链接将被装入的目标框架。该属性完成的功能等价于 HTML 语句中的TARGET参数。 • 语法:TargetFrame= frame • 参数:frame 指定用来显示广告框架的名称。该参数也可以是一个 HTML 框架关键字, 例如 _TOP、_NEW、_CHILD、_SELF、_PARENT 或 _BLANK。默认值是 NO FRAME。
9.2.2 Ad Rotator 组件的属性和方法 • AdRotator 对象的方法 :GetAdvertisement • 作用:GetAdvertisement 方法从计划文件中获取下一个广告。每次运行脚本时,例如当用户打开或刷新一页时,此方法会获取下一个安排的广告 • 参数 :rotationSchedulePath :指定计划文件相对于虚拟目录的位置
9.2.2 Ad Rotator 组件的属性和方法 • 注意: • 若物理路径为 F:\website\aspbook (其中 asp • 是 指向 F:\website\aspbook 的虚拟目录)则应 • 指定路径为/asp/9-1.txt
9.2.2 Ad Rotator 组件的属性和方法 • [例9-2.asp] 显示广告 • <html><head> • <title>例9-2.asp</title> • </head> • <body> • <% Set Ad = Server.CreateObject("MSWC.AdRotator") %> • <% Ad.clickable=true %> • <%= Ad.GetAdvertisement("/asp/9-1.txt") %> • <% url=request.querystring("url") • if url<>"" then
9.2.2 Ad Rotator 组件的属性和方法 • response.redirect url • end if • %> • </body> • </html>
9.3 内容轮显组件 Content Rotator • 作用:用来创建Content Rotator 对象,通过该对 • 象可以在Web 页上自动轮换显示HTML字符串 • 语法格式 :<% Set oVar = • Server.CreateObject("MSWC.ContentRotator") • %>其中参数oVar指定通过调用 • Server.CreateObject创建的ContentRotator对象 • 的名称
9.3内容轮显组件 Content Rotator • 1、创建内容列表文件 : • 内容列表文件 每个条目的语法格式: • %% [#Weight] [//Comments] • ContentString • 说明: • Weight是一个可选参数,其取值为0~65,535之间的整数,表示HTML内容字符串的相关权值
9.3内容轮显组件 Content Rotator • Comments是可选参数,给出条目的注释信息,仅为开发而用,对用户不显示 • ContentString是由内容轮显对象显示的HTML内容,例如一行文字,一幅图像或一段声音等
9.3内容轮显组件 Content Rotator • 2、内容列表文件示例: • %% #1 // 这是条目1,用于显示一个超文本链接 • <A HREF = " http://www.chinaren.com">欢迎中国人网站!</A> • %% #2 // 这是条目2,用于显示一行文本 • %% // 对内容字符串设置了字体、字号和颜色 • <FONT FACE = "楷体_GB2312" SIZE = "2" COLOR = "red"> • 但愿人长久,千里共婵娟。
9.3内容轮显组件 Content Rotator • </FONT> • %% #3 // 这是条目3,用于显示一幅图像 • <IMG SRC = "/img/happy.jpg" • 注意: • 内容列表文件中,不能漏掉%%,否则就会出现错 • 误
9.3内容轮显组件 Content Rotator • 3、检索并显示内容字符串 • 检索显示一个内容字符串: • ChooseContent方法 : • 作用:从内容列表文件中检索一个HTML内容字符串并将其显示在当前页 语法格式 :ChooseContent( content-schedule-path ) • 参数content-schedule-path :指定内容列表文件的位置,可以指定为相对路径或虚拟路径
9.3内容轮显组件 Content Rotator • [例9-3]下面的脚本从/asp/虚拟目录中的 • content.txt获取一个新的内容字符串。 • <% • Set NextTip = Server.CreateObject("MSWC.ContentRotator") • Response.Write NextTip.ChooseContent("/asp/Content.txt") • %>
9.3内容轮显组件 Content Rotator • 检索并显示所有内容字符串 • GetAllContent方法 : • 作用:从内容列表文件检索所有HTML内容字符串 • 语法格式 :GetAllContent(content-schedule-path) • 参数content-schedule-path:指定内容列表文件的位置 。此参数可以是相对路径,也可以是虚拟路径。
9.3内容轮显组件 Content Rotator • [例9-4.asp]使用GetAllContent方法显示内容列 • 表文件中的所有条目 • <% • Set Tips = Server.CreateObject("MSWC.ContentRotator") • Tips.GetAllContent("/asp/Content.txt") • %>
9.3内容轮显组件 Content Rotator • 运行结果:
9.4浏览器性能组件Browser Capabilities • 9.4.1 Browscap.ini文件 • 作用 :将浏览器功能映射到HTTP User Agent标 • 题 • 一些可能的浏览器属性 : • ActiveXControls 指定该浏览器是否支持ActiveX控件 • Backgroundsounds 指定该浏览器是否支持背景音乐 • Browser 指定该浏览器的名称
9.4.1 Browscap.ini文件 • Cookies 指定该浏览器是否支持Cookies • Frames 指定该浏览器是否支持框架 • Javaapplets 指定该浏览器是否支持Java程序 • Javascript 指定该浏览器是否支持JScript • Platform 指定该浏览器的运行平台 • Tables 指定该浏览器是否支持表格 • Vbscript 指定该浏览器是否支持VBScript • Version 指定该浏览器的版本号 • Majorver 指定主版本号 • ActiveXControls 指定该浏览器是否支持ActiveX控件
9.4.2 Browser Capabilities组件的使用 • 浏览器功能组件(Browser Capabilities) • 作用:用于创建一个BrowserType对象,该对象提供带有客户端浏览器的功能说明的用户脚本 • 语法格式 :Set BrowserType = • Server.CreateObject("MSWC.BrowserType") • 参数BrowserType:指定由erver.CreateObject • 方法创建的BrowserType对象的名称
9.4.2 Browser Capabilities组件的使用 • [例9-5.asp] 看看浏览器有什么性能 • <%@ language=VBScript%> • <html> • <head> • <title>例9-5.asp</title> • </head> • <body> • <font size="4" face="Arial,helvetica"> • <b> 用ASP提供的浏览器性组件来辨别客户浏览器</b>
9.4.2 Browser Capabilities组件的使用 • </font> • <hr size="1" color="#000000"> • <% dim bc • set bc=server.createobject("mswc.browsertype") • %> • <table border-1><tr> • <td>浏览器的名称</td> • <td> • <%=bc.browser %>
9.4.2 Browser Capabilities组件的使用 • <tr><td>浏览器的版本</td><td> • <%=bc.Version %></td></tr> • <tr><td>major version</td> • <td><%=bc.majorver %></td></tr> • <tr><td>表格支持</td> • <td><%=bc.tables%></td></tr> • <tr><td>Cookie 支持</td><td> • <%=bc.cookies%></td></tr>
9.4.2 Browser Capabilities组件的使用 • <tr><td>背景音乐支持</td><td> • <%=bc.backgroundsounds%></td></tr> • <tr><td>VBSCript支持</td><td> • <%=bc.VBScript%> • </td></tr> • </table>
9.4.2 Browser Capabilities组件的使用 • </body> • </html>
9.5 计数器组件Counter和页计数器组件Page Counter • 9.5.1 Counter 组件 • 作用:用来统计一个页面被请求的次数 • 创建方法:将下面的内容加入到应用程序的 • global.asa文件中,可以在Web服务器上一次性 • 创建Counters对象的实例:<OBJECT RUNAT = • "Server" SCOPE = "Application" ID=Counter“ • PROGID="MSWC.Counters"></OBJECT>
9.5.1 Counter 组件 • 方法: • 1、Get : • 作用:Get方法根据计数器的名称返回其当前值, • 如果此计数器不存在,则该方法创建它并将其置为 • 0 • 语法格式 :Counters.Get( CounterName ) • 参数CounterName是一个字符串,用于指定计数器的名称
9.5.1 Counter 组件 • 2. Increment • 作用:Increment方法根据计数器的名称,将该计数器的值加1并返回计数器的新值 • 语法格式 :Counters.Increment( CounterName ) • 参数CounterName是一个字符串,用于指定计数 • 器名的称
9.5.1 Counter 组件 • 3. Remove方法 • 作用:Remove方法根据计数器的名称从计数器对象和counters.txt文件中删除计数器 • 语法格式 :Counters.Remove( CounterName ) • 参数CounterName:是一个字符串,用于指定计数器名的称
9.5.1 Counter 组件 • 4. Set方法 • 作用:Set方法根据计数器名称和将计数器设置为一个指定的整数值并返回此新值 • 语法格式 :Counters.Set(CounterName, int) • 参数CounterName:包含计数器名称的字符串 • 参数int:指定该计数器的新整数值
9.5.1 Counter 组件 • [例9-6.asp] 一个简单、实用的计数器的小程序 • <html> • <head> • <title>例9-6</title> • </head> • <body> • <% response.write "欢迎光临"%> • <hr>该页面已经被游览
9.5.1 Counter 组件 • <%=mycount.increment("pagecnt")%>次了 • </body> • </html>
9.5.1 Counter 组件 • 注意 : • 此程序要想正确运行,必须把刚才讲的global.asa • 文件放在程序运行的主目录下。如果是第一次运行 • 该程序,计数器pagecnt不存在,则Increment方法 • 就创建该计数器,并且赋值为1 。
9.5.2 Page Counter组件 • 页面计数器组件(Page Counter) : • 作用:可以创建PageCounter对象实例,以记录 • 和显示Web页被打开的次数 • 语法格式 :<% Set oVar = • Server.CreateObject("MSWC.PageCounter") %> • 参数oVar:指定通过调用Server.CreateObject创建的PageCounter对象的名称
9.5.2 Page Counter组件 • 1. Hits方法 • 作用:方法返回指定URL的Web页被打开的次数 • 语法格式:Object.Hits( [pathInfo] ) • 参数pathInfo是可选参数。若未指定此参数,则显示当前页的访问次数 • 返回值:Hit方法返回一个长整型数,表示指定 • Web页被打开的次数
9.5.2 Page Counter组件 • 2. PageHit方法 • 作用:PageHit方法将对当前Web页的访问次数 • 加一 • 语法格式:Object.PageHit • 参数:参数pathInfo是可选参数。若未指定此参 • 数,则显示当前页的访问次数 • 返回值:PageHit方法返回一个长整型数,表示 • 指定Web页被打开的次数
9.5.2 Page Counter组件 • 3. Reset方法 • 作用:将指定的Web页的访问次数置为0 • 语法格式:Reset( [pathInfo] ) • 参数:pathInfo是可选参数。如果未指定该参 • 数,则重置当前页的访问次数 • 返回值:Reset方法没有返回值。
9.5.2 Page Counter组件 • [例 9-7.asp] 页面计数器Page Counter 组件的 • 使用 • <html> • <head> • <title>例9-7</title> • </head> • <body>
9.5.2 Page Counter组件 • <% set myhits=server.createobject("mswc.pagecounter") • %> • 这个页面已经被访问 • <%myhits.pagehit%> • <%=myhits.hits%>次了
9.5.2 Page Counter组件 • </body> • </html>
9.5.2 Page Counter组件 • 技巧 : • 上面两个语句<%myhits.pagehit%> • <%=myhits.hits%>可以用 • <%=myhits.pagehit%>这一个语句代替,因为 • myhits.pagehit不仅可以让单击数加1,而且还可 • 以返回页面的单击次数
9.6 文件操作组件File Access • 9.6.1 文件操作组件简介 • 文件存取组件 的对象和集合: • FileSystemObject主对象 :提供对计算机的文件系统的访问,包含用来创建、删除和获得有关信息以及用来操作驱动器、文件夹和文件的方法和属性 • Drive对象 :提供对特定的磁盘驱动器或共享网络设备的属性的访问
9.6.1 文件操作组件简介 • Drives集合 :这是所有可用的驱动器的只读集合,用于提供驱动器的列表,这些驱动器实物地或在逻辑上与系统相连接 • File对象 :提供对文件的所有属性的访问,包含用来创建、删除或移动文件的方法和属性,也用来向系统询问文件名、路径和多种其他属性 • Files集合。提供包含在文件夹内的所有文件的列表
9.6.1 文件操作组件简介 • Folder对象 :包含用来创建、删除或移动文件夹的方法和属性,也用来向系统询问文件夹名、路径和多种其他属性 • Folders集合:提供在Folder内的所有文件夹的列表 • TextStream对象:用来读写文本文件
9.6.2 FileSystemObject 对象 • 作用:FileSystemObject 这个对象包括了一些基本的对文件系统进行操作的方法,比如说,复制和删除文件夹或者文件 • 语法格式 :<% Set fso = • Server.CreateObject("Scripting.FileSystemObject") %>