visual basic email send

[*-Elsword_Hacker-*]

Ich hab ein kleines problem mit visual basic ...
nämlich die funktion "smtpserver.Send" funktioniert nicht , weder bei web noch bei gmail ...

der fehler berichtet nur "email senden fehlgeschlagen"
das ganze soll für nen kleines tool sein damit sich emails schneller verfassen lassen ...

[tolio]

ok die glaskugel sagt, es liegt warscheinlich an deinem code

[*-Elsword_Hacker-*]

nur wo ist der fehler ^^, hab auch schon verschiedene ports getestet z.b. 27, 587,122,250
PS: deaktivierte firewall hab ich auch schon getestet ^^.

[tolio]

ok ich kanns natürlich nochmal offensichtlicher schreiben wenn eine leichte implikation schon zu viel verlangt ist: POSTE DEINE CODE.

[*-Elsword_Hacker-*]

hier ist der teil der relevant ist:

 Spoiler

Sub Abschicken()
Dim smtpserver As New SmtpClient
Dim email As New MailMessage
smtpserver.Credentials = New Net.NetworkCredential("unknow ^^", "passwort")
smtpserver.Port = 25
smtpserver.Host = "smtp.gmail.com"
email = New MailMessage
email.From = New MailAddress("unknow ^^")
email.To.Add("unknow ^^")
email.Subject = "test"
email.Body = erhaltenerText.Text
smtpserver.Send(email)
End Sub

PS: das unknow ist die email die ich eingefügt habe und das passwort halt das pw o.o.
(so schlau bin ich mittlerweile auch schon )

[tolio]

€dit: bullshit was ich geschrieben hab

----
versuche aber mal beim smtp client UseDefaultCredentials auf falsch zu stellen

[b0tterk2]

Dim myClient As New Net.Mail.SmtpClient("smtp.gmail.com")
        	myClient.Credentials = New Net.NetworkCredential("DeineEmail", "DeinPasswort")
        	myClient.Send("DeineEmail", "EmailDesEmpfängers", "BetreffDerEmail", "Text")

Fertig.