 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<% 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> 返回类别: 教程 上一教程: ASP系列函数大全 下一教程: 随机访问RECORDSET的一条记录 您可以阅读与"用ASP编写计数器"相关的教程: · 用ASP编写计数器的方式 · 用ASP编写计数器的优化方式 · 用ASP编写图片计数器 · 编写“公平”的ASP图形计数器 · ASP计数器设计详解-2 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
