敬业的IT人 互联网 佚名 2008-4-14 17:10:09

首先你需要一个数据库放置你的广告，我们共用了2个表： blBanners 和 tblVendors表：
tblBanners结构表如下:
bID - auto number (广告ID)
bBanner - text (图像文件)
bUsedViews - number (# 标准的广告显示次数)
bTotalViews - number (# of impressions the vendor has paid for)
bClicks - number (# 标准的广告点击次数)
bURL - text (网站URL)
bShow - yes/no (用来标识广告是显示还是隐藏)
vID - number (卖主 ID)

tblVendors表结构如下:
vID - autonumber (卖主 ID - 链到tblBanners.vID)
vName - text (卖主的名字)
etc..........

第一步

现在，这个数据库已经建立了，你需要有随机地在我们的网页中显示广告并且计算显示次数。:
DSN链接不讲了，如果不会，你可以到以下地址看看：
http://www.askasp.com/toolbox.asp?Expand=True&ID=2#tool

如果是SQL，可以采用下面的相似语句:

SQL = "SELECT tblBanners.bID, tblBanners.bImage, tblBanners.bUsedViews, tblBanners.bLastViewed "
SQL = SQL & "FROM tblBanners "
SQL = SQL & "WHERE (((tblBanners.bShow)=True) AND ((tblBanners.bTotalViews)>[tblBanners].[bUsedViews]));"

在上面的SQL语句中，只有当bShow标志是True而且UsedViews(显示客户广告次数)小于TotalViews(客户总显示广告次数)的
记录才作选取(下面不翻译了，深夜了：）。

Now that we have all of the banners that we can display, we need to display a random

Now that we have the link set up, we can move));"

varDatabaseName = "ask_asp_data.mdb"
%>

<!--#include file="common/data_conn_open.asp"-->

<%
If Not RecordSet.BOF Then
RecordSet.MoveFirst
End If

varURLToRedirect = RecordSet.Fields("bURL")

RecordSet.Fields("bClicks") = (RecordSet.Fields("bClicks") + 1)
RecordSet.Update
%>

<!--#include file="common/data_conn_close.asp"-->

<% Response.Redirect(varURLToRedirect) %>

最新文章

动态广告管理程序制作例子[04-14]

深入研究“用ASP上载文件”(一)[04-14]

深入研究“用ASP上载文件”(二)[04-14]

一个投票系统的源程序(coveryourasp.com)[04-14]

一 些 ASP 小 源 程 序[04-14]

用ASP制作个性化的调查板（附源程序）[04-14]

相关文章