国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

ASP編程入門進階(十五):組件Counters

2024-05-04 11:02:15
字體:
來源:轉載
供稿:網友
該組件用于創建一個或多個計數器,這些計數器用于跟蹤某一網頁或某一網站訪問次數的信息。你只能創建一個計數器組件,但該組件可以有多于一個的計數器。

一旦創建了計數器,它將一直持續下去直到被刪除為止。

計數器不會在一個事件比如訪問一頁時自動增加。你必須使用Set和Increment方法人工的設置或增長計數器。

計數器不受作用域限制。一旦創建了一個計數器,那么站點上的任何頁都可以檢索和控制它的值。

一、Counters.Set & Counters.Get
Counters.Set主要用來設置記數初始值,Counters.Get則是用來提取記數的值。

1,counts_set.asp

<%
Set Counters=server.createobject("MSWC.Counters")
Counters.Set "cnbruce",10
Counters.set "it365cn",20
Counters.set "blueidea",30
%>
共有<%= Counters.Get("cnbruce") %>次訪問 cnbruce.com 網站 <br>
共有<%= Counters.Get("it365cn") %>次訪問 it365cn.com 網站 <br>
共有<%= Counters.Get("blueidea") %>次訪問 blueidea.com 網站 <br>


用法很簡單,首先“Counters=server.createobject("MSWC.Counters")”表示建立了一Counters組件的連接;Counters.Set "cnbruce",10表示記數了名為“cnbruce”的初始值10;Counters.Get("cnbruce")就表示提取名為“cnbruce”的記數值了。

二、Counters.Increment
該方法的功能是:記數每次加一。在上例中你刷新頁面,記數是不會添加的,所以現在換用Increment方法。

2,counts_inc.asp

<%
Set Counters=server.createobject("MSWC.Counters")
%>
共有<%= Counters.Increment("cnbruce") %>次訪問 cnbruce.com 網站 <br>
共有<%= Counters.Increment("it365cn") %>次訪問 it365cn.com 網站 <br>
共有<%= Counters.Increment("blueidea") %>次訪問 blueidea.com 網站 <br>


基本代碼相似,主要就是Counters.Increment的功能累加1。

根據累加可以做個簡單的投票系統了。

3,vote.asp

          <%
          set Counters=server.createobject("MSWC.Counters")
          vote = Request.QueryString("site")
          Counters.Increment(vote)
          %>
          Vote for your Favorite Site:
          <FORM NAME="Voting for Sites" METHOD="GET" ACTION="vote.asp">
          <input type="RADIO" NAME="site" VALUE="cnbruce">cnbruce
          <input type="RADIO" NAME="site" VALUE="it365cn">it365cn
          <input type="RADIO" NAME="site" VALUE="blueidea">blueidea
          <BR><INPUT TYPE="SUBMIT" VALUE="Submit Vote">
          </FORM>
          Current Vote Tally:<BR>
          Cnbruce: <% =Counters.Get("cnbruce") %><BR>
          It365cn: <% = Counters.Get("it365cn") %><BR>
          Blueidea: <% = Counters.Get("blueidea") %><BR>
          發表評論 共有條評論
          用戶名: 密碼:
          驗證碼: 匿名發表
          主站蜘蛛池模板: 广西| 招远市| 遂川县| 墨竹工卡县| 申扎县| 弥勒县| 玉环县| 麻城市| 内黄县| 禄丰县| 芦山县| 上林县| 扎兰屯市| 大渡口区| 无为县| 三门县| 浦北县| 柳河县| 同仁县| 淮安市| 乐至县| 巴里| 织金县| 惠东县| 大关县| 通化县| 金寨县| 丰镇市| 上饶县| 绩溪县| 信丰县| 六安市| 临夏县| 商水县| 鄂尔多斯市| 齐齐哈尔市| 岳普湖县| 名山县| 尖扎县| 马边| 黑河市|