admin管理员组

文章数量:1530518

2024年6月18日发(作者:)

[转载]用Delphi实现自动NAT(5)

原文地址:用Delphi实现自动NAT(5)作者:枫枫

用Delphi实现自动NAT(5)

[ quickburro 发表于 2007-8-7 9:26:00 ]

3、运行结果

Build并运行上述程序,从Memo1里可以看到整个工作过程,可

以看出,搜索设备、取控制页URL、增加端口映射项、查看映射项参

数、删除映射项等关键步骤均符合我们预期的设想。因此,完全可以

在您的应用中把本程序的有关内容集成进去。

------------------------------------------------------------------

--------

(1)、以下是“搜索设备”的工作过程信息:

------------------------------------------------------------------

--------

发出了如下命令:

M-SEARCH * HTTP/1.1

HOST: 239.255.255.250:1900

MAN: "ssdp:discover"

MX: 3

ST: upnp:rootdevice

从192.168.0.1:1900收到289个字节的数据!

收到的信息如下:

HTTP/1.1 200 OK

Cache-Control: max-age=1800

Date: Thu, 01 Jan 1970 00:37:12 GMT

Ext:

Location:

Server: os/ver 2.0 UPnP/1.0 router/(5+20).1.2.99

ST: upnp:rootdevice

USN:

0b624d01bfb4::upnp:rootdevice

*******************************************

Location=

Device IP=192.168.0.1

Device Port=1780

Server=os/ver 2.0 UPnP/1.0 router/(5+20).1.2.99

USN=uuid:7fff6211-b0fa-4075-a15c-

0b624d01bfb4::upnp:rootdevice

*******************************************

------------------------------------------------------------------

--------

(2)、以下是“获取控制页URL”的工作过程信息:

------------------------------------------------------------------

--------

向192.168.0.1:1780设备发起连接...

与192.168.0.1:1780设备成功连接

向192.168.0.1:1780提交如下查询请求:

GET / HTTP/1.1

Host: 192.168.0.1:1780

从192.168.0.1:1780收到如下应答数据:

HTTP/1.1 200 OK

Content-Type: text/xml

uuid:7fff6211-b0fa-4075-a15c-

本文标签: 设备实现工作程序映射