'操作限制函数 '塞北的雪 制作 '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