% Set Counters=server.createobject("MSWC.Counters") Counters.Set "cnbruce",10 Counters.set "it365cn",20 Counters.set "blueidea",30 %> 共有%= Counters.Get("cnbruce") %>次訪問 cnbruce.com 網(wǎng)站 br> 共有%= Counters.Get("it365cn") %>次訪問 it365cn.com 網(wǎng)站 br> 共有%= Counters.Get("blueidea") %>次訪問 blueidea.com 網(wǎng)站 br> |
% Set Counters=server.createobject("MSWC.Counters") %> 共有%= Counters.Increment("cnbruce") %>次訪問 cnbruce.com 網(wǎng)站 br> 共有%= Counters.Increment("it365cn") %>次訪問 it365cn.com 網(wǎng)站 br> 共有%= Counters.Increment("blueidea") %>次訪問 blueidea.com 網(wǎng)站 br> |
% 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> |
% set Counters=server.createobject("MSWC.Counters") vote = Request.QueryString("site") clear = Request.QueryString("clear") Counters.Increment(vote) If Not clear="" Then Counters.Remove("cnbruce") Counters.Remove("it365cn") Counters.Remove("blueidea") End If %> Vote for your Favorite Site: FORM NAME="Voting for Sites" METHOD="GET" ACTION="remove.asp"> input type="RADIO" NAME="site" VALUE="cnbruce">cnbruce input type="RADIO" NAME="site" VALUE="it365cn">it356cn 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") %> FORM NAME="Clear Counters" METHOD="GET" ACTION="remove.asp"> BR>INPUT TYPE="SUBMIT" VALUE="Clear the Counters" NAME="clear"> /FORM> |
標(biāo)簽:湖北 四平 防城港 平頂山 朝陽 遼陽 馬鞍山 孝感
巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《ASP編程入門進階(十五):組件Counters》,本文關(guān)鍵詞 ASP,編程,入門,進階,十五,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。