dvbbs
收藏本页
联系我们
论坛帮助
dvbbs

>> 电脑网络管理、网页制作、免费素材、经验交流、软硬件......
搜一搜相关精彩主题 
肿瘤咨询在线论坛站务服务『 电脑网络 』 → 不错的向上滚动广告代码

您是本帖的第 2241 个阅读者
树形 打印
标题:
不错的向上滚动广告代码
管理员
帅哥哟,离线,有人找我吗?
头衔: 义工
等级:管理员
威望:1
文章:827
积分:4593
注册:2004年1月31日
楼主
 点击这里发送电子邮件给管理员

发贴心情
不错的向上滚动广告代码
   不错的向上滚动广告代码


    
<SCRIPT language=JavaScript1.2>
<!--
var scrollerwidth=470
var scrollerheight=60
var scrollerbgcolor='#cccccc'
var pausebetweenimages=10000
var waitingtime=20
var slideimages=new Array()
slideimages[0]='<iframe src="http://gong.88qq.com/88qq_468-60-5.htm" width="468" height="60" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe>'
slideimages[1]='<iframe src="http://gong.88qq.com/88qq_468-60-2.htm" width="468" height="60" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe>'
slideimages[2]='<iframe src="http://gong.88qq.com/88qq_468-60-1.htm" width="468" height="60" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe>'
slideimages[3]='<iframe src="http://gong.88qq.com/88qq_468-60-4.htm" width="468" height="60" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe>'
slideimages[4]='<iframe src="http://gong.88qq.com/88qq_468-60-3.htm" width="468" height="60" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe>'
slideimages[5]='<iframe src="http://gong.88qq.com/88qq_468-60-6.htm" width="468" height="60" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe>'
if (slideimages.length>1)
i=2
else
i=0
function move1(whichlayer){
tlayer=eval(whichlayer)
if (tlayer.top>0&&tlayer.top<=5){
tlayer.top=0
setTimeout("move1(tlayer)",pausebetweenimages)
setTimeout("move2(document.main.document.second)",pausebetweenimages)
return
}
if (tlayer.top>=tlayer.document.height*-1){
tlayer.top-=5
setTimeout("move1(tlayer)",waitingtime)
}
else{
tlayer.top=scrollerheight
tlayer.document.write(slideimages)
tlayer.document.close()
if (i==slideimages.length-1)
i=0
else
i++
}}
function move2(whichlayer){
tlayer2=eval(whichlayer)
if (tlayer2.top>0&&tlayer2.top<=5){
tlayer2.top=0
setTimeout("move2(tlayer2)",pausebetweenimages)
setTimeout("move1(document.main.document.first)",pausebetweenimages)
return
}
if (tlayer2.top>=tlayer2.document.height*-1){
tlayer2.top-=5
setTimeout("move2(tlayer2)",waitingtime)
}
else{
tlayer2.top=scrollerheight
tlayer2.document.write(slideimages)
tlayer2.document.close()
if (i==slideimages.length-1)
i=0
else
i++
}}
function move3(whichdiv){
tdiv=eval(whichdiv)
if (tdiv.style.pixelTop>0&&tdiv.style.pixelTop<=5){
tdiv.style.pixelTop=0
setTimeout("move3(tdiv)",pausebetweenimages)
setTimeout("move4(second2)",pausebetweenimages)
return
}
if (tdiv.style.pixelTop>=tdiv.offsetHeight*-1){
tdiv.style.pixelTop-=5
setTimeout("move3(tdiv)",waitingtime)
}
else{
tdiv.style.pixelTop=scrollerheight
tdiv.innerHTML=slideimages
if (i==slideimages.length-1)
i=0
else
i++
}
}
function move4(whichdiv){
tdiv2=eval(whichdiv)
if (tdiv2.style.pixelTop>0&&tdiv2.style.pixelTop<=5){
tdiv2.style.pixelTop=0
setTimeout("move4(tdiv2)",pausebetweenimages)
setTimeout("move3(first2)",pausebetweenimages)
return
}
if (tdiv2.style.pixelTop>=tdiv2.offsetHeight*-1){
tdiv2.style.pixelTop-=5
setTimeout("move4(second2)",waitingtime)
}
else{
tdiv2.style.pixelTop=scrollerheight
tdiv2.innerHTML=slideimages
if (i==slideimages.length-1)
i=0
else
i++
}}
function startscroll(){
if (document.all){
move3(first2)
second2.style.top=scrollerheight
}
else if (document.layers){
move1(document.main.document.first)
document.main.document.second.top=scrollerheight+5
document.main.document.second.visibility='show'
}}
window.onload=startscroll
//-->
</SCRIPT>
<ILAYER id=main bgcolor="&amp;{scrollerbgcolor};"
height="&amp;{scrollerheight};" width="&amp;{scrollerwidth};"><LAYER id=first
width="&amp;{scrollerwidth};" top="1" left="0">
<SCRIPT language=JavaScript1.2>
if (document.layers)
document.write(slideimages[0])
</SCRIPT>
</LAYER><LAYER id=second width="&amp;{scrollerwidth};" top="0" left="0"
visibility="hide">
<SCRIPT language=JavaScript1.2>
if (document.layers)
document.write(slideimages[1])
</SCRIPT>
</LAYER></ILAYER>
<SCRIPT language=JavaScript1.2>
<!--
if (document.all){
document.writeln('<span id="main2" style="position:relative;width:'+scrollerwidth+';height:'+scrollerheight+';overflow:hiden;background-color:'+scrollerbgcolor+'">')
document.writeln('<div style="position:absolute;width:'+scrollerwidth+';height:'+scrollerheight+';clip:rect(0 '+scrollerwidth+' '+scrollerheight+' 0);left:0;top:0">')
document.writeln('<div id="first2" style="position:absolute;width:'+scrollerwidth+';left:0;top:1;">')
document.write(slideimages[0])
document.writeln('</div>')
document.writeln('<div id="second2" style="position:absolute;width:'+scrollerwidth+';left:0;top:0">')
document.write(slideimages[1])
document.writeln('</div>')
document.writeln('</div>')
document.writeln('</span>')
}
//-->
</SCRIPT>

我是网站清洁工。
ip地址已设置保密
2006-3-12 7:36:33
管理员
帅哥哟,离线,有人找我吗?
头衔: 义工
等级:管理员
威望:1
文章:827
积分:4593
注册:2004年1月31日
2
 点击这里发送电子邮件给管理员

发贴心情

切换旗帜广告

<Iframe src="http://www.ccdoo.com/html/top_banner.htm" frameBorder=0 width=468 scrolling=no height=60></Iframe>

看到这种图片切换的效果吗?用来切换旗帜广告将是个很好的选择。下面我们来讲一讲具体的做法:

第一步、把下面这段代码插入到页面的<head>与</head>之间:

<script language=javascript>
isns = navigator.appName == "Netscape";
function ztstr(id,picurl,linkurl)
{
this.id=id
this.picurl=picurl
this.linkurl=linkurl
}

zhuanti=new Array()
imgcount=1;
frequency=10*1000;//30秒

//在这里修改图片的路径和链接
zhuanti[1]=new ztstr('1','/2004/data/uploadfile/200506/20050606023346658.gif','http://www.ccdoo.com')
zhuanti[2]=new ztstr('2','/2004/data/uploadfile/200506/20050606023346572.gif','http://www.ccdoo.com')
zhuanti[3]=new ztstr('3','/2004/data/uploadfile/200506/2005060602334713.gif','http://www.ccdoo.com')
zhuanti[4]=new ztstr('4','/2004/data/uploadfile/200506/20050606023347640.gif','http://www.ccdoo.com')

imgcount=zhuanti.length-1
for(i=1;i<=imgcount;i++)
{
eval("img"+i+"=new Image()")
eval("img"+i+".src=zhuanti["+i+"].picurl")
}

nn=1

var rand1 = 0;
var useRand = 0;

function swapPic() {
var imgnum = zhuanti.length - 1;
do {
var randnum = Math.random();
rand1 = Math.round((imgnum - 1) * randnum) + 1;
} while (rand1 == useRand);
useRand = rand1;
// alert(useRand);
nn=useRand;
change_img();
}

function change_img()
{
eval('document.pic.src=img'+nn+'.src');
nn++;
if(nn>imgcount) nn=1
if(!isns)
{
pic.filters.item(0).apply()
pic.style.visibility='visible'
pic.filters.item(0).play()
setTimeout("pic.style.visibility='hidden'",frequency);
}
else
document.pic.visibility='visible'
tt=setTimeout('change_img()',frequency)
}

function pictarget()
{
tt=nn-1
if(tt<1) tt=imgcount
cururl=zhuanti[tt].linkurl
window.open(cururl);
}
function ini()
{
if(!isns)
{
spacewidth=Math.round((divmask.offsetWidth-770)/2)
dmwidth=770+spacewidth
dmheight=divmask.offsetHeight
totalstep=50
timeout=50
dmstepw=Math.round(770/totalstep)
dmsteph=Math.round(dmheight/totalstep)
setTimeout('hidimg()',3000)
}
else swapPic()
}

function hidimg()
{
dmwidth-=dmstepw
dmheight-=dmsteph
eval('divmask.style.clip="rect(0,'+dmwidth+','+dmheight+',0)"')
hdrun=setTimeout('hidimg()',timeout)
if(dmwidth<=spacewidth&&dmheight<=0)
{
divmask.style.visibility='hidden'
clearTimeout(hdrun)
swapPic()
}
}
</script>

第二步、调用定义好的JavaScript函数,在<body>里加上以下代码:

<body onload=swapPic()>

第三步、在页面中插入图片和链接:

<a href=javascript:void(null) onclick='javascript:pictarget();return false;'><img src="/2004/data/uploadfile/200506/20050606023346658.gif" width=468 height=60 border=0 name=pic style="visibility:hidden;filter:revealtrans(duration=2.0,transition=12)"></a>

好,到这里就大功告成了。另外,试试改变transition的数值,可以得到不同的转换效果哟~~


我是网站清洁工。
ip地址已设置保密
2006-3-12 7:39:41
管理员
帅哥哟,离线,有人找我吗?
头衔: 义工
等级:管理员
威望:1
文章:827
积分:4593
注册:2004年1月31日
3
 点击这里发送电子邮件给管理员

发贴心情
你是不是经常在网上看到一些公司的广告,并且他们能不停的变换各种广告内容,这就是运用ASP中的广告交替组件,使用广告交替组件交替广告图标可以更好的发布你的广告和服务的推广,更容易使别人接受你的广告,并能简单地实现交替显示图象。

(一).广告交替组件的使用方法和具体属性:

1).GetAdvertisement方法

  在这里Server.CreateObject方法用于广告交替的例子:Set ad=Server.CreateObject("MSWC.AdTotator"),这里Set命令用于和Server.Create.CreateObject 标志符,联合来创建一个MSWC.AdRotator对象的引用.广告交替组件有一个方法:GetAdvertisement方法.GetAdvertisement方法管理和从调度文件检取信息,当GetAdvertisement方法从一个新的页面请求或从一个页面更新的请求被调用时,GetAdvertisement方法浏览调度文件,以显示下一个广告图案,GetAdvertisement方法的语法为:GetAdvertisement("filepath"),filepath为调度文件的虚拟路径.

2).广告交替组件要求的文件

  Rotation schedule文件用于管理显示频率或显示标题的文件(也就是广告交替调度文件);Redirection文件为其重定向网址.

3).广告交替调度文件的具体方法属性

  这个文件用来管理广告交替组件中广告显示的频率和具体属性,其具体方法见下表:

名字 描述 作用范围

Redirect(URL)为提交浏览器缺省位置 所有在交替调度中的图像 所有图像

width(填入要显示图像的具体大小) 设定图像的像素宽度 所有图像

height(像素值) 设定图像的像素高度 所有图像

border(表格宽度) 设定图像边框宽度 所有图像

* 用以分隔具体显示内容 所有图像

AdUL 设定图片地址 单一图象

AdHomePageURL 设定广告链接地址 单一图象

Text 设定广告文字显示 单一图象

Impresseions 设定广告图片显示时间比 单一图象

具体使用例子请看下例

4).重定向文件

   重定向文件(redirection file)将使浏览器指向目的地址,这里的地址是在调度文件里面确定的.这个重定向文件不仅用于将请求客户指向被请求广告,而且储存各种关于请求客户的信息,比如浏览器的类型和IP地址.在这里用response.redirect方法将浏览器导向调度文件中指定的地址,如response.redirect(request.querystring("myAdUrl")),? 你可以使用各种分析代码或页面记数器组件来确定重定向文件的点击数目.

5).广告交替属性

名字 语法 描述

Border boarder(size),size用整数 设定广告边框宽度

表示边框厚度

Clickable Clickable(value),value是 设定广告交替标题是否是一个超级链接或图象

true或false

TargetFrame TargetFrame(frame),frame 设定目标的名字以及显示标题

是一个html框的名字(如

_top,_parent等)

  这里如果Clickable值设为真,则显示一个超级联接的标题.如果值为假,则只显示标题并取消标
题的超级联接.


(二).具体使用示例:

1).下面代码可以放在你网页需要加入广告栏的地方

$#@60;

dim AD,adrot

AD="adr.txt"

set adr=server.createobject("MSWC.ADROTATOR")

adr.targetframe="target=""adframe"""

‘读取调度文件adr.txt

response.write adr.GetAdvertisement(AD)

$#@62;

2).下面是广告调度文件adrot.txt,它表示了能所显示图象的属性。

’redirect选项声明了一个转移地址的文件,这个文件用于指定用户到目标的路径。

redirect goto.asp

’定义广告图象的大小和边框属性

width 468

height 60

border 0

*

’指定图片地址、链接地址和提示内容以及显示的时间(这里时间显示比为50)。

http://www.yesky.com/logo.gif

http://www.yesky.com

天极网

50

redirect goto.asp

border 0

*

http://localhost/logo.gif

http://aasp.yeah.net

ASP动网先锋

50

redirect goto.asp

border 0

’同样的可以用*号分隔不同的图片地址和链接地址以实现广告交替效果。

3).转移地址的ASP文件goto.asp,是一个用于指定用户到适合的URL(用户路由表)参数路线的ASP文件。

$#@60;

$#@60;@LANGUAGE="VBSCRIPT"$#@62;

Response.AppendToLog Request.QueryString("url")

Response.Redirect Request.QueryString("url")

$#@62;

  这个转移地址文件被看作是一个记数装置,用于跟踪标记的效用,还提供了标记被点击的次数。它使用request.redirect方法来重定向浏览器到指定的URL路线。


  好了,现在一个简单的具有广告自动轮换功能的广告发布系统就完成了,利用它可以在自己的主页上自动轮显原来定义好的广告内容和图片链接,如果需要还可以和别人交换网站的广告内容,这样一个简单实用的程序你难道不想试试吗?

我是网站清洁工。
ip地址已设置保密
2006-3-12 8:15:02
管理员
帅哥哟,离线,有人找我吗?
头衔: 义工
等级:管理员
威望:1
文章:827
积分:4593
注册:2004年1月31日
4
 点击这里发送电子邮件给管理员

发贴心情
广告图片轮换

演示效果:
代码提示:将下面代码复制到<BODY>中

我是网站清洁工。
ip地址已设置保密
2006-3-12 8:27:13
web
帅哥哟,离线,有人找我吗?
头衔:半人半兽
等级:管理员
文章:2831
积分:13654
注册:2003年12月25日
5
 

发贴心情

<script language=javaScript>
<!--//
sandra0 = new Image();
sandra0.src = "images/2.jpg";
sandra1 = new Image();
sandra1.src = "images/3.jpg";
sandra2 = new Image();
sandra2.src = "images/4.jpg";
var i_strngth=1
var i_image=0
var imageurl = new Array()
imageurl[0] ="images/2.jpg"
imageurl[1] ="images/3.jpg"
imageurl[2] ="images/4.jpg"
function showimage() {
if(document.all) {
if (i_strngth <=110) {
testimage.innerHTML="<img style='filter:alpha(opacity="+i_strngth+")' src="+imageurl[i_image]+" border=0>";
i_strngth=i_strngth+10
var timer=setTimeout("showimage()",100)
}
else {
clearTimeout(timer)
var timer=setTimeout("hideimage()",1000)
}
}
if(document.layers) {
clearTimeout(timer)
document.testimage.document.write("<img src="+imageurl[i_image]+" border=0>")
document.close()
i_image++
if (i_image >= imageurl.length) {i_image=0}
var timer=setTimeout("showimage()",2000)
}
}
function hideimage() {
if (i_strngth >=-10) {
testimage.innerHTML="<img style='filter:alpha(opacity="+i_strngth+")' src="+imageurl[i_image]+" border=0>";
i_strngth=i_strngth-10
var timer=setTimeout("hideimage()",100)
}
else {
clearTimeout(timer)
i_image++
if (i_image >= imageurl.length) {i_image=0}
i_strngth=1
var timer=setTimeout("showimage()",500)
}
}
//-->
</script>

2.将以下代码加入<body></body>之间

<div id="testimage" style=" position: absolute; left: 305; top: 101"></div>

3.在<body>语句中加入:onLoad="showimage()"

例如:<body onLoad="showimage()">


ip地址已设置保密
2006-3-14 16:28:17
web
帅哥哟,离线,有人找我吗?
头衔:半人半兽
等级:管理员
文章:2831
积分:13654
注册:2003年12月25日
6
 

发贴心情
<script language="javascript">
<!--
var adImg = new Array();
var adLink = new Array();
var cID = 0;
adImg[0] = "http://xlcm.anyp.cn/PageLayout/UserData/Data46/USID200404131000427307/Photoes/050324150539937.jpg";
adLink[0] = "http://csjc.anyp.cn";
adImg[1] = "http://img.anyp.cn/index/pic_20050324c.jpg";
adLink[1] = "http://pgtd.x168.com";
adImg[2] = "http://img.anyp.cn/index/pic_20050324b.jpg";
adLink[2] = "http://xlcm.anyp.cn/";
var preImgs = new Array();
for(i=0;i<3;i++)
{
  preImgs[i] = new Image();
  preImgs[i].src = adImg[i];
}
function NextAd()
{
  if(cID == 3)cID=0;
  if(document.all)
  {
   imgAD.filters.revealTrans.Transition=Math.floor(Math.random()*23);
   imgAD.filters.revealTrans.apply();
   imgAD.src = adImg[cID];
   imgAD.filters.revealTrans.play();
   cID++;
   setTimeout("NextAd()", 4000);
  }
}

function ShowLink()
{
  //window.status = adLink[cID-1];
  document.returnValue = true;
}
function Go2Url()
{
  window.open(adLink[cID-1]);
}
//-->
  </script> <a onMouseOver="javascript:ShowLink();return document.returnValue;" href="javascript:Go2Url();"><img name="imgAD" style="FILTER: revealTrans(duration=2,transition=20);BORDER-RIGHT:#cccccc 1px solid; BORDER-TOP:#cccccc 1px solid; BORDER-LEFT:#cccccc 1px solid; BORDER-BOTTOM:#cccccc 1px solid" src="javascript:NextAd()"
    border="0"  width="261" height="155" hspace="0" vspace="0"></a>
ip地址已设置保密
2006-3-14 16:51:35

 6   6   1/1页      1    
网上贸易 创造奇迹! 阿里巴巴 Alibaba
Copyright ©2000 - 2002 chinaonco.net
Powered By Dvbbs Version 7.1.0 Sp1
页面执行时间 0.27734 秒, 4 次数据查询