利用Session限制重复操作的简单方法

有时我们要限制用户重复刷新一个页面。很多站点对于录入操作都用验证码来限制恶意灌水。但是如果是在一套web管理系统中，执行一段没有界面的逻辑操作代码时，就不能用验证码了。我们一般用session来限制。下面就是一个包装的函数，用法很简单。

'操作限制函数
'塞北的雪 制作
 'SessionName  session的名字
 'SecondSpan   时间间隔（单位：秒）
 function CanDoRepeat(SessionName,SecondSpan)
 xx=timer()
 if session(SessionName)="" then 
     session(SessionName)=xx
 else
     if xx-session(SessionName)        CanDoRepeat=false
     else
        session(SessionName)=xx
        CanDoRepeat=true
     end if
 end if
 end function