updateuseronline.txt

来自「ASP程序实现的科技期刊系统」· 文本 代码 · 共 22 行

/*
功能说明:自动更新用户在线状态，每20分钟更新一次
涉及数据对象:XT_TC_user
制做人:刘晓颖
制做日期:2003-1-15
*/
CREATE  PROCEDURE pr_XT_UpdateUserOL
AS
BEGIN TRANSACTION UpdateUserOL
UPDATE XT_TC_USER SET 登录时间='' 
WHERE datediff(minute,登录时间,getdate())>20
COMMIT TRANSACTION UpdateUserOL
IF @@ERROR=0 
   RETURN(0)
ELSE
   BEGIN
      ROLLBACK TRANSACTION UpdateUserOL
      RETURN(-1)
   END
GO