Hi
Dim SmtpServer As New SmtpClient()
Dim mail As New MailMessage()
SmtpServer.Credentials = New Net.NetworkCredential("yourusername", "yourpassword")
SmtpServer.Port = 587
SmtpServer.Host = "smtp.gmail.com"
mail = New MailMessage()
mail.From = New MailAddress("youremailaddress")
mail.To.Add("addresstosendto")
mail.Subject = "Add subject here"
mail.Body = "add body here"
SmtpServer.Send(mail)
use port no 587 instead of 465
Regards
Aravind