Examples: SetURL method
This example sets the first entry in the Web site outline to open the ibm.com® Web site when clicked.
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim outline As NotesOutline
Dim oe As NotesOutlineEntry
Set db = session.CurrentDatabase
Set outline = db.GetOutline("Web site")
Set oe = outline.GetFirst
oe.SetURL("http://www.ibm.com")
Call outline.Save()
End Sub