Hi People.... I can resolve this problem... just enter this codes
Public Function mandar_email(ByVal email As String)
Dim my_email As System.Web.Mail.SmtpMail
Dim from As String = "
[email protected]"
Dim mailto As String = email
Dim subject As String = "Orçamento aberto"
Dim body As String = "acesse o site e de o seu lance"
my_email.SmtpServer = "smtp.unicenp.edu.br"
my_email.Send(from, mailto, subject, body)
End Function
Ok, here in Brasil works nice..... i lost a lot time to resolve this problem :-)
[email protected]