用ASP编写计数器- ASP - 软晨网（RuanChen.com）

当前位置: 首页 > 图文教程 > 网络编程 > ASP > 用ASP编写计数器

ASP: [原创]asp下用实现模板加载的的几种方法总结; asp下利用fso实现文件夹或文件移动改名等操作函数; asp cint clng的范围与防止cint和clng的溢出解决方法大全; asp防范跨站点脚本攻击的的方法; 独孤剑写的马克斯迅雷片库采集插件1.4 官方最新版提供下载了; 根据日期得到生肖的ASP函数; 不错的主要用于加密的vbs(asp)位移运算类; Script.VBS.Agent.ai juan.vbs专杀; 循环取值Request.QueryString的用法; asp下实现字符串的补充fill(); 无服务器做任意二级米子站; 几种另类的ASP后门; asp事物功能简单小应用; ASP获取网页全部图片地址并保存为数组的正则; 通过客户端验证上传图片文件大小的ASP源码; asp下计算分页的几种方法; 谈动态多行多列，循环行和列，输出M行N列的ASP代码; asp在线执行sql语句的函数; asp正则html的图片,对图自动缩放大小; 文件名正则表达式提取方法

技术文章搜索

关键字

出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 156 ::

收藏到网摘: n/a

<%

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