直播中
'操作限制函数
'塞北的雪 制作
'www.knowsky.com
 'SessionName  session的名字
 'SecondSpan   时间间隔(单位:秒)
 function CanDoRepeat(SessionName,SecondSpan)
 xx=timer()
 if session(SessionName)="" then  
     session(SessionName)=xx
 else
     if xx-session(SessionName)<SecondSpan then
        CanDoRepeat=false
     else
        session(SessionName)=xx
        CanDoRepeat=true
     end if
 end if
 end function