Butten und mail

[XXL]

Kann ich es im code verwirklichen das wenn ich auf einen Butten klicke,

mir das PW+Username per email geschickt werden?

Ich stell mir das so vor

2 Txtboxen,1 butten

er schreibt sein pw und username rein und mir werden die Daten per Mail geschickt sobald er auf den Butten klickt!

LG

euer XXL

[Ch4o5]

Klar ist das möglich:
System.Web.Mail;
http://msdn.microsoft.com/en-us/libr....web.mail.aspx

[XXL]

ein Code wär nicht schlecht

[Ch4o5]

Steht doch da alles...
Müsstest vllt auch mal die Sprache sagen...

[XXL]

VB.net wäre es in meinem Fall!

LG

[Ch4o5]

Kann ich leider nicht besonders. Hier hab ich aber Code gefunden. Denke ist selbst erklärend: Instanzieren, Eigenschaften setzten, senden.
Dim MyMail As MailMessage = New MailMessage()
MyMail.From = sFrom
MyMail.To = sTo
MyMail.Subject = sSubject
MyMail.Body = sBody
MyMail.Cc = sCc
MyMail.Bcc = sBcc
MyMail.UrlContentBase = sUrlContentBase
MyMail.UrlContentLocation = sUrlContentLocation

Select Case txtBodyEncoding.Text
Case Encoding.UTF7.EncodingName : MyMail.BodyEncoding = Encoding.UTF7
Case Encoding.UTF8.EncodingName : MyMail.BodyEncoding = Encoding.UTF8
Case Else : MyMail.BodyEncoding = Encoding.ASCII
End Select

Select Case UCase(sBodyFormat)
Case "HTML" : MyMail.BodyFormat = MailFormat.Html
Case Else : MyMail.BodyFormat = MailFormat.Text
End Select

Select Case UCase(sPriority)
Case "HIGH" : MyMail.Priority = MailPriority.High
Case "LOW" : MyMail.Priority = MailPriority.Low
Case Else : MyMail.Priority = MailPriority.Normal
End Select
' Build an IList of mail attachments.
If sAttach "" Then
Dim delim As Char = ","
Dim sSubstr As String
For Each sSubstr In sAttach.Split(delim)
Dim myAttachment As MailAttachment = New MailAttachment(sSubstr)
MyMail.Attachments.Add(myAttachment)
Next
End If
SmtpMail.SmtpServer = sMailServer
SmtpMail.Send(MyMail)

[laKiT]

Das Passwort und der Name müssen in zwei Variablen geschrieben werden. Und dann kannst du diesen Code benutzen:
http://forum.vb-paradise.de/allgemei...ail-versenden/ Dort dann statt "Nachricht" die erste Variable & die zweite Variable

[XXL]

Dim Msg As New MailMessage
Dim myCredentials As New System.Net.NetworkCredential
myCredentials.UserName = "absender@domain.de" ' <--- deine email-adresse
myCredentials.Password = "Passwort"' <--- dein passwort zum mailaccount

Msg.IsBodyHtml = False

Dim mySmtpsvr As New SmtpClient()
mySmtpsvr.Host = "subdomain.domain.tld"
mySmtpsvr.Port = 25 ' <--- port evt, je nach mailanbieter anpassen

mySmtpsvr.UseDefaultCredentials = False
mySmtpsvr.Credentials = myCredentials

Try
Msg.From = New MailAddress("absender@domain.de") ' <--- deine email-adresse
Msg.To.Add("reciepent@domain.de") ' <--- empfänger-adresse
Msg.Subject = "Betreff" ' <--- betreff
Msg.Body = "Nachricht" ' <--- Eigentliche Nachricht
mySmtpsvr.Send(Msg)
MsgBox("E-Mail erfolgreich 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


ich habe ne email adresse bei web.de was muss ich dann da reinschreib
ich weis alles bis zu email und pw aber die andern weis ich nicht.

LG


und was brauche ich dafür nur 2 textboxen,2 label, 1 butten

butten klick und dann den code einfügen und dort alles ändern mit meiner email addy und pw aber was soll ich bei empfänger adresse und so reinschreiben

LG

[Ch4o5]

Na deine Adresse. Du willst die doch kriegen
Und um eine Email zu senden musst du dich bei dem Server evtl. anmelden. Dafür die Felder oben.
Die Teile heißen überings Buttons Mit o.

[XXL]

also was brauche ich dafür nur ?

einen button, 2 label, 2 textboxen?

fertig?

LG