仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 588|回复: 9
打印 上一主题 下一主题

[学习教程] ASP教程之告白播放和跟踪体系的制造

[复制链接]
分手快乐 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:22:33 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在3秒以内).无论是他们输入资料时,查找资料时,分析资料时.告白ChristopherMiller
转载:ASP佳构屋钱丰云


起首你必要一个数据库安排你的告白,我们共用了2个表:blBanners和tblVendors表:
tblBanners布局表以下:
bID-autonumber(告白ID)
bBanner-text(图象文件)
bUsedViews-number(#尺度的告白显现次数)
bTotalViews-number(#ofimpressionsthevendorhaspaidfor)
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="SELECTtblBanners.bID,tblBanners.bImage,tblBanners.bUsedViews,tblBanners.bLastViewed"
SQL=SQL&"FROMtblBanners"
SQL=SQL&"WHERE(((tblBanners.bShow)=True)AND((tblBanners.bTotalViews)>[tblBanners].[bUsedViews]));"

在下面的SQL语句中,只要当bShow标记是True并且UsedViews(显现客户告白次数)小于TotalViews(客户总显现告白次数)的
纪录才作拔取(上面不翻译了,深夜了:)。

Nowthatwehaveallofthebannersthatwecandisplay,weneedtodisplayarandomone.Wecandothis
bygrabbingthetotalnumberofbanners,movingtothefirstrecord,andthemovingtoarandomnumber,
forexample:


DimrndMax,rndNumber

Randomize

rndMax=Int(RecordSet.RecordCount)
rndNumber=Int(RND*rndMax)

RecordSet.MoverndNumber


Nowthatwehavemovedtoourrandombanner,wenowneedtodisplaythebanneronourpage(Iamsureyou
knowhowtodothat,soIwontboreyouwiththedetails).However,InsteadofusingthebannersURLin
thelink,wearegoingtousearedirectpagesowecancounttheclicks.Allweneedtodoisusethe
bannerIDintheHREFtag,forexample:

ahref="redirect.asp?ID=<%=BANNERID%>"

Nowthatwehavethelinksetup,wecanmoveontoourredirect.asppage.Onthispage,wearegoingto
grabtheIDthatwearepassingintheQueryString,andgrabbingtheRecordSetthatmatches.Oncewehave
theRecordSet,wecangrabthebannersURL,increasetheClicksby1,andsendtheusertothe
destinationURL.Belowisthecodefortheredirect.asppage:

<%
IfRequest.QueryString("ID")=""Then
Response.Redirect("default.asp")
EndIf

DimvarSiteToRedirect,varURLToRedirect

varSiteToRedirect=Int(Request.QueryString("ID"))


SQL="SELECTtblBanners.bID,tblBanners.bURL,tblBanners.bClicks"
SQL=SQL&"FROMtblBanners"
SQL=SQL&"WHERE(((tblBanners.bID)="&varSiteToRedirect&"));"

varDatabaseName="ask_asp_data.mdb"
%>

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

<%
IfNotRecordSet.BOFThen
RecordSet.MoveFirst
EndIf

varURLToRedirect=RecordSet.Fields("bURL")

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

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

<%Response.Redirect(varURLToRedirect)%>
</p>asp可以使用微软的activeX使得网页功能无比强大,不过安全性也较差,而且是基于的windows服务器,所以性能稳定性也一般
爱飞 该用户已被删除
沙发
发表于 2015-1-20 09:43:38 | 只看该作者
最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
若天明 该用户已被删除
板凳
发表于 2015-1-29 06:33:48 | 只看该作者
不能只是将它停留在纸上谈兵的程度上。
莫相离 该用户已被删除
地板
发表于 2015-1-30 07:56:06 | 只看该作者
没有坚实的理论做基础,那么我们连踏入社会第一步的资本都没有,特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP,从平时的学习过程中。
透明 该用户已被删除
5#
发表于 2015-2-6 09:00:20 | 只看该作者
代码逻辑混乱,难于管理:由于ASP是脚本语言混合html编程,所以你很难看清代码的逻辑关系,并且随着程序的复杂性增加,使得代码的管理十分困难,甚至超出一个程序员所能达到的管理能力,从而造成出错或这样那样的问题。
冷月葬花魂 该用户已被删除
6#
发表于 2015-2-15 20:53:14 | 只看该作者
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
精灵巫婆 该用户已被删除
7#
发表于 2015-3-4 13:40:41 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
小妖女 该用户已被删除
8#
发表于 2015-3-11 19:51:28 | 只看该作者
Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write
金色的骷髅 该用户已被删除
9#
发表于 2015-3-19 10:42:59 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
因胸联盟 该用户已被删除
10#
发表于 2015-3-27 19:10:59 | 只看该作者
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-5-15 05:39

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表