Get Link InnerHTML

Home        Programming        Expression Web VBA Topic Index

Object:  Application.ActiveDocument.Links.Item(index).innerHTML

This function will return the value of the InnerHTML for the index value of the link received.  The index number is zero based. 

The href for Links.item(2) for this page is
"Expression Web VBA Topic Index"

The InnerHTML is also called the source anchor.

Function GetLinkInnerHTML( _
ByVal i As Integer) As String
   'Tested 20090208
   On Error GoTo errHandler1
   GetLinkInnerHTML = _
   Application.ActiveDocument.Links. _
   Item(i).innerHTML
   Exit Function
errHandler1:
   'Notify user of failure.
   MsgBox "GetLinkInnerHTML has failed", _
   vbCritical, "Function Failure"
End Function
								

Home        Programming        Expression Web VBA Topic Index