>The following works for me from the command window. Would probably work under runtime?

>oForm = newobject('form')
>oForm.AddObject('MSWinsock.Winsock.1', 'oleControl')
>oForm.AddObject('oleWinsock','oleControl', 'MSWinsock.Winsock.1')
>lcIP = oForm.oleWinsock.LocalIP
>lcHost = oForm.oleWinsock.LocalHostName

>

Mark,
It wouldn't because AddObject also needs the development license to work. It will work if you build an EXE and run it from your Development PC but it won't work on a user PC because the necessary license registry key is not installed.