以文本方式查看主题

-  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=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都可以