推荐：ASP六大对象介绍Application对象Application对象是个应用程序级的对象，用来在所有用户间共享信息，并可以在Web应用程序运行期间持久地保持数据。Application的属性：方法如下：Application对象没
ASP AdRotator 组件
每当用户进入网站或刷新页面时，ASP AdRotator组件就会创建一个AdRotator对象来显示一幅不同的图片。
语法：
| 以下为引用的内容： <% set adrotator=server.createobject(MSWC.AdRotator) adrotator.GetAdvertisement(textfile.txt) %> |
实例
假设我们有一个文件名为banners.asp。它类似于这样：
| 以下为引用的内容： <html%> <body%> <% set adrotator=Server.CreateObject(MSWC.AdRotator) response.write(adrotator.GetAdvertisement(ads.txt)) %> </body%> </html%> |
文件ads.txt类似这样：
| 以下为引用的内容： * CuoXIncom.gif http://www.CuoXIn.com/ Visit CuoXIn.Com 80 microsoft.gif http://www.microsoft.com/ Visit Microsoft 20 |
ads.txt文件中星号下面的代码定义了如何显示这些图像，链接地址，图像的替换文本，在每百次点击中的现实几率。我们可以看到，W3School图片的显示几率是80%，而Microsoft图片的显示几率是20%。
注释：为了使这些链接在用户点击时可以正常工作，我们需要对文件ads.txt进行一点点小小的修改：
| 以下为引用的内容： REDIRECT banners.asp * CuoXIncom.gif http://www.CuoXIn.com/ Visit CuoXIn.Com 80 microsoft.gif http://www.microsoft.com/ Visit Microsoft 20 |
转向页面会接收到名为url的变量的查询字符串，其中含有供转向的URL。
注释：如需规定图像的高度、宽度和边框，我们可以在REDIRECT下面插入这些代码：
| 以下为引用的内容： REDIRECT banners.asp WIDTH 468 HEIGHT 60 BORDER 0 * CuoXIncom.gif ... ... |
最后要做的是把这些代码加入文件banners.asp中：
| 以下为引用的内容：
<% url=Request.QueryString(url) If url<> then Response.Redirect(url) %> <html> <body> <% set adrotator=Server.CreateObject(MSWC.AdRotator) response.write(adrotator.GetAdvertisement(textfile.txt)) %> </body> </html> |
分享：用ASP代码得到客户端IP和当前地址1、得到客户端IP<%myip=Request.ServerVariables(Remote_Addr)%>2、得到当前地址 以下为引用的内容：<script>document