ASP打造出站点弹出广告
类别: ASP教程
本文教您用ASP在5分钟内打造出站点弹出广告
这里我们只给出核心代码,显示和后台添加是相当简单的,您完全可以自己搞定。
首先你将以下代码插入到网站首页面的代码中
<%\'弹出广告设置--code by ceocio
sql = "select top 2 width,height,id from pop where useit=1 order by id"
set rs=conn.execute(sql)
if not rs.eof and not rs.bof then
do while not rs.eof
id=rs("id")
width=rs("width")
height=rs("height")
windownum=windownum+1
%>
<SCRIPT LANGUAGE="javascript">
var windownum=<%=windownum%>
var id=<%=id%>;
var height=<%=height%>
var width=<%=width%>
//<!--
window.open (\'pop.asp?id=\'+id, \'newwindow\'+windownum,
\'height=\'+height+\',width=\'+width+\',top=0,left=0,toolbar=no,menubar=no,scrollbar
s=yes,resizable=no,location=no,status=no\')
//-->
</SCRIPT>
<%
rs.movenext
loop
rs.close
end if %>
本例只设置了最多激活两个广告的情况,根据需要你可以设置更多,不过多了也不好,速度慢。
新建一个数据库,建表:pop
pop表字段内容如下:
id 自动编号
width 弹出窗口宽度 数字型
height 弹出窗口高度 数字型
content 内容 备注型
useit 是否激活,是/否型
在pop.asp中接收到传递过来的参数打开相应的记录显示出来就可以了。
ok,至此,您的弹出广告系统完成了。是不是很简单?
这里我们只给出核心代码,显示和后台添加是相当简单的,您完全可以自己搞定。
首先你将以下代码插入到网站首页面的代码中
<%\'弹出广告设置--code by ceocio
sql = "select top 2 width,height,id from pop where useit=1 order by id"
set rs=conn.execute(sql)
if not rs.eof and not rs.bof then
do while not rs.eof
id=rs("id")
width=rs("width")
height=rs("height")
windownum=windownum+1
%>
<SCRIPT LANGUAGE="javascript">
var windownum=<%=windownum%>
var id=<%=id%>;
var height=<%=height%>
var width=<%=width%>
//<!--
window.open (\'pop.asp?id=\'+id, \'newwindow\'+windownum,
\'height=\'+height+\',width=\'+width+\',top=0,left=0,toolbar=no,menubar=no,scrollbar
s=yes,resizable=no,location=no,status=no\')
//-->
</SCRIPT>
<%
rs.movenext
loop
rs.close
end if %>
本例只设置了最多激活两个广告的情况,根据需要你可以设置更多,不过多了也不好,速度慢。
新建一个数据库,建表:pop
pop表字段内容如下:
id 自动编号
width 弹出窗口宽度 数字型
height 弹出窗口高度 数字型
content 内容 备注型
useit 是否激活,是/否型
在pop.asp中接收到传递过来的参数打开相应的记录显示出来就可以了。
ok,至此,您的弹出广告系统完成了。是不是很简单?
-= 资 源 教 程 =-
文 章 搜 索