以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于OpenQQ用户表的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=107894)

--  作者:xy0739
--  发布时间:2017/10/12 9:47:00
--  [求助]关于OpenQQ用户表的问题
我的用户表用的是外部表,如果使用OpenQQ的可不可以直接使用用户表?

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


看帮助,是需要在OpenQQ服务端再建一个用户表,用来存储用户名,密码、部门和好友。。。

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

我想只用一个用户表,在登录系统的同时,自动登录OpenQQ客户端

请老师指点下

[此贴子已经被作者于2017/10/12 9:49:28编辑过]

--  作者:狐狸爸爸
--  发布时间:2017/10/12 9:51:00
--  
http://www.foxtable.com/webhelp/scr/3015.htm


--  作者:客人
--  发布时间:2017/10/12 11:16:00
--  
服务端和客户端必须要做两个不同的项目吗?
--  作者:有点甜
--  发布时间:2017/10/12 12:08:00
--  
以下是引用客人(110.74.*.*)在2017/10/12 11:16:00的发言:
服务端和客户端必须要做两个不同的项目吗?

 

服务器端要单独做一个项目,当然,你可以直接拷贝原来的项目然后修改加上openQQ的功能。

 

 


--  作者:xy0739
--  发布时间:2017/10/12 13:14:00
--  回复:(有点甜)以下是引用客人(110.74.*.*)在2017/1...
明白,

那么服务端,能不能启动后只显示这么一个窗口呢?

图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看

--  作者:xy0739
--  发布时间:2017/10/12 14:31:00
--  
我启动QQ客户端,提示错误。


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


以下是代码,我是写在AfterOpenProject 中

If QQClient.Ready Then
    MessageBox.show("QQClient已经启动,请先关闭","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Return
End If
QQClient.ServerIP = "127.0.0.1"  \'指定服务器IP地址
QQClient.ServerPort = "52177"  \'指定服务器端口
If user.Type = UserTypeEnum.User Then \'如果是普通用户
    QQClient.UserName =""
    QQClient.Password = ""
Else \'如果是开发者或管理员
    Dim pwd As String
    If InputPassWord(pwd,"提示","请输入" & User.Name & "的密码:") Then
        QQClient.UserName = User.Name
        QQClient.Password = pwd
    Else
        Return
    End If
End If
If QQClient.Start() = True \'如果登录成功
    Dim msg As String =  "恭喜,OpenQQ登录成功!"
    If QQClient.ServerMessage > "" Then \'如果服务器返回了欢迎信息
        msg = msg & QQClient.ServerMessage
    End If
    ConfigBar.Items("OpenQQ").SmallImage = GetImage("online.ico")
    popMessage(msg,"提示",PopiconEnum.Infomation,5)
Else \'如果登录失败,显示服务器返回错误信息
    PopMessage("QQClient登录失败,原因:" & vbcrlf & QQClient.ServerMessage,"提示",PopiconEnum.Error,5)
End If

服务端是启动了的,我用的是开发者登录,有弹出输入密码的对话框,输入密码之后就弹出这个错误。

我用其他普通用户登录也是提示这个。

请帮看看我哪里错了。

我用的是外部表

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看


[此贴子已经被作者于2017/10/12 14:32:23编辑过]

--  作者:有点甜
--  发布时间:2017/10/12 14:42:00
--  

参考

 

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=107462&authorid=0&page=0&star=3

 

如果还有问题,实例发上来测试。


--  作者:xy0739
--  发布时间:2017/10/12 15:44:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:openqqtest.zip


老师,你帮看看,我用的示例文件

我在设置外部用户表时提示错误。

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20171012144330.png
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2017/10/12 16:27:00
--  

用户表,参考

 

下载信息  [文件大小:10.1 KB  下载次数:9]
图片点击可在新窗口打开查看点击浏览该文件:用户.zip

 

http://www.foxtable.com/webhelp/scr/2723.htm

 


--  作者:xy0739
--  发布时间:2017/10/12 16:56:00
--  回复:(有点甜)用户表,参考 下载...
上个压缩包是我搞错了,请看这个,我按照帮助做的,但是还是提示未知错误,实在想不明白。。。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:openqqtest.zip