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

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

ASP: ASP编程中20个非常有用的例子; 省名与城名下拉选择框联动; ASP有函数可以把某个网页通过STREAM下载吗？; 用Regular Expression来改变HTML代码; 控制输出字符串的长度，可以区别中英文; 教你做小偷程序容易学; 小偷程序原理和简单示例; 好漂亮的钟[代码]; 实现WEB中的@虚拟域名系统原理篇; ASP对excel的操作; 将服务器端文件夹下的文件，按文件建立的时间先后排序; 存储过程编写经验和优化措施; 存储过程入门; 在ASP中怎樣用Excel寫報表; 在ASP中使用Oracle数据库技巧(1); 在ASP中使用Oracle数据库技巧(2); 在ASP中使用断开的记录集; 披著羊皮的大野狼 Session; 两级联动的select XML版; 判断checkbox是否至少有选择一项

技术文章搜索

关键字

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

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