in rete trovai questi
codice:
Dim SmtpServer As String
SmtpServer = "smtp.miodominio.it"
MyEmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserver", SmtpServer)
MyEmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserverport", "25")
MyEmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusing", "2")
MyEmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1")
MyEmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", "username")
MyEmail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", "password")