Announcement

Collapse
No announcement yet.

VB.Net Outlook Anbindung - Ausblenden von Funktionen

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • VB.Net Outlook Anbindung - Ausblenden von Funktionen

    Hallo zusammen,

    ich habe eine VB.NET-Applikation, die ich mit Outlook 2003 verknüpft habe. Über das Outlook-Datenmodell erstelle ich mir eine neue Mail. Daraufhin lasse ich Outlook anzeigen. Hier möchte ich mir nun den Senden Button ausblenden lassen...

    Ist dies überhaupt möglich?

    Hier einmal der Code, der einwandfrei funktioniert. Aber leider eben mit Senden Button

    Code:
     
    
    Imports Microsoft.Office.Interop
    
     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    
            Dim objOutlook As Outlook.Application
            objOutlook = New Outlook.Application
            Dim mail As Outlook.MailItem
            mail = objOutlook.CreateItem(Outlook.OlItemType.olMailItem)
    
            mail.UnRead = True
            mail.To = "[email protected]"
            mail.Subject = "Betreff"
            mail.HTMLBody = True
            mail.Body = "Hallo hier würde ein fester Text stehen!"
    
            'Mail anzeigen
            mail.Display()
    
        End Sub
    Ziele des ganzen: Ich möchte es mir eine Vorlage erstellen und den Ersteller nicht in Versuchung bringen die Vorlage zu senden.

  • #2
    habs

    Code:
            Dim objInsp As Outlook.Inspector
            Dim SendButton As CommandBarButton
            objInsp = mail.GetInspector
            SendButton = objInsp.CommandBars.FindControl(Id:=2617)
            SendButton.Visible = False

    Comment

    Working...
    X