Отправка почты в windows7 x64 - C#

Формулировка задачи:

Столкнулся с проблемой. Не хочет отправлять почту вот код:

                    Листинг программы
                
 
                        
                          
                    
 public void Mail(List<string> var)
        {
            try
            {
                //инициализация
                SmtpClient Smtp = new SmtpClient("server", 25);
                Smtp.Credentials = new NetworkCredential("login", "password");
                //***************************************************************
                MailMessage Message = new MailMessage();
                Message.From = new MailAddress("removed@mail.ru");
                Message.To.Add(new MailAddress("removed@mail.ru"));
                Message.Subject = "[]Message from Setup[]";
                for (int i = 0; i < var.Count; i++)
                {
                    tmp1 = tmp1 + var[i] + "\n";
                }
                Message.Body = tmp1;
                
                Smtp.Send(Message);
            }
            catch (Exception e)
                {
                    string r = e.Message;
                    MessageBox.Show(r);
                }
 
        }

происходит catch. а например в w2008 x64 все четко отрабатывает.(больше нет под рукой x64) Что может быть? может безопасность w7 на столько суровая что не дает отправить почту?

Решение задачи: «Отправка почты в windows7 x64»

textual
                            Листинг программы 
                        
 
                        
                          
                    
        Dim o_Mess As Object, v_Conf As String
        o_Mess = CreateObject("CDO.Message")
        v_Conf = "http://schemas.microsoft.com/cdo/configuration/"
        o_Mess.Bodypart.Charset = "windows-1251"
        With o_Mess
            .To = "Кому@mail.ru"
            .From = "От_Кого@mail.ru"
            .Subject = "Тема"
            .TextBody = "Body-To-Body"
            .AddAttachment("C:\1.jpg")
            With .Configuration.Fields
                .Item(v_Conf & "sendusing") = 2
                .Item(v_Conf & "smtpserver") = "smtp.mail.ru"
                .Item(v_Conf & "smtpauthenticate") = 1
                .Item(v_Conf & "sendusername") = "От_кого@mail.ru"
                .Item(v_Conf & "sendpassword") = "пароль"
                .Item(v_Conf & "smtpserverport") = 25
                .Item(v_Conf & "smtpusessl") = False
                .Item(v_Conf & "smtpconnectiontimeout") = 60
                .Update()
            End With
            .send()
        End With