[NEED HELP] Email/Visual Basic.

[xUnLiMiT3D]

Hallo,

Ich möchte das ein Inhalt aus 3 Textboxen, an eine Email geschickt wird, ich habe schon mehrere sachen ausprobiert, haben alle nicht funktioniert, Danke im vorraus

[Black Tiger ツ]

5 Sekunden google:

[xUnLiMiT3D]

Schon ausprobiert. Geht nicht.

[Black Tiger ツ]

Originally Posted by xUnLiMiT3D

Schon ausprobiert. Geht nicht.

Zu welchem Anbieter willst du denn etwas schicken?
Die meisten benutzen SSL für den Posteingang und TLS für den Postausgang.
Eine Liste von den Anbietern findest du hier:

[xUnLiMiT3D]

An gmail...

 Spoiler

Imports System.Net.Mail
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Msg As New MailMessage
Dim myCredentials As New System.Net.NetworkCredential
myCredentials.UserName = "MAil"
myCredentials.Password = "PW"
Msg.IsBodyHtml = False
Dim mySmtpsvr As New SmtpClient()
mySmtpsvr.Host = "smtp.gmail.com"
mySmtpsvr.Port = 465
mySmtpsvr.UseDefaultCredentials = False
mySmtpsvr.Credentials = myCredentials
Try
Msg.From = New MailAddress("Mail")
Msg.To.Add("mail")
Msg.Subject = "e-mail"
Msg.Body = "Textbox1.Text + Textbox2.Text"

MsgBox("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

Das habe ich, was is daran falsch, es kommt nix an

[Black Tiger ツ]

Originally Posted by xUnLiMiT3D

An gmail...

 Spoiler

Imports System.Net.Mail
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Msg As New MailMessage
Dim myCredentials As New System.Net.NetworkCredential
myCredentials.UserName = "MAil"
myCredentials.Password = "PW"
Msg.IsBodyHtml = False
Dim mySmtpsvr As New SmtpClient()
mySmtpsvr.Host = "smtp.gmail.com"
mySmtpsvr.Port = 465
mySmtpsvr.UseDefaultCredentials = False
mySmtpsvr.Credentials = myCredentials
Try
Msg.From = New MailAddress("Mail")
Msg.To.Add("mail")
Msg.Subject = "e-mail"
Msg.Body = "Textbox1.Text + Textbox2.Text"

MsgBox("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

Das habe ich, was is daran falsch, es kommt nix an

Hallo das geht einfacher:

Imports System.Net.Mail

..
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
	Dim Email As New MailMessage()

	Dim Sender As New MailAddress("ABSENDER")
	Email.From = Sender
	Email.[To].Add("EMPFÄNGER")
	Email.Subject = "BETREFF"
	Email.Body = "NACHRICHT"

	Dim ServerName As String = "POSTAUSGANGSSERVER"
	Dim Port As String = "PORT z.B 587"
	Dim MailClient As New SmtpClient(ServerName, Integer.Parse(Port))

	'### NUR WENN ANMELDUNG ERFORDERLICH ###
	Dim UserName As String = "BENUTZERNAME"
	Dim Password As String = "PASSWORD"
	Dim Credentials As New System.Net.NetworkCredential(UserName, Password)
	MailClient.Credentials = Credentials
	'### NUR WENN ANMELDUNG ERFORDERLICH ###

	MailClient.Send(Email)
End Sub

PS:

[PC Jones]

Ich hoffe doch das Programm willst du nicht veröffentlichen...?

[xUnLiMiT3D]

Ich hoffe doch das Programm willst du nicht veröffentlichen...?

Keine Angst, das wird kein 'Minecraft NameChanger' oder so^^, soll son kleines Email Programm werden

[supercracker13]

Ich glaub eher das es ein Stealer oder so wird xD
Textbox1: Email
Textbox2: Username
Textbox3: Passwort

Ok Spaß bei Seite, ich würde das nicht so machen.
Jeder der das Programm bei Notepad reinzieht oder es dekompiliert bekommt zugang zu deinem Mail Acc.
Hol dir lieber nen Webserver (gibts auch gratis) Erstell ein Php script und gib die Daten per Post weiter. Ich auf jeden fall sicherer und falls du dich damit auskennst kannste es direkt in ne mysql datenbank schreiben.
Wenn du willst kann ich dir ein bisschen dabei helfen.

[xUnLiMiT3D]

Ich glaub eher das es ein Stealer oder so wird xD
Textbox1: Email
Textbox2: Username
Textbox3: Passwort

Ok Spaß bei Seite, ich würde das nicht so machen.
Jeder der das Programm bei Notepad reinzieht oder es dekompiliert bekommt zugang zu deinem Mail Acc.
Hol dir lieber nen Webserver (gibts auch gratis) Erstell ein Php script und gib die Daten per Post weiter. Ich auf jeden fall sicherer und falls du dich damit auskennst kannste es direkt in ne mysql datenbank schreiben.
Wenn du willst kann ich dir ein bisschen dabei helfen.

Eigentlich so:
Empfenger:
Betreff:
Nachricht:



Mit PHP kenne ich mich aus, da brauch ich keine Hilfe, aber danke

[$elfmade]

PHP Code:

'Das wichtigste es muss ganz oben hin

Imports System.Net.Mail


'Code in Senden Button kopieren
    Try
        Dim VarriablefuerdensmtpServer As New SmtpClient()
        Dim VarriablefuerdiekompletteNachricht As New MailMessage()
        VarriablefuerdensmtpServer.Credentials = New Net.NetworkCredential("", "Passwort für deinen Gmail Acc")
        VarriablefuerdensmtpServer.Port = 587
        VarriablefuerdensmtpServer.Host = "smtp.gmail.com"
        VarriablefuerdensmtpServer.EnableSsl = True
        VarriablefuerdiekompletteNachricht = New MailMessage
        VarriablefuerdiekompletteNachricht.From = New MailAddress("")
        VarriablefuerdiekompletteNachricht.To.Add = TextBox1.Text 'Der Empfänger
        VarriablefuerdiekompletteNachricht.Subject = TextBox2.Text 'Der Betreff
        VarriablefuerdiekompletteNachricht.Body = Textbox3.Text 'Die Nachricht
        smtpServer.Send(VarriablefuerdiekompletteNachricht)
        Catch ex As Exception
        End Try
'Ach ja ist kein Php sondern ein Visual Basic Code :D 


LG