Code for mail part ; Dim MyMailMessage As New MailMessage() MyMailMessage.From = New MailAddress(TextBox1.Text) MyMailMessage.To.Add(TextBox2.Text) MyMailMessage.Subject = TextBox3.Text MyMailMessage.Body = RichTextBox1.Text If Not TextBox4.Text = Nothing Then Dim Attach As Net.Mail.Attachment = New Net.Mail.Attachment(TextBox4.Text) MyMailMessage.Attachments.Add(Attach) End If Dim SMTPServer As New SmtpClient(TextBox6.Text) SMTPServer.Port = 587 SMTPServer.Credentials = New System.Net.NetworkCredential(TextBox1.Text, TextBox5.Text) SMTPServer.EnableSsl = True Try SMTPServer.Send(MyMailMessage) MessageBox.Show("Email sent") Catch ex As SmtpException MessageBox.Show("There was an error, please try again :" + ex.Message) End Try
http://wwd.dyndns.info/
Awesome tutorial I really like that smtp website never heard of it before ^^
TeachComputing 10 months ago
@TeachComputing
Thanks !
And yes, the site is handy to use !
woutwoot 10 months ago
Nice bro! Ik heb de testversie van WebSoudn af, wil je testen?
rickschravendeel 10 months ago
@rickschravendeel
Natuurlijk !!! stuur maar door :D
woutwoot 10 months ago