多媒体编程

开发平台：

ASP/ASPX

banner.asp：源码内容

							<!--#include file="db/user.asp" -->
<!--#include file="config.asp" -->
<%
set rs=conn.execute("select * from ad where id="& int(Request.QueryString("id")))
if rs("numPlace")<>"9" then
	if rs("numMaxRate")<>"0" then
		if CDbl(rs("numSelect"))/CDbl(rs("numShow"))>=CDbl(rs("numMaxRate")) then
			response.write("该广告超过点击次数,请过段时间再试")
			response.end
		end if
	end if
conn.execute("update ad set numSelect=numSelect+1 where id="& int(Request.QueryString("id")))
end if
Response.Redirect rs("strADurl")
%>

						