|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同,ASP拥有应用系统所有权,用户拥有使用权,应用系统集中放在ASP的数据中心中,集中管理,分散使用,以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务,实现规模效益。SourceCode:
<%
***Keepingtrackofhowmanytimes
***auservisitsawebpage,by
***readingandwritingcookies.
***Inthisexample"asphole"willbe
***thenameofourcookie,and
***"totalvisit"willbethekey
***valuewekeeptrackof.Youcan
***havemultiplekeysforeach
***cookie.
***Declareyourvariables
DimNumVisit
***Checktoseehowmanytimesthey
***havebeentoyourwebpage.
NumVisit=Request.Cookies("asphole")("totalvisit")
***Ifthisistheirfirstvisitto
***thepageNumVisitisblank,so
***makethevalueofNumVisit0.
IfNumVisit=""Then
NumVisit=0
EndIf
***Displayhowmanytimestheyhave
***visitedyourwebpage.
Response.Write"Visitstothispage:"&NumVisit
***Countthevisittothewebpage
NumVisit=NumVisit+1
***Writethenewtotalbackto
***thecookieintheirbrowser
Response.Cookies("asphole")("totalvisit")=NumVisit
***Specifywhenthecookieexpires.
***Ifyoudont,thecookiewill
***expirewhentheuserclosestheir
***browser,andyoullloseallinfo.
Response.Cookies("asphole").Expires="January1,2020"
%>
-END-
大家可以自己去看一看.可以说看得想呕吐.以前有次下了个动网来看.里面连基本内置函数的保护措施(函数没防御性)都没有.难怪经常补这个补那个了.可能现在.NET版会好点吧 |
|