<%
set fs=server.createobj("scripting.filesystemobject")
    fn=server.mappath("count.txt")
    set read=fs.opentextfile(fn ,1, false )
    num=read.readline
    response.write num
    set writ= fs.opentextfile(fn,2,false )
    writ.writeline num+1      %>
这段代码就能实现这个功能，不过要求服务器有fso 权限，而且要先建好count.txt这个文本文件，里面的数字就是计数器的数

可以，不过要for,next语句，你要的话把信箱地址留下。