You're welcome!

>That's it...... I give up! Really, I have been away for a long time, had let my subscription lapse,
>so I couldn't search.
>
>But I'm going to subscribe right now!!!
>
>This is a wonderful resource. Thanks for all that make it so.
>
>
>Best regards,
>
>dg
>
>
>
>
>>Check Message ID: 1452490
>>
>>>I am attempting to determine the IP Address programatically. I have applied the following code:
>>>
>>>

>>>
>>>Declare Integer InternetCheckConnection In Wininet.Dll String Url, Long dwFlags, Long Reserved
>>>lcURL = "http://www.yahoo.com"
>>>If InternetCheckConnection(lcURL, 1, 0) = 0
>>>	gcConnectionStatus = 'Not connected'
>>>	gcIPAddress = 'Not Connected'
>>>Else
>>>	gcConnectionStatus = 'Yes, connected'
>>>	ox = Createobject('internetexplorer.application')
>>>	ox.navigate2("whatismyip.org")
>>>	N = 0
>>>	Do While ox.busy
>>>		N = N + 1
>>>	Enddo
>>>	If Type("ox") = "O"
>>>		odoc = ox.Document
>>>		gcIPAddress = odoc.Body.InnerText
>>>	Endif
>>>
>>>	If  Substr(gcIPAddress,1,15) = 'The page cannot'
>>>		ox = Createobject('internetexplorer.application')
>>>		ox.navigate2("http://www.whatismyipaddress.com")
>>>		N = 0
>>>		Do While ox.busy
>>>			N = N + 1
>>>			
>>>		Enddo
>>>
>>>
>>>
>>>		If Type("ox") = "O"
>>>			odoc = ox.Document
>>>			WAIT WINDOW odoc.Body.InnerText
>>>			gcIPAddress = odoc.Body.InnerText
>>>		Endif
>>>	Endif
>>>Endif
>>>
>>>

>>>
>>>At times I get a system error "Member BODY does not evaluate to an object"
>>>
>>>What error handling routine can I use to ignore the error and return .null.?
>>>
>>>Thanks to all,
>>>
>>>dg