变态重口极致另类在线-波多久久夜色精品国产-波多野结衣在线观看一区-波多野结衣在线观看一区二区-污污的网站免费阅读-污污视频网址

當前位置: 首頁IT技術 → ASP編寫計數器的實例分享

ASP編寫計數器的實例分享

更多

下面提供的是關于ASP編寫計數器的實例代碼分享,對ASP感興趣的朋友可以照著試一試。

<%
  
  dim fso,f,no,I '定義變量絕對是個好習慣
  
  Set fso = CreateObject("Scripting.FileSystemObject") '建立對象的實例
  
  Set f = fso.OpenTextFile(Server.MapPath("count.no"), 1, True) '建立文本文件,打開為只讀.
  
  if f.AtEndOfStream then '判斷這個文件是否不存在
  
  no=1
  
  else
  
  no=f.ReadLine
  
  no=no+1
  
  end if
  
  f.Close
  
  set f=fso.OpenTextFile(Server.MapPath("count.no"),2,True) '準備寫
  
  f.Write(no) '寫入
  
  f.Close
  
  '改進標志1
  
  no=CStr(no) '整齊數字
  
  for i=1 to 5-len(no)
  
  no="0"&no
  
  next
  
  %>
  
  <font color=white size=3pt>你是第<font color=red><%=no%></font>個來客</font>

熱門評論
最新評論
昵稱:
表情: 高興 可 汗 我不要 害羞 好 下下下 送花 屎 親親
字數: 0/500 (您的評論需要經過審核才能顯示)
主站蜘蛛池模板: 国产又湿又黄又硬又刺激 | 在线观看国产麻豆 | 一级毛片在线不卡直接观看 | 亚洲啪啪看看 | 成人叼嘿视频免费网站 | 日日摸夜夜添夜夜爽免费视频 | 久久com | 九九久久精品这里久久网 | 老湿影院福利 | 国产精品久久久久久免费播放 | 中文字幕在线观看免费 | 国产欧美成人不卡视频 | 久草福利视频 | 免费人成激情视频在线观看 | 久久99久久99精品免观看麻豆 | 一个人看www免费视频 | 色免费看| 99久久亚洲 | 国产成人精品视频频 | 国产hd高清freexxxx | 国产黄色大片网站 | 天天操天天插 | 一级在线 | 欧洲 | 欧美丝袜制服 | 国产成人18黄网站免费 | 我要看一级大片 | 成人免费高清视频 | 国产字幕制服中文在线 | 国产精品一区二区手机看片 | 成人网欧美亚洲影视图片 | 春意影院午夜爽爽爽免费 | 成人毛片100部免费看 | 日韩国产精品欧美一区二区 | 加勒比一本大道香蕉在线视频 | 丝袜紧身裙国产在线播放 | 中文字幕一区二区区免 | 黄色免费在线网址 | 亚洲综合区小说区激情区噜噜 | 国产一区免费在线观看 | 成人激情黄色 | 国产a久久精品一区二区三区 |