Foxtable(狐表)用户栏目专家坐堂 → [求助]指定端口和IP地址的提示。


  共有3890人关注过本帖树形打印复制链接

主题:[求助]指定端口和IP地址的提示。

帅哥哟,离线,有人找我吗?
2900819580
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1302 积分:9451 威望:0 精华:0 注册:2015/6/30 8:46:00
[求助]指定端口和IP地址的提示。  发帖心情 Post By:2022/6/27 22:39:00 [只看该作者]


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

最近老弹出这样的提示,我应该怎么检查。

软件可以正常登录,就是长时间不用就会这样。
[此贴子已经被作者于2022/6/27 22:40:34编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/27 23:00:00 [只看该作者]

检查项目所有调用下面代码的地方,有没有正常设置ip和端口:
QQClient.Start()

 回到顶部
帅哥哟,离线,有人找我吗?
2900819580
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1302 积分:9451 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2022/6/28 6:53:00 [只看该作者]

老师,这个没有设置,因为在登录窗体时有设置,这个代码一直没改,为什么之前不会有问题。
2、因为总是会掉线,才加了红色这行代码?老师掉线的原因是什么?如何解决?(不存在网络问题,服务和数据库都是本机。开发状态)

        If e.Form.Controls("Text单据编号").text > "" Then
        Else
'            If QQClient.Ready = False Then QQClient.Start 
            If QQClient.Ready Then
                e.Form.Controls("Text单据编号").text = QQClient.SendWait("GetBH@_生产领料", 5)
            Else
                MessageBox.Show("服务器未正常工作,请与管理员联系!")
                Exit Sub
            End If
        End If

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/28 8:33:00 [只看该作者]

上面代码放在哪里的?登录窗口设置登录openqq的代码发上来看看,使用的ip和端口发上来看看

 回到顶部
帅哥哟,离线,有人找我吗?
2900819580
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1302 积分:9451 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2022/6/28 22:26:00 [只看该作者]

代码放在登录按钮上。   
 _QQName = _BmNmae & "." & _UserName
    errlog &= vbcrlf & Date.Now & ">6>>>:设定【UserID】 = " & _userid & ",设定【UserName】" & _UserName & ",成功!!!"
    QQClient.ServerIP = e.Form.Controls("txtIP").Value 
    QQClient.ServerPort = e.Form.Controls("Txtport").Value 
    QQClient.UserName = _QQName
    QQClient.Password = Functions.Execute("加密", e.Form.Controls("txt密码").text)
If QQClient.Start() = True Then '如果登录成功


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



 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/28 23:02:00 [只看该作者]

搜索一下全部代码,看看有没有其它地方清空了QQClient.ServerIP

 回到顶部