Code:
StrData = Inet1.OpenURL("http://www.sample.com/blah.php")

Test = Mid(StrData, InStr(1, StrData, "<a href=" & """") + Len("<a href=" & """") + 1)
Test = Mid(Test, 1, InStr(1, Test, """") - 1)

MsgBox Test
This code searches through the HTML of a website and displays anything inside the first <a href="[THIS IS DISPLAYED]"> tag.

The problem is it only displays what's in the FIRST tag. I'd like the code to search through the entire HTML and display every <a href tag.

Can anyone help?