阳光网驿-企业信息化交流平台【DTC零售连锁全渠道解决方案】

 找回密码
 注册

QQ登录

只需一步,快速开始

扫描二维码登录本站

手机号码,快捷登录

手机号码,快捷登录

老司机
查看: 2054|回复: 1

CRM一个用户是不是同时只能登录一次?教你破掉它

[复制链接]

该用户从未签到

发表于 2009-6-16 21:54:59 | 显示全部楼层 |阅读模式
CRM一个用户是不是同时只能登录一次?

我为公司所有员工开一个账号“员工”然后大家都用这个账号登录来解决用户数限制问题--------是不是大家都有这种想法?CRM 7.0中就不可以,怎么解决呢?
很简单,在 CRM 安装目录里 ASP\verifyuser.asp  找到这个文件

然后修改其中这几行


Dim szOnlineOnlyOneIPAddress
Set objRs = objConn.Execute("SELECT IP FROM CRM_OnlineUser WHERE UserTypeID="&szTypeID)
If Not objRs.Eof Then
  If objRs("IP")<> "" And Request.ServerVariables("REMOTE_ADDR") <> objRs("IP") And getParameterValue("OnlineOnlyOneIPAddress")="Yes" Then
  %>
   <SCRIPT LANGUAGE=javascript>
   <!--
    alert('该用户已经登陆系统,不允许用同一账户在不同计算机同时登陆!');
    window.open( 'default.asp?NoClose=True' , '<% = WINDOW_NAME %>' , 'height='+ new String(screen.availHeight-28) + ',top=0,left=0,width=' + new String(screen.availWidth-10) + ',location=no,menubar=no,resizable=no,toolbar=no');
   //-->
   </SCRIPT>
  <%
   Session.Abandon
   Response.End
  End If
End If
Set objRs = Nothing




if 1=2 then
  
'判断是否已有该用户在线
Dim szOnlineOnlyOneIPAddress
Set objRs = objConn.Execute("SELECT IP FROM CRM_OnlineUser WHERE UserTypeID="&szTypeID)
If Not objRs.Eof Then
  If objRs("IP")<> "" And Request.ServerVariables("REMOTE_ADDR") <> objRs("IP") And getParameterValue("OnlineOnlyOneIPAddress")="Yes" Then
  %>
   <SCRIPT LANGUAGE=javascript>
   <!--
    alert('该用户已经登陆系统,不允许用同一账户在不同计算机同时登陆!');
    window.open( 'default.asp?NoClose=True' , '<% = WINDOW_NAME %>' , 'height='+ new String(screen.availHeight-28) + ',top=0,left=0,width=' + new String(screen.availWidth-10) + ',location=no,menubar=no,resizable=no,toolbar=no');
   //-->
   </SCRIPT>
  <%
   Session.Abandon
   Response.End
  End If
End If
Set objRs = Nothing

end if      'if 1=2

xfaeesdfds 于 2009-6-16 22:19 补充以下内容

倒,怎么移到这里来了? CRM 是任我行的软件呀?
楼主热帖
启用邀请码注册,提高发帖质量,建设交流社区

该用户从未签到

发表于 2009-8-2 09:44:19 | 显示全部楼层
高!!

谢谢啦
启用邀请码注册,提高发帖质量,建设交流社区
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表