Имя: Пароль:
1C
1C 7.7
v7: Внешняя компонента ROM Mail и win 7
0 CODER082
 
27.09.11
11:05
На вин ХР использование данной компоненты неприводило к сбою
После установки winows 7 Домашняя базовая версия выходит ошибка 1С вылетает, а в журнале приложений windows зарегестрирована следующая запись

Имя сбойного приложения: 1cv7s.exe, версия: 7.70.0.27, отметка времени: 0x4573fcd8
Имя сбойного модуля: ROM-Mail.dll, версия: 1.4.1.0, отметка времени 0x2a425e19
Код исключения: 0xc0000005
Смещение ошибки: 0x000aaca5
Идентификатор сбойного процесса: 0x5a0
Время запуска сбойного приложения: 0x01cc62514653fe96
Путь сбойного приложения: C:\Program Files\1Cv77\BIN\1cv7s.exe
Путь сбойного модуля: D:\Наша база\db-1\ROM-Mail.dll
Код отчета: c88b60cc-ce44-11e0-9023-f46d04ae649b

Посдкажите может кто сталкивался с такой проблемой и как её можно решить

Использую версию 1С 7.70.027
Заранее спасибо
1 andrewks
 
27.09.11
11:06
dialmail.dll попробуй
2 CODER082
 
27.09.11
11:10
(1) Заказчик хочет реализацию именно на этой компоненте
3 andrewks
 
27.09.11
13:17
Бог в помощь
4 CODER082
 
28.09.11
09:36
dialmail.dll выдает те же самые ошибки
5 filh
 
28.09.11
09:42
от имени админа попробуй запустить 1С...
6 Lepochkin
 
28.09.11
09:48
а если вот так
Процедура глОтправитьМыло(Отправитель,Получатель,ОбратныйАдрес="",СкрытаяКопия="",ТекстСообщения="",ТемаПисьма="",СпФайлов="") Экспорт
   Попытка
       Конфигурация = createObject("CDO.Configuration");
   Исключение
       Предупреждение("Сообщение не отправлено. Неудачная попытка создать объект 'CDO.Configuration'. Обратитесь к администратору");
   КонецПопытки;                                                                                              
   
   url_CDO = "http://schemas.microsoft.com/cdo/configuration/";
   cdoSendUsingMethod = url_CDO+"sendusing" ;
   cdoSMTPServer = url_CDO+"smtpserver";
   cdoSMTPServerPort = url_CDO+"smtpserverport";
   cdoSMTPAuthenticate = url_CDO+"smtpauthenticate";
   cdoSendEmailAddress = url_CDO+"sendemailaddress";
   cdoSMTPUseSSL = url_CDO+"smtpusessl";
   //Определим параметры SMTP
   Конфигурация.fields(cdoSendUsingMethod).value = 2;
   Конфигурация.fields(cdoSMTPServer).value = СокрЛП("SMTP");
   Конфигурация.fields(cdoSMTPServerPort).value = Число(25);
   Конфигурация.fields(cdoSMTPAuthenticate).value = 0; //SMTPServerAuthenticate;
   Конфигурация.fields(cdoSendEmailAddress).value = Отправитель;
   Конфигурация.fields(cdoSMTPUseSSL).value = 0; //Secure Sockets Layer true, false
   Конфигурация.fields.update();
   
   newItem = createObject("CDO.Message");
   newItem.configuration = Конфигурация;
   newItem.from = СокрЛП(Отправитель);
   newItem.to = СокрЛП(Получатель);
   Если ПустоеЗначение(СкрытаяКопия)=0 Тогда
       newItem.bcc    = СкрытаяКопия;    // скрытая копия
   КонецЕсли;
   Если ПустоеЗначение(ОбратныйАдрес)=0 Тогда
       newItem.replyto    = ОбратныйАдрес;    // обратный адрес
   КонецЕсли;    
   newItem.subject = ТемаПисьма;
                     
   Если ПустоеЗначение(ТекстСообщения)=0 Тогда
       ТекстПисьма = ТекстСообщения;
   Иначе
       ТекстПисьма="";
       ВвестиСтроку(ТекстПисьма,"Текст сообщения",256);
   КонецЕсли;    
   Если ПустоеЗначение(ТекстПисьма)=1 Тогда
       сообщить("Отсутствует текст письма. Письмо не будет отправлено");
       возврат;
   КонецЕсли;                
   newItem.textBody = ТекстПисьма;                                                                                                                  
   newItem.textBodypart.charset = "windows-1251";
   
   Попытка
       Если ПустоеЗначение(СпФайлов)=0 Тогда
           ид=1;
           Пока ид<=СпФайлов.РазмерСписка() Цикл
               Путь=СпФайлов.Получить(ид);
               newItem.addAttachment(Путь);
               ид=ид+1;
           КонецЦикла;    
       КонецЕсли;
   
   Исключение
       Сообщить("Неудачная попытка присоединить файл ");
   КонецПопытки;    

   Попытка
       newItem.Send();
       Сообщить("Сообщение отправлено на адрес "+СокрЛП(Получатель)+".",".");  
   Исключение
       Сообщить("Не смогли отправить письмо на адрес "+СокрЛП(Получатель));
   КонецПопытки;
КонецПроцедуры
7 CODER082
 
28.09.11
09:52
(6) Этот вариант без внешник компонент как я понял
8 CODER082
 
28.09.11
10:08
(6) Ок, а как получать мыло средствами CDO ?
9 Lepochkin
 
28.09.11
10:17
10 CODER082
 
28.09.11
10:32
(9) Спасибо
11 filh
 
28.09.11
12:16
хм, тоже отвалился rom-mail.
Компьютеры — это как велосипед. Только для нашего сознания. Стив Джобс