以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  QQ断线后提示框取消  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=81176)

--  作者:ljh29206
--  发布时间:2016/2/20 8:35:00
--  QQ断线后提示框取消
请教如何取消 那个连线的提示框

不出现提示框,但保持断线重连

没找到代码在哪里

--  作者:Hyphen
--  发布时间:2016/2/20 8:49:00
--  
做个计时器,初始状态不启动:http://www.foxtable.com/help/topics/0657.htm

QQClient 的Disconnected 事件写代码:http://www.foxtable.com/help/topics/2996.htm

If e.Mode = 5 Then
    MyTimers("计划1").Enabled = True
End If

定时器调用登录代码,参考:http://www.foxtable.com/help/topics/2972.htm
代码类似:
If QQClient.Ready = False Then
    QQClient.ServerIP = "127.0.0.1"  \'指定服务器IP地址
    QQClient.ServerPort = 52177  \'指定服务器端口
    QQClient.UserName = "部门.用户" \'指定登录用户名
    QQClient.Password = "用户密码"
    If QQClient.Start() = True \'如果登录成功
        Dim msg As String =  "恭喜,OpenQQ登录成功!"
        If QQClient.ServerMessage > "" Then \'如果服务器返回了欢迎信息
            msg = msg & QQClient.ServerMessage
        End If
        popMessage(msg,"提示",PopiconEnum.Infomation,5) \'不需要提示可以去掉
\'关闭计时器的代码
MyTimers("计划1").Enabled = False
    Else \'如果登录失败,显示服务器返回错误信息
        PopMessage("QQClient登录失败,原因:" & vbcrlf & QQClient.ServerMessage,"提示",PopiconEnum.Error,5)\'不需要提示可以去掉
    End If
End If

--  作者:ljh29206
--  发布时间:2016/2/20 10:26:00
--  
我们用手提电脑要 经常移动 ,有时会在断网状态下工作,

但软件会保持开启,



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

我已经按版主的方案 进行连设置了,但右下角这个窗体还是老弹出来

能不能不让这个窗体弹出来 ,但 自动检测到网络后把QQ连上,不做任何提示

--  作者:Hyphen
--  发布时间:2016/2/20 11:09:00
--  
没有办法,每次服务器断线都会出这个提示。
--  作者:大红袍
--  发布时间:2016/2/21 11:39:00
--  

看看 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=77335&skin=0