以编程方式向Outlook 2007添加超链接按钮

Question

我正在向Outlook添加工具栏。

工具栏上会有一个按钮。

按此按钮将打开一个网站。

我创建了按钮＆amp;工具栏没有问题，但无法解决如何添加超链接？

  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"