ASP教程之告白播放和跟踪体系的制造
问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在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)>.));"
在下面的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服务器，所以性能稳定性也一般 最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。 不能只是将它停留在纸上谈兵的程度上。 没有坚实的理论做基础，那么我们连踏入社会第一步的资本都没有，特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP，从平时的学习过程中。 代码逻辑混乱，难于管理：由于ASP是脚本语言混合html编程，所以你很难看清代码的逻辑关系，并且随着程序的复杂性增加，使得代码的管理十分困难，甚至超出一个程序员所能达到的管理能力，从而造成出错或这样那样的问题。 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍 完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。 Response:从字面上讲是“响应”，因此这个是服务端向客户端发送东西的，例如Response.Write 还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。
页:
[1]