numerok numerok

0
Рейтинг

numerok



  •   Регистрация: 23.08.2010 (13 лет назад)

  •   Был(а) на сайте: 08.10.2010

Подписчики 0
Группы

Комментарии

Admin › Автоматическая архивация баз данных 1С 8.2, 8.1 и 7.7 › #69 07.10.10 16:34
Код
Set iConf=CreateObject("CDO.Configuration") 
        Set Flds=iConf.Fields 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")=1 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusername")="sender@mail.ru"       'почтовый ящик отправителя 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword")="pass"   ' пароль на почтовый ящик 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp.mail.ru" 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25 
        Flds.Update 
        objEmail.Send()


А куда это вставлять??? И какие-нибудь измнения еще в скрипте нужно при этом делать?
А то у меня локального smtp нет, а уведомление на почту ой как надо!!!

Ну или как сделать, чтобы после окончания выскакивало popup окошко с информацией либо о успешной выгрузке либо об провале???