以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Open QQ阿里云使用请教!  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=143194)

--  作者:lanbor
--  发布时间:2019/11/17 11:32:00
--  Open QQ阿里云使用请教!
情况:
我参考老师在网上发布的阿里云配置方法,正确配置云服务。
1.首先是在云服务器上创建的:open qq 用户名单;
2.并把Open QQServer 服务器的用户信息“中文字段名称”变更成了英语名称(依次为:s_dept,s_name,s_pass,s_friend)
3.增加了相关随机端口范围;
4.Open QQServern发布后,复制到云端,能正常启动。
5.客户端也能成功登录;

问题:
打开聊天窗口功能里,无法看到人员名单;
还请老师指点;

--  作者:有点蓝
--  发布时间:2019/11/17 20:10:00
--  
用户信息存储的是什么数据?UserLogging事件的代码贴出来看看。
--  作者:lanbor
--  发布时间:2019/11/17 20:27:00
--  以下是UserLogining代码,就是变更了用户信息表字段名
以下是UserLogining代码,就是变更了用户信息表字段名

Dim pts() As String = e.UserName.Split(".")
Dim dr1 As DataRow
dr1 = DataTables("qq_user").Find("s_dept = \'" & pts(0) & "\' And s_name = \'" & pts(1) & "\'")
If dr1 Is Nothing  Then \'判断此用户不存在
    e.Message  = "用户名错误!" \'返回给登录者的提示信息
    Return
End If
If dr1("s_pass") <> e.Password Then \'如果密码错误
    e.Message  = "登录密码错误!" \'返回给登录者的提示信息
    Return
End If
e.Success = True \'允许用户登录
\'添加所有同事为好友
For Each dr2 As DataRow In DataTables("qq_user").DataRows
    Dim nm As String =  dr2("s_dept") & "." & dr2("s_name")
    If nm <> e.UserName Then \'如果不是登录者本人
        e.Buddies.Add(nm)
    End If
Next

1.客户端用户能够正确登录。
2.用户表里的信息与样本信息一样内容。

[此贴子已经被作者于2019/11/17 20:30:20编辑过]

--  作者:有点蓝
--  发布时间:2019/11/17 20:38:00
--  
msgbox(e.UserName) \'都弹出什么内容?

\'添加所有同事为好友
For Each dr2 As DataRow In DataTables("qq_user").DataRows
    Dim nm As String =  dr2("s_dept") & "." & dr2("s_name")
msgbox(nm ) \'都弹出什么内容?
    If nm <> e.UserName Then \'如果不是登录者本人
        e.Buddies.Add(nm)
    End If
Next

--  作者:lanbor
--  发布时间:2019/11/17 21:03:00
--  2个信息都在服务大端显示了正常信息。

有点蓝老师,抱歉,原因可以是我在样本里面增加了过多的测试部门名称;

总共有24个部门名称,但是它在本地测试的时候,客户端能显示出所有部门名称和成员;
当我把有服务器移置到云端后,客户端就无法显示出所有部门和用户名了;

后来,我删除了服务器上多数部门,只留下了5个部门,客户端就显示出部门和用户了。

请问:
1.在用户信息中,最多可以建几个平级部门名称?
2.实际工作中,要审批、就需要用到树状结构的部门信息?
3.那种树状关系的部门结构如何在QQServer用户表中体现出来?
谢谢你!
[此贴子已经被作者于2019/11/17 21:41:52编辑过]

--  作者:有点蓝
--  发布时间:2019/11/17 21:56:00
--  
1、不可能有这种限制的,可能是自己代码或者表数据的问题
2、是不是需要树状结构根据自己的业务需求判断
3、树状部门结构处理有点麻烦,很多使用需要用到递归处理,比如:http://www.foxtable.com/webhelp/topics/2416.htm