[vb.net] invio mail

[Kahm]

avendo il seguente codice:

   Dim smtp = New System.Net.Mail.SmtpClient("smtp.X.it", 465)
           Dim mail = New System.Net.Mail.MailMessage
            mail.IsBodyHtml = True
            mail.Body = MsgHTML
            mail.From = New System.Net.Mail.MailAddress(Mittente)
            mail.Subject = subject
            mail.To.Add(Destinatario)


            smtp.Credentials = New System.Net.NetworkCredential(Mittente, PassMail)
            smtp.Send(mail)

mi va in timeout dopo 20 secondi(circa)
non capisco cosa sbaglio, eppure i dati sono corretti (pass mail, utente,)
cosa sbaglio?