UPNP kapiers nicht

[TKC]

Zitat von runger:

Hallo,
wir versuchen seit geraumer Zeit einen Automatissmus zu finden mit der sich die öffentliche IP adresse eines DSL Routers herausfinden lässt.
Soweit ( siehe Beispiel wir haben den Code stark vereinfacht) sind wir schon forgeschritten:
f1 ist UPNPdevicefinder

Delphi-Quellcode:

   UPnpDevices:=f1.FindByType('upnp:rootdevice',0);  //upnp:rootdevice      UPnPDevicex
   Memo1.Lines.Add('----------------------------------------------------------------------------');
   Memo1.Lines.Add('Number of UPnP devices: ' + IntToStr(upnpdevices.Count));
   Memo1.Lines.Add('----------------------------------------------------------------------------');
   EnumVariant := IEnumVariant(UPnpDevices._NewEnum);
   EnumVariant.Next(1, rgvar, celtFetched);
   UPnpDevice := IUPnpDevice(IUnknown(rgvar));
   Memo1.Lines.Add('FriendlyName:     '+UPnpDevice.FriendlyName);
   Memo1.Lines.Add('UniqueDeviceName: '+UPnpDevice.UniqueDeviceName);
   Memo1.Lines.Add('Services:         '+IntToStr(UPnpDevice.Services.Count));
   Memo1.Lines.Add('PresentationURL:  '+UPnpDevice.PresentationURL);
   Memo1.Lines.Add('SerialNumber:     '+UPnpDevice.SerialNumber);
   Memo1.Lines.Add('ModelURL:         '+UPnpDevice.ModelURL);
   Memo1.Lines.Add('UPC:              '+UPnpDevice.UPC);

Kann jemand helfen? Wie gehe ich vor um die Verbindungsdaten zu kriegen.

Rainer

Wie wärs denn mal mit nen Blick in die Doku zu UpnP ... da würdest du auch sehen woher du die IP bekommst.

Zitat:

WANIPConnection:1 Service Template Version 1.01
For UPnP™ Version 1.0

2.4. ACTIONS........................................... .................................................. ...........................................16
2.4.1. SetConnectionType................................. .................................................. ................16
2.4.2. GetConnectionTypeInfo............................. .................................................. ..........17
2.4.3. RequestConnection................................. .................................................. ................17
2.4.4. RequestTermination .................................................. ..............................................18
2.4.5. ForceTermination.................................. .................................................. .................19
2.4.6. SetAutoDisconnectTime............................. .................................................. ..........20
2.4.7. SetIdleDisconnectTime............................. .................................................. ..........20
2.4.8. SetWarnDisconnectDelay............................ .................................................. .........21
2.4.9. GetStatusInfo..................................... .................................................. .....................21
2.4.10. GetAutoDisconnectTime............................. .................................................. ......22
2.4.11. GetIdleDisconnectTime............................. .................................................. ......22
2.4.12. GetWarnDisconnectDelay............................ .................................................. .....23
2.4.13. GetNATRSIPStatus.................................. .................................................. .............23
2.4.14. GetGenericPortMappingEntry .................................................. .......................24
2.4.15. GetSpecificPortMappingEntry....................... ................................................25
2.4.16. AddPortMapping.................................... .................................................. ................25
2.4.17. DeletePortMapping................................. .................................................. ............27
2.4.18. GetExternalIPAddress .................................................. .....................................27