VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
楼主: 19900603

[推荐] UPNP穿透NAT 测试成功 + 源码

  [复制链接]
 楼主| 发表于 2012-12-18 23:34:22 | 显示全部楼层
- - ! 知道了。。 可能是 获取设备控制页的问题  前面的地址没处理掉
回复 支持 反对

使用道具 举报

 楼主| 发表于 2012-12-18 23:39:47 | 显示全部楼层
bbb620 发表于 2012-12-18 23:25
测试结果
HTTP/1.0 500 Internal Server Error
CONTENT-LENGTH: 474



搜索
ControlUrl = FindStrRev(PageText, "<controlURL>", "</controlURL>")

替换成
ControlUrl = FindStrRev(PageText, "<controlURL>", "</controlURL>")
If InStr(ControlUrl, ":1900") > 0 Then
   ControlUrl = Mid(ControlUrl, InStr(ControlUrl, ":1900") + 5)
End If
                                    



再试试看下
回复 支持 反对

使用道具 举报

发表于 2012-12-18 23:44:21 | 显示全部楼层
19900603 发表于 2012-12-18 23:39
搜索
ControlUrl = FindStrRev(PageText, "", "")

还是不行

HTTP/1.0 500 Internal Server Error
CONTENT-LENGTH: 474
CONTENT-TYPE: text/xml; charset="utf-8"
DATE: Tue, 18 Dec 2012 23:42:48 GMT
EXT:
SERVER: ipos/7.0 UPnP/1.0 TL-WR941N/4.0/5.0

<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
<SOAP-ENV:Body>
<SOAP-ENV:Fault>
<faultcode>SOAP-ENV:Client</faultcode>
<faultstring>UPnPError</faultstring>
<detail>
<UPnPError xmlns="urn:schemas-upnp-org:control-1-0">
<errorCode>-1</errorCode>
<errorDescription>Invalid Action</errorDescription>
</UPnPError>
</detail>
</SOAP-ENV:Fault>
</SOAP-ENV:Body>
</SOAP-ENV:Envelope>
回复 支持 反对

使用道具 举报

发表于 2012-12-19 14:36:48 | 显示全部楼层
表示还是不行 无法获取外网IP 是不是外网是动态IP的话 就无法正常获取呢?还有就是 打洞后人家无法连接到我的电脑 不像端口映射那样便捷。。。。

点评

http://bbs.routerclub.com/forum.php?mod=viewthread&tid=47123  发表于 2012-12-19 18:19
回复 支持 反对

使用道具 举报

 楼主| 发表于 2012-12-19 14:44:39 | 显示全部楼层
qq275158045 发表于 2012-12-19 14:36
表示还是不行 无法获取外网IP 是不是外网是动态IP的话 就无法正常获取呢?还有就是 打洞后人家无法连接到我 ...

我的就是动态的!!能获取啊!你什么牌子路由器?还有打洞可以外网连接的啊!是不是哪没设置好?

点评

TP 的!本地的话 连接没问题 就算改成外网IP 一样能连接 但人家就是连不进来!但做映射的话就可以!  发表于 2012-12-19 14:50
回复 支持 反对

使用道具 举报

发表于 2012-12-19 21:51:01 | 显示全部楼层
呵呵,非常不错的
回复 支持 反对

使用道具 举报

发表于 2012-12-19 22:08:39 | 显示全部楼层
19900603 发表于 2012-12-18 21:44
获取IP失败的 覆盖以下代码测试下 结果请回帖说明

我也一样获取不到外网IP

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
回复 支持 反对

使用道具 举报

 楼主| 发表于 2012-12-20 08:40:56 | 显示全部楼层
Upnp端口映射 必须用到
SSDP Discovery Service
Universal Plug and Play Device Host
两项服务的支持
回复 支持 反对

使用道具 举报

发表于 2012-12-20 11:57:25 | 显示全部楼层
本帖最后由 bbb620 于 2012-12-20 11:58 编辑

我的也是TP-LINK的路由,家里的无线路由不能获取外网地址,也无法映射端口,在网吧测试,不能获取外网IP,但能映射端口
看来,可能是TP-LINK路由有点特殊吧
回复 支持 反对

使用道具 举报

发表于 2012-12-20 17:07:28 | 显示全部楼层
话说 是不是开启了路由防火墙!打洞后外网无法连接到本地中!

点评

你测试了??  发表于 2012-12-20 22:56
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2022-6-29 02:50

VB爱好者乐园(VBGood)
快速回复 返回顶部 返回列表