[Vb.net] Daten per E-Mail ?!

also, will mir bestimmte Daten (sprich aus der Textbox2) zu kommen lassen per E-Mail. Habe es schon fertig nur kommt immer "Fehler aufgetreten!".
Guck euch doch bitte den Code an (ist bestimmt i-was einfaches ^^).

Danke & mfg Sveiven!

Code:

Code:

---


Imports System.Net.Mail

PublicClass Form1
 
 
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Msg AsNew MailMessage
Dim myCredentials AsNew System.Net.NetworkCredential
myCredentials.UserName = "xxx@web.de"

myCredentials.Password = "xxx"

Msg.IsBodyHtml = False

Dim mySmtpsvr AsNew SmtpClient()
mySmtpsvr.Host = "smpt.web.de"

mySmtpsvr.Port = 25
mySmtpsvr.UseDefaultCredentials = False

mySmtpsvr.Credentials = myCredentials
Try

Msg.From = New MailAddress("xxx@web.de")
Msg.To.Add("yyy@web.de")
Msg.Subject = "VB.net"

Msg.Body = TextBox2.Text
mySmtpsvr.Send(Msg)
MsgBox("Email versendet!")
Catch ex As Exception
MsgBox("Fehler aufgetreten!")
EndTry

EndSub
EndClass

---

Hmm bei mir geht zwar dein Spoiler net aber der Code müsste so aussehen:

Code:

---

Imports System.Net
Imports System.Net.Mail 'das gehört nach ganz oben

---

Doppelklick auf einem Button

Code:

---

Dim text As String
text = "Nick:" & TextBox2.Text
Dim myClient As New Net.Mail.SmtpClient("smtp.web.de")
myClient.Credentials = New Net.NetworkCredential ("Deine erste E-Mail  Addresse die senden soll", "Passwort dazu")
myClient.Send ("Die E-mail die da oben steht", "Deine zweite E-Mail Addresse = Die E-mail wohin es gesendet wird", "Deine Überschrift bei der E-mail", text)

---

Sag dan bescheid obs geklappt hat.

Habe vorhin ein anderen Code genommen - klappt jetzt.

Aber das mit dem "Nick:" Textbox2.Text - Hat mir geholfen :D

nächstes mal das "Try" entfernen und debuggen und sich die fehlermeldung anschauen ;)