Getting IP Address using UPnP InvokeAction not returning anything, help?

Question

Basically, when i use vb.net or c#.net to do this, it works perfectly, but when i use vb6, it doesn\'t work, in my for loop where the relevant service in the relevant device is

Answer 1

This is pretty straightforward. Those parameters are meant to be Variants that contain an array with one element, index = 0.

Dim xins As Variant, xouts As Variant
:
:
ReDim xins(0), xouts(0)
serv.InvokeAction "GetExternalIPAddress", xins, xouts
MsgBox xouts(0)

I've been using this for some time with no problems.