- 1PS提示：因?yàn)閳D層已鎖定，無法編輯圖層的處理方法
- 2Adobe Illustrator CS5 序列號大全
- 3picacg蘋果版怎么找不到|picacg ios版是不是下架了介紹
- 4ACDsee注冊碼免費(fèi)分享（含ACDsee18、ACDsee10等版本）
- 5蘋果iphone自動時間不準(zhǔn)確的多種校正方法
- 6PDF瀏覽器能看3D文件嗎？PDF瀏覽器看3D文件圖文詳細(xì)教程
- 7Potato(馬鈴薯聊天)怎么注冊不了|Potato不能注冊處理方法介紹
- 8Potato(土豆聊天)怎么換頭像|Potato app更改頭像方法介紹
- 9ipad版office如何激活? office365激活的圖文說明教程
- 10最新的Adobe Illustrator CS4序列號大全
- 11Mac怎么通過設(shè)置VPN來登錄youtube等國外網(wǎng)站
- 12qq郵件是否已讀怎么看 QQ郵箱已經(jīng)發(fā)出去的郵件怎么知道對方是否已經(jīng)查看
聊天工具辦公軟件殺毒教程系統(tǒng)工具圖形圖像電腦學(xué)習(xí)應(yīng)用軟件網(wǎng)絡(luò)軟件蘋果應(yīng)用注冊碼網(wǎng)站教程技術(shù)開發(fā)安卓教程其它教程
您當(dāng)前所在位置：網(wǎng)視手游站 -> 網(wǎng)站教程 -> 用ASP完成免費(fèi)計(jì)數(shù)器提供-1
用ASP完成免費(fèi)計(jì)數(shù)器提供-1
發(fā)表時間：2024-01-03 來源：明輝站整理相關(guān)軟件相關(guān)文章人氣：
[摘要]要實(shí)現(xiàn)免費(fèi)提供計(jì)數(shù)器,我們必須準(zhǔn)備代表0-9這10個數(shù)字的gif圖片，便依次命名為0.gif-9.gif.在主頁目錄下建立一個目 錄free,把圖片文件counter.asp,user.html,reg.asp,manage.asp,dele.asp,easpcount.asp放在free目錄下....
要實(shí)現(xiàn)免費(fèi)提供計(jì)數(shù)器,我們必須準(zhǔn)備代表0-9這10個數(shù)字的gif圖片，便依次命名為0.gif-9.gif.在主頁目錄下建立一個目
錄free,把圖片文件counter.asp,user.html,reg.asp,manage.asp,dele.asp,easpcount.asp放在free目錄下.
1.存放用戶數(shù)據(jù)的記數(shù)文件counter.asp
<%Response.Write "拒絕訪問！" : Response.end%>
2.用戶申請程序:user.html
<html><title>計(jì)數(shù)器申請</title>
<body style="background-color:#f7f7fb">
<form name="formname" action="reg.asp" method=post >
<p align="center" style="font-size:24pt;font-weight:bold;color:#800000">計(jì)數(shù)器申請</p>
<table border="0" cellspacing="0" width="300" style="font-size:10pt">
<tr><td align="left">用戶名稱:<input type="text" size="30" name="name"></td></tr>
<tr><td align="left">用戶密碼:<input type="password" size="30" name="pass"></td></tr>
<tr><td align="left">主頁名稱:<input type="text" size="30" name="homename"></td></tr>
<tr><td align="left">主頁地址:<input type="text" size="30" name="url" ></td> </tr>
<tr><td align="left">
<input type="submit" value="完 成"> <input type="reset" value="取 消">
</td></tr></table></form></body>
3.處理用戶申請程序reg.asp
<%
Response.Expires=0
dim input()
name = Request.Form("name")
pass = Request.Form("pass")
homename = Request.Form("homename")
url = Request.Form("url")
infile = server.mappath("counter.asp")
Set fs = CreateObject("Scripting.FileSystemObject")
Set thisfile = fs.OpenTextFile(infile,1,False)
counter = 0
do while not thisfile.AtEndOfStream
thisline = thisfile.readline
Redim preserve input(counter)
input(counter) = thisline
counter = counter + 1
loop
thisfile.Close
for i=0 to counter-1
if name=input(i) then
Response.write "<body bgcolor=#f7f7fb><p> <p align='center'>對不起，已有這個用戶名</p>"
Response.write "<p align='center'><a href='javascript:history.go(-1);'>點(diǎn)擊這里進(jìn)行修改</a></p></body>"
Response.end
exit for
end if
next
Set outfile = fs.CreateTextFile(infile)
outfile.WriteLine input(0)
outfile.WriteLine name
outfile.WriteLine pass
outfile.WriteLine homename
outfile.WriteLine url
outfile.WriteLine 0
for i=1 to counter-1
outfile.WriteLine input(i)
next
outfile.close
set fs=nothing
strs="<script src=http://gp/wwwroot/free/easpcount.asp?id="&name&"></script>"
'src中"http://gp/wwwroot/"為你的主頁空間主目錄
Response.write "<body bgcolor=#f7f7fb><p> <p align='center'><font style='color:red'>"&name&"</font> 你已申
請成功,請將以下代碼粘貼到你的網(wǎng)頁代碼中</p>"
Response.write "<p align='center' style='color:#800000'>"&server.htmlencode(strs)&"</p>"
Response.end
%>
---------------------------------------------------
（出處：熱點(diǎn)網(wǎng)絡(luò)）
標(biāo)簽：用ASP完成免費(fèi)計(jì)數(shù)器提供-1
推薦資訊 總?cè)藲獍?/span>
最新教程 本月人氣
- 1ios8.0.1更新了什么？蘋果ios8.0.1更新內(nèi)容
- 2ios7.1.2關(guān)閉驗(yàn)證了嗎？蘋果ios7.1.2驗(yàn)證有沒有關(guān)閉
- 3ios8.0.1如何？蘋果ios8.0.1技巧評測(附固件下載)
- 4ios8照片流不見了？在什么地方里？ios8照片流位置
- 5iphone6群發(fā)短信圖文說明教程 蘋果6如何群發(fā)短信步驟
- 6ios8最近聯(lián)系人如何刪除？ios8正式版最近聯(lián)系人刪除圖文說明教程
- 7ios8最近使用如何刪除？ios8最近使用刪除圖文說明教程
- 8ios8降級ios7.1.2圖文說明教程 ios8正式版降級ios7步驟
- 9ios8 wifi不穩(wěn)定如何辦？ios8正式版wifi不穩(wěn)定處理方法
- 10ipad air充電器可以充iphone6 plus嗎
- 11ipad air充電器可以充iphone6嗎？ipad與iphone6充電器通用嗎
- 12iphone6用什么sim卡？iphone6 sim卡分類
- 1iphone6電池百分比設(shè)置圖文說明教程 蘋果6電量百分比顯示方法
- 2iphone6用什么sim卡？iphone6 sim卡分類
- 3ipad air充電器可以充iphone6嗎？ipad與iphone6充電器通用嗎
- 4ipad air充電器可以充iphone6 plus嗎
- 5ios8 wifi不穩(wěn)定如何辦？ios8正式版wifi不穩(wěn)定處理方法
- 6ios8降級ios7.1.2圖文說明教程 ios8正式版降級ios7步驟
- 7ios8最近使用如何刪除？ios8最近使用刪除圖文說明教程
- 8ios8最近聯(lián)系人如何刪除？ios8正式版最近聯(lián)系人刪除圖文說明教程
- 9iphone6群發(fā)短信圖文說明教程 蘋果6如何群發(fā)短信步驟
- 10ios8照片流不見了？在什么地方里？ios8照片流位置
- 11ios8.0.1如何？蘋果ios8.0.1技巧評測(附固件下載)
- 12ios7.1.2關(guān)閉驗(yàn)證了嗎？蘋果ios7.1.2驗(yàn)證有沒有關(guān)閉
相關(guān)文章
- asp性能測試報(bào)告（轉(zhuǎn)）（7）
- 數(shù)據(jù)結(jié)構(gòu)與算法(C#完成)系列---樹(一)
- JSP技術(shù)簡介
- 設(shè)置 VMware通過令牌訪問LAN
- 10天學(xué)會ASP.net之第3天
- 淺談asp編程中的測試打印、有效果性檢查及出錯處理
- 虛擬機(jī)軟件說明：VMWare & Virtual PC
- 數(shù)據(jù)庫的日期格式轉(zhuǎn)換
- JSP顯示中文問題的處理方案
- asp性能測試報(bào)告（轉(zhuǎn)）（6）
- 使用C#完成分布式數(shù)據(jù)庫查詢
- 開發(fā)基礎(chǔ) OpenGL極速基礎(chǔ)寶典
