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

當前位置: 首頁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 (您的評論需要經過審核才能顯示)
主站蜘蛛池模板: 欧美大片大片播放网站 | 日本大片成人免费网址 | 久久久国产成人精品 | 亚洲一区中文 | 午夜视频免费在线 | 天天干天天摸天天操 | 真正免费一级毛片在线播放 | 免费观看欧美一级片 | 免费一级黄色毛片 | 美腿丝袜中文字幕 | 精品一区二区三区高清免费观看 | 国产成人在线播放视频 | 欧美成人一级片 | 亚洲一区在线视频观看 | 亚洲视屏在线观看 | 日韩亚洲人成在线综合日本 | 欧美太黄太色视频在线观看 | 99久久精品免费 | 成人av手机在线观看 | 国产粉嫩嫩00在线正在播放 | 高h浪诱受肉耽文 | 高清欧美在线三级视频 | 日本一区二区在线 | 欧美日韩一二三四区 | 天天看天天摸 | 亚洲欧美日韩综合网导航 | 精品精品| 黄色成人在线播放 | 久久免费视频网站 | 男女午夜视频在线观看 | 日噜噜 | 日本欧美一区二区免费视 | 一集黄色片 | 免费观看黄色毛片 | 久久精品无码一区二区日韩av | 日韩操操 | 国产色婷婷免费视频 | 亚洲欧美精品伊人久久 | 五月婷婷久 | 日本狠狠干 | 羞羞视频免费网站欧美 |