ошибки при отправке писем из 1с

CDO_СерверSMTP = Профиль.АдресСервераSMTP;
		CDO_ПользовательSMTP = Профиль.ПользовательSMTP;
		CDO_ПарольSMTP = Профиль.ПарольSMTP;
		CDO_ПортSMTP = Профиль.ПортSMTP;
		Отправитель = Профиль.Пользователь;
		Письмо=Новый COMОбъект("CDO.Message");
		Письмо.to="адрес почты";
		Письмо.from=Отправитель;
		Письмо.AddAttachment(ИмяФайла);
		Письмо.Subject=Тема;
		Письмо.TextBody=ТекстПисьма;
		Письмо.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing").Value=2;
		Письмо.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver").Value=CDO_СерверSMTP;
		Письмо.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate").Value=1;
		Письмо.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername").Value=CDO_ПользовательSMTP;
		Письмо.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword").Value=CDO_ПарольSMTP;
		Письмо.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport").Value=CDO_ПортSMTP;
		Письмо.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl").Value = 1;
		Письмо.Configuration.Fields.Update();
		Письмо.Send();