UC知道ASP高手，快来救救我，快受不了了
来源：百度知道 编辑：UC知道 时间：2024/05/14 19:08:52
今天照着书上编4写了一个几个代码，说是显示广告的。要分成三个来。
其中有一个是这样的。
HTML>
<HEAD><TITLE>欢迎进入</TITLE></HEAD>
<BODY>
<CENTER><H2>欢迎进入</H2></CENTER>
<HR>
<%
Set MyAd=Server.CreateObject("MSWC.AdRotator")
%>
<CENTER><%=MyAd.GetAdvertisement("myadrot.txt") %></CENTER>
</Body></HTML>
当然已经建立了一个myadrot.txt。和adcount.asp
<% response.appendtolog request.querystring("url")
response.redirect (request.querystring("url"))
%>
当运行WELCOM.ASP的时候,出现了如下错误.
Microsoft VBScript 运行时错误 '800a01ad'
ActiveX 部件不能创建对象: 'Server.CreateObject'
\wwwroot\welcom.asp, line 7
怎么办?????????
忘记说了，我的系统是XP，测试软件是netbox.
其中有一个是这样的。
HTML>
<HEAD><TITLE>欢迎进入</TITLE></HEAD>
<BODY>
<CENTER><H2>欢迎进入</H2></CENTER>
<HR>
<%
Set MyAd=Server.CreateObject("MSWC.AdRotator")
%>
<CENTER><%=MyAd.GetAdvertisement("myadrot.txt") %></CENTER>
</Body></HTML>
当然已经建立了一个myadrot.txt。和adcount.asp
<% response.appendtolog request.querystring("url")
response.redirect (request.querystring("url"))
%>
当运行WELCOM.ASP的时候,出现了如下错误.
Microsoft VBScript 运行时错误 '800a01ad'
ActiveX 部件不能创建对象: 'Server.CreateObject'
\wwwroot\welcom.asp, line 7
怎么办?????????
忘记说了，我的系统是XP，测试软件是netbox.
广告翻转器组件
Ad Rotator 组件创建一个 Ad Rotator 对象，该对象在 Web 页上自动轮换显示广告图像。当用户每次打开或重新加载 Web 页时，Ad Rotator 组件将根据在 ADRotator 计划文件中指定的信息显示一个新广告。
————————————
语法：↓
Set AdRotator = Server.CreateObject("MSWC.AdRotator")
参数：↓
AdRotator
指定 AdRotator 对象的名称，此对象通过调用Server.CreateObject 创建。
-----------------------------
属性：↓
Border 指定广告边框的大小。
Clickable 指定广告是否为超链接。
TargetFrame 指定显示广告的框架的名称。
-----------------------------
方法：↓
GetAdvertisement
从数据文件中获取下一个计划广告的详细说明并将其格式化为 HTML 格式。
----------------------------
示例：↓
下面的示例在用户每次查看 Web 页时显示不同的广告。
<%Set ad=Server.CreateObject("MSWC.AdRotator")%>
<%= ad.GetAdvertisement("/ads/adrot.txt") %>
-------------------------
adrot.txt内容：↓
REDIRECT adred.asp
WIDTH 230
HEIGHT 33
BORDER 1
*