以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]OPenQQ在服务器端出现错误？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99537)
--  作者：新福星
--  发布时间：2017/4/21 6:42:00
--  [求助]OPenQQ在服务器端出现错误？
阿里云服务器。

Dim IPAdress As System.Net.IPAddress
IPAdress = System.Net.Dns.GetHostByName(HostName).AddressList.GetValue(0) \'获得本机的IP
在打开窗口事件中获取本机IP，并记存在数据库表中以便客户端取用。
已经有若干个系统采用此办法运行正常。

一个新的阿里云服务器仍然用上述办法，获取到的ip地址竟然是阿里云服务器的私有地址而不是公网地址。
获取私有地址后服务器程序可以正常打开，显然客户端是打不开的。

在服务器端人工改动IP使用公网地址，这时就出现了错误提示。

 

 


此主题相关图片如下：qq截图20170421063853.png
按此在新窗口浏览图片

 

 

QQServer.ServerIp = e.Form.Controls("txtIP").Value \'指定IP地址
QQServer.ServerPort = e.Form.Controls("txtPort").Value \'指定端口
QQServer.HeartbeatInterval = e.Form.Controls("txtInterval").Value \'指定心跳时间
QQServer.HeartbeatTimeout = e.Form.Controls("txtTimeOut").Value \'指定心跳超时时间


QQServer.Start() \'启动QQServer

 

经测试是在QQServer.Start()这条语句出的错误。怎么解决呢？谢谢


 
--  作者：xiaoohoo
--  发布时间：2017/4/21 7:45:00
--  
所有服务端均使用0.0.0.0。
--  作者：有点色
--  发布时间：2017/4/21 8:35:00
--  
 服务器端，没必要填写ip的，留空，或者填写0.0.0.0都可以