What technology are you using to view/download the document?

vba for excel.
piece of my code to connect:

Set oIE = CreateObject("InternetExplorer.Application")

With oIE

'For lngRow = 1 To lngMaxRow

' PAGINA = 1
' ABI = Empty
' ABI = WS.Range("B" & lngRow)

'If WS.Range("C" & lngRow) = Empty Then

URL = "http://www.x-rates.com/cgi-bin/cgicalc.cgi?value=1&base=EUR"
Debug.Print URL
.Visible = True
.Navigate (URL)

Do While .Busy
DoEvents
Loop

Do While .ReadyState <> 4
DoEvents
Loop

.....

ecc...

Okay, at first I thought this might be tough to do since it is a spawned application, but... It was easier than I thought. Add these variables at the top.

Dim C, I As Integer

and then after your readystate check add this

For Each C In .Document.links
    I = I + 1
Next C
MsgBox I

Now, as you can see, "C" is a varient and "I" is used for counting the links. Also, I tried .Document.Links.Count but that is not supported so you have to enumerate through them to get the count.

Good Luck

This article has been dead for over six months. Start a new discussion instead.