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

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

ASP: 一种比较方便的ASP分页程序; 用一套论坛程序架设多个论坛; ASP与ASP.NET在COOKIE方面的区别; 较长数据无法在Asp页面中取出的三种解决方法; 初试WAP之wml＋ASP查询; 动态网站首页的静态生成方法; 使用正则表达式实现模式图片新闻.ASP; 让你的WAP网站有更好的兼容性; WAP版的手机号码所在地查询; asp模仿 Lotus Notes 的界面程序; ORACLE920与ASP的连接问题的解决办法; 利用SQLSERVER存储过程实现ASP用户身份验证; 在ASP中自动创建多级文件夹的函数(使用FSO); 利用instr()函数防止SQL注入攻击; 利用XSL和ASP实现XML文档在线编辑; 表单对象textarea内容的格式控制（回车、换行、空格）; 针对select写了一个通用的option输出函数; ASP无组件BMP汉字生成类+汉字点阵库; 时间、空间性能极优的asp无组件上传类; 无组件生成BMP验证码

技术文章搜索

关键字

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

收藏到网摘: 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