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

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

ASP: 超级ASP版DataGrid：SkyGrid本地下载; 用QuickWAP组件结合ASP建设Wap站点; ASP中取得图片宽度和高度的类（无组件）; 在ASP处理程序时显示进度; 结合FSO操作和Aspjpeg组件写的Class; asp实现的7xi音乐网的采集源代码; 用asp+xmlhttp编写web采集程序; 推荐ASP超速入门视频教程; 关于“未指定的错误”的问题的比较正解的解决方法; 用asp脚本实现限制IP访问; aspupload 3.0 下载与使用集锦; [教程+分享]具有良好体验度的Web注册系统; asp 实现视频显示的效果函数; asp实现图片右键滑轮控制大小的函数; 彻底掌握ASP分页技术杂谈; aspupload文件重命名及上传进度条的解决方法附代码; ASPJPEG综合操作的CLASS类; asp通用采集函数冗余版可以保存文件到本地; 使用ODBC数据库管理Serv-U的FTP用户及相关ASP编程[附源码示例下载]; [asp]阿里西西的alexa采集效果代码

技术文章搜索

关键字

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

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