Hallo,
ich möchte auf meiner Anwendung über SMTP (Mit Verschlüsselung) eine Mail per SMTP versenden.
Genutzt habe ich hierfür diesen Code (ja, dieser ist "zusammenkopiert"):
In der Textbox1 (wird noch durch ein Combofeld ersetzt) soll der Pfad zur Datei ausgewählt werden.
Wenn ich das nun aber so starten will, bekomme ich folgenden Fehler:
Fehler BC30311 Der Wert vom Typ "String" kann nicht in "Attachment" konvertiert werden. WindowsApp2 C:[Pfad]\Form1.vb 21 Aktiv
Jemand eine Idee?
Grüße!
ich möchte auf meiner Anwendung über SMTP (Mit Verschlüsselung) eine Mail per SMTP versenden.
Genutzt habe ich hierfür diesen Code (ja, dieser ist "zusammenkopiert"):
VB.NET-Quellcode
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Dim Msg As New MailMessage
- Dim myCredentials As New System.Net.NetworkCredential
- myCredentials.UserName = "absender@mail.tld"
- myCredentials.Password = "Passwort des Absenders"
- Msg.IsBodyHtml = False
- Dim mySmtpsvr As New SmtpClient()
- mySmtpsvr.Host = "imap.sender.tld"
- mySmtpsvr.Port = 993
- mySmtpsvr.EnableSsl = True
- mySmtpsvr.UseDefaultCredentials = False
- mySmtpsvr.Credentials = myCredentials
- Try
- Msg.From = New MailAddress("absender@mail.tld")
- Msg.To.Add("Empfänger@mail.tld")
- Msg.Subject = "Betreff"
- Msg.Body = "Inhalt"
- Msg.Attachments.Add((TextBox1.Text))
- mySmtpsvr.Send(Msg)
- MsgBox("E-Mail gesendet.", MsgBoxStyle.Information, Title:="Information")
- Catch ex As Exception
- MsgBox(Err.Number & ex.Message & ex.StackTrace.ToString) 'Falls ein Fehler auftritt wird eine MsgBox angezeigt
- End Try
- End Sub
In der Textbox1 (wird noch durch ein Combofeld ersetzt) soll der Pfad zur Datei ausgewählt werden.
Wenn ich das nun aber so starten will, bekomme ich folgenden Fehler:
Fehler BC30311 Der Wert vom Typ "String" kann nicht in "Attachment" konvertiert werden. WindowsApp2 C:[Pfad]\Form1.vb 21 Aktiv
Jemand eine Idee?
Grüße!