ShowPickURLDialog Method

Displays the the Edit Hyperlink dialog box and returns a String that represents the URL to the file that the user has selected in the Edit Hyperlink dialog box.

expression.ShowPickURLDialog(strBaseURL, strFileURL)

expression    Required. An expression that returns one of the objects in the Applies To list.

strBaseURL    Optional Variant. The base URL for the resulting hyperlink.

strFileURL    Optional Variant. The selected page for a new hyperlink. The user may change this by selecting a different page in the Edit Hyperlink dialog box.

Example

The following example displays the the Edit Hyperlink dialog box.

    Dim strURL As String
Dim objSelection As IHTMLTxtRange
Dim strHyperlink As String

strURL = Application.ShowPickURLDialog _
    (ActiveWeb.Url, "c:\test.htm")
    
Set objSelection = ActiveDocument.selection.createRange

With objSelection
    strHyperlink = "<a href=""" & strURL & """>" & .Text & "</a>"
    .pasteHTML strHyperlink
End With