The Link Object

The Link object references a read-only property array that represents every link in the current HTML page. Links are defined as anchor tags with the HREF attribute set. The following code, which continues on the next page, shows how the links on a page can be referenced:

    Sub Button1_OnClick
        MsgBox Document.Links(1).href
    End Sub
<A HREF="">Microsoft</A><BR> 
<A HREF="">VB-Bootcamp</A>

Tables 3-12 and 3-13 describe the properties and events of the Link object.

Table 3-12.Link Object Properties

Property Type Description Usage
Href String Returns the complete URL for the current link( MyVar=Links(2).Href
Protocol String Returns the protocol portion of the URL for the current link(http:, ftp:). MyVar= Links(2).Protocol
Host String Returns the Host:Port for the current link. (For, is returned.) MyVar=Links(2).Host
HostName String Returns the host portion of the URL for the current link. (For example,, www is returned.) MyVar= Links(2).HostName
Port Integer Returns the port for communicating with the current link. (For example, for, 80 is returned.) MyVar=Links(2).Port
PathName String Returns the pathname portion of the complete URL for the current link. (For example, for, intdev isreturned.) MyVar= Links(2).PathName
Search String Returns the search portion of the URL beginning with a ?, representing a query. (For example, for, ?user is returned.) MyVar= Links(2).Search
Hash String Returns the hash portion of the URL string beginning with a #. (For example, for, #user is returned.) MyVar=Links(2).Hash
Target String Returns the target of the link, if specified. MyVar=Links(2).Target

Table 3-13.Link Object Events

Event Arguments Description Usage
MouseMove Shift, Button, X, Y Fires whenever the mouse moves over the link. Also passes the following arguments: Shift indicates the status of the Shift key. Button indicates which button was pushed, if any. X indicates the horizontal positionof the pointer in pixels. Y indicates the vertical position of the pointer in pixels. Sub Link1_MouseMove (Shift, Button, X, Y)…End Sub
OnMouseOver None Fires whenever the mouse moves over the link. Sub Link2_OnMouseOver…End Sub
OnClick None Fires whenever the link is clicked. Sub Link3_OnClick …End Sub

© 1996 by Scot Hillier. All rights reserved.