Программно добавить кнопку гиперссылки в Outlook 2007

Question

Я добавляю панель инструментов в Outlook.

На панели инструментов будет одна кнопка.

Эта кнопка при нажатии откроет веб -сайт.

Я создал кнопку и панель инструментов без проблем, но не могу понять, как добавить гиперссылку?

  Set oTBar = oView.Add("toolbarname")
  oTBar.Position = 1
  oTBar.Visible = true

  Set oButton = OTBar.Controls.Add
  With oButton
      .Caption = "Click here!"
      .Style = 3
      .HyperlinkType = 1
      .FaceId = 1707     
   End with

Answer 1

Ха -ха!

Вам нужно добавить его в качестве всплывающей подсказки:

  .ToolTipText  = "http://your_url"