Copiez le script suivant dans le document vide du Bloc:
"Sous OnStartup
Réglez Arbre = SDB.MainTree
Réglez PandoraNode = Tree.CreateNode
PandoraNode.Caption = "Pandora"
PandoraNode.IconIndex = 37
Script.RegisterEvent PandoraNode, "OnNodeFocused", "NodeFocus"
PandoraNode.HasChildren = False
Tree.AddNode Tree.Node_Web, PandoraNode, 2
End Sub
Fonction NodeFocus (PandoraNode)
NodeFocus = 2
SDB.WebControl.Navigate "http://www.Pandora.Com"
End Function"