mail aus vb 2008

  • VB.NET

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von hubertus23.

    mail aus vb 2008

    hallo ich habe eine datagridview mit einer splate mail. die in dieser spalte notierte mail-adresse kann ich mit hilfe folgenden codes auch auslesen.

    VB.NET-Quellcode

    1. MsgBox(DataGridView1.CurrentRow.Cells(9).Value.ToString())
    - die 9 ist die spalte mail -


    ist es möglich die ermitteltelte mail adresse so zu nutzen das outlook aufgeht und dies adresse gleich beim empfänger drin steht. oder bin ich zu umständlich und geht das auch irgendwie einfacher.

    danke

    Also zum einen würde das über den Webbrowser gehen. Vorteil du brauchst keinen Pfad des Mail Programms und es wird immer das eingestellte Mailprog genutzt

    Mit der Process-Start Methode dieses ausführen

    Quellcode

    1. mailto:email@host.de


    Wenn umbedingt Outlook haben willst, hat Outlook ein paar Übergabeparameter, da kannst du auch die Mail festlegen
    schau mal hier rein wintotal.de/Tipps/?id=1081

    Hallo,

    du kannst auch gleich aus VB heraus eine Email versenden:

    VB.NET-Quellcode

    1. Dim MyMail As MailMessage
    2. Dim smtp As SmtpClient
    4. Dim sTo As String, sFrom As String, sSubject As String, sBody As String
    6. '***********New Mail : Von An************
    7. sTo = "Email@Adresse.de"
    8. sFrom = "Name <Email@Adresse.de>"
    10. MyMail = New MailMessage(sFrom, sTo)
    12. '***********New Mail : Betreff************
    13. sSubject = "Betreff"
    14. MyMail.Subject = sSubject
    16. '***********New Mail : Inhalt************
    17. sBody = "Inhalt der Email"
    18. MyMail.Body = sBody
    20. '***********New Mail : Einstellungen************
    21. MyMail.Priority = MailPriority.Normal
    22. MyMail.IsBodyHtml = False
    23. MyMail.BodyEncoding = System.Text.Encoding.UTF8
    24. MyMail.SubjectEncoding = System.Text.Encoding.UTF8
    26. '***********New Mail : Einstellungen SMTP************
    27. smtp = New SmtpClient("smtp.deinclient.de")
    28. smtp.Credentials = New System.Net.NetworkCredential("Benutzername", "Kennwort")
    29. smtp.DeliveryMethod = SmtpDeliveryMethod.Network
    31. '************************VERSENDEN DER MAIL***************************
    32. Try
    33. smtp.Send(MyMail)
    34. Catch ex As Exception
    35. End Try


    Dazu brauchst du noch die Namespaces System.Net und System.Net.Mail

    Hoffe ich konnte dir helfen...

    mfg hubertus23

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „hubertus23“ ()

Facebook
Telefonspende