Hallo,
vielleicht hat der ein oder andere ja einen Tipp für mich....
Ich möchte eine E-Mail mit Outlook versenden und verwende dafür folgenden Code:
Funktioniert auch alles einwandfrei, jedoch möchte ich das eine entsprechende Signatur mit angeführt wird....Könnt Ihr mir da weiterhelfen ?
Habe etwas über GetInspector gelesen aber ohne weitere Kenntnis
vielleicht hat der ein oder andere ja einen Tipp für mich....
Ich möchte eine E-Mail mit Outlook versenden und verwende dafür folgenden Code:
VB.NET-Quellcode
- Private Sub GetStr()
- str = Nothing
- str += "<html><div><table><tr>Hallo Herr Mohr,<br><br></tr>"
- str += "bitte teilen Sie mir mit, wieviele KLB/LSB für die " + DateTime.Today.AddMonths(+1).ToString.Substring(0, 10).Substring(3) + " Hebung angefallen sind, sowie die jeweiligen Versandtermine."
- str += "</table></table></div></html>"
- End Sub
- Public Function Mail_Erstellen(ByVal MailAdresse As String, ByVal Betreff As String, ByVal MailText As String) As Boolean
- Try
- Mail_Erstellen = False
- Dim out As New Interop.Outlook.Application
- Dim m As Interop.Outlook.MailItemm = CType(out.CreateItem(Interop.Outlook.OlItemType.olMailItem), Interop.Outlook.MailItem)
- m.Subject = Betreff
- GetStr()
- m.HTMLBody = str
- m.Display()
- m.To = MailAdresse
- m.Recipients.ResolveAll()
- 'm.Send()
- Mail_Erstellen = True
- Return True
- Catch eex As Exception
- End Try
- End Function
Funktioniert auch alles einwandfrei, jedoch möchte ich das eine entsprechende Signatur mit angeführt wird....Könnt Ihr mir da weiterhelfen ?
Habe etwas über GetInspector gelesen aber ohne weitere Kenntnis
Schlimmer als ein Elefant im Porzellanladen, ist ein Igel in der Kondomfabrik und Nutella hat Lichtschutzfaktor 9,7 8)