duilian.asp
资源名称:qnmov30.rar [点击查看]
上传用户:qyswxdl
上传日期:2013-06-01
资源大小:1373k
文件大小:2k
源码类别:
家庭/个人应用
开发平台:
ASP/ASPX
- <%@ Language=VBScript%>
- var delta=0.15
- var collection;
- function floaters() {
- this.items = [];
- this.addItem = function(id,x,y,content)
- {
- document.write('<DIV id='+id+' style="Z-INDEX: 10; POSITION: absolute; width:80px; height:60px;left:'+(typeof(x)=='string'?eval(x):x)+';top:'+(typeof(y)=='string'?eval(y):y)+'">'+content+'</DIV>');
- var newItem = {};
- newItem.object = document.getElementById(id);
- newItem.x = x;
- newItem.y = y;
- this.items[this.items.length] = newItem;
- }
- this.play = function()
- {
- collection = this.items
- setInterval('play()',10);
- }
- }
- function play()
- {
- if(screen.width<=800)
- {
- for(var i=0;i<collection.length;i++)
- {
- collection[i].object.style.display = 'none';
- }
- return;
- }
- for(var i=0;i<collection.length;i++)
- {
- var followObj = collection[i].object;
- var followObj_x = (typeof(collection[i].x)=='string'?eval(collection[i].x):collection[i].x);
- var followObj_y = (typeof(collection[i].y)=='string'?eval(collection[i].y):collection[i].y);
- if(followObj.offsetLeft!=(document.body.scrollLeft+followObj_x)) {
- var dx=(document.body.scrollLeft+followObj_x-followObj.offsetLeft)*delta;
- dx=(dx>0?1:-1)*Math.ceil(Math.abs(dx));
- followObj.style.left=followObj.offsetLeft+dx;
- }
- if(followObj.offsetTop!=(document.body.scrollTop+followObj_y)) {
- var dy=(document.body.scrollTop+followObj_y-followObj.offsetTop)*delta;
- dy=(dy>0?1:-1)*Math.ceil(Math.abs(dy));
- followObj.style.top=followObj.offsetTop+dy;
- }
- followObj.style.display = '';
- }
- }
- var theFloaters = new floaters();
- theFloaters.addItem('followDiv1','document.body.clientWidth-92',40,'<a href=http://www.1000n.com/ target=_blank><img src=http://www.1000n.com/ad/duilian.gif border=0> </a>');
- theFloaters.addItem('followDiv2',6,40,'<a href=http://www.1000n.com/ target=_blank><img src=http://www.1000n.com/ad/duilian.gif border=0></a>');
- theFloaters.play();