Nigel,

Many thanks for this. I've just been experimenting with it.
It seems to return text from the site which handles the IP lookup,
(e.g. http://www.geobytes.com/IpLocator.htm )

but I can't see how to pass a particular IP address to the 'locate'
box, and then how the VBA code would 'press' the submit button.

Are you able to offer any further advice on what additional code I
might need.

Kind regards,

Richard


On Sun, 15 Aug 2004 06:50:12 +0100, "Nigel"
wrote:

RBHere is one way of reading the body text of a web page, you can
pass the
RBwebtx string looking for the values and related text as required.
You need
RBto make a reference to Microsoft Office Object Library.
RB
RBPrivate sURL As String, webtx As string
RBPrivate ie As Object
RBSub WebLink()
RB Set ie = CreateObject("InternetExplorer.Application")
RB sURL = "http://www.xyz..com"
RB ie.Navigate sURL
RB 'wait for response
RB Do Until Not ie.Busy And ie.ReadyState = 4
RB DoEvents
RB Loop
RB ' get html page body text
RB webtx = ie.Document.body.innertext
RB ie.Visible = True
RB 'close ie and remove memory references
RB ie.Quit
RB Set ie = Nothing
RBEnd Sub
RB
RBCheers
RBNigel
RB
RB"Richard Buttrey" wrote
in
RBmessage ...
RB I have an Excel spreadsheet which collects the IP address logs
from my
RB broadband router and analyses them in a pivot table. (Number of
RB occurrences and port attacked)
RB
RB I'd like to develop the spreadsheet a bit further, by passing
each IP
RB address in turn to one of the many IP address locator web sites,
and
RB read back the results to the spreadsheet.
RB
RB Is this possible, and can anyone suggest the sort of VBA code I
might
RB need to tackle this?
RB
RB Many thanks,
RB
RB
RB
RB
RB __
RB Richard Buttrey
RB Grappenhall, Cheshire, UK
RB __________________________
RB

__
Richard Buttrey
Grappenhall, Cheshire, UK
__________________________