1 | djbrain | 44355 |
2 | subofferul | 5220 |
3 | robica | 4610 |
4 | krystyana84 | 3980 |
5 | elena2008 | 2690 |
Membri inscrisi | 96840 |
Intrebari | 35993 |
Raspunsuri | 164903 |
helpppp de
aly122
|
|||||||||
Imports System.Net.Mail Public Class Form1 Dim message As New MailMessage Dim smtp As New SmtpClient Private Sub Send_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Send.Click message.From = New MailAddress("text1.text") message.To.Add(totxt.Text) message.Body = bodytxt.Text message.Subject = subjecttxt.Text message.Priority = MailPriority.Normal 'smtp client Setting' smtp.EnableSsl = True smtp.Port = "587" 'Gmail/Hotmail Port smtp.Host = "Smtp.Gmail.com" 'this is hotmail..smtp.gmail.com is gmail smtp.Credentials = New Net.NetworkCredential(Fromtxt.Text, passtxt.Text) smtp.Send(message) MsgBox("message is send") End Sub End Class |
Tags:
|
||||||||
|
Comentariul lui:
14-08-2010 11:53:14
Data:
|
||||||
|
||||||
* | Raspuns acceptat | Voturi: | 6 Voteaza |
Link sponsorizat | |
Comentariul lui:
14-08-2010 13:48:42
Data:
|
||||||
|
||||||
* | Comentariul autorului |
Comentariul lui:
14-08-2010 13:51:37
Data:
|
||||||
|
||||||
* | Comentariu | Voturi: | 5 Voteaza |
Link sponsorizat | ||
|