Имя: Пароль:
1C
 
Информер на сайте 1С и Подписка на новости сайта через RSS-канал опять таки
0 Kalugin
 
21.09.06
09:52
Мы явлемся фирмой франчем, но это пол беды  тут вопрос назрел. На сайте 1С есть такие вещи как:

1. Подписка на новости сайта через RSS-канал
Адрес канала формата RSS 2.0: [www.1c.ru]

2. Информер - элемент, устанавливаемый на стороннем сайте (путем включения небольшого HTML-кода в страницу) и автоматически отображающий последние новости 1С.
[www.1c.ru]

У нас есть программа внутреннего учета, в которой мы планируем выезды к клиентам, считаем зарплату, и другой учет который нам помоает жить.
Теперь вопрос, можно ли как то сделать так что при загрузке программы у меня высвечивалась информация с сайта 1С? Я понимаю что это все дело нужно подгружать при запуске системы, но опыта маловато работы с XML и HTML, может подскажете в каком направлении двигаться?
1 Волшебник
 
21.09.06
09:53
2 Kalugin
 
21.09.06
11:59
А может подскажешь ссылку как из 1С почту отправить на определенный ящик?
3 ArtemDpUA
 
21.09.06
12:48
Функция ЗаархивироватьФайлы()//И отправить если стоит галка
   
   КомпиляторЗИП=СоздатьОбъект("AddIn.FWheelAddIn");
   
   стрВложения = "";
   ФС.УстТекКаталог(КаталогФайлов);
   НазвФайла = ФС.НайтиПервыйФайл("*.xml");
   Пока 1=1 Цикл                          
       Если СокрЛП(НазвФайла) = "" Тогда
           Прервать;
       КонецЕсли;                      
       
       НазвФайлаЗип = Лев(НазвФайла,СтрДлина(НазвФайла)-3)+"zip";
       КомпиляторЗИП.ЗаархивироватьФайл(НазвФайлаЗип, НазвФайла);
                                       
       стрВложения = стрВложения + СокрЛП(КаталогФайлов)+НазвФайлаЗип+";";
       Попытка
           ФС.УдалитьФайл(НазвФайла);
       Исключение
           Сообщить("Не удалось удалить файл "+НазвФайла,"!");
       КонецПопытки;
       
       НазвФайла = ФС.НайтиСледующийФайл();    
   КонецЦикла;    
   
   Если флОтправитьПоПочте = 1 тогда
       Сообщить("Отправляется письмо:");
       КомпиляторЗИП.ОтправитьПочтуПоSMTP(СокрЛП(СМТПСервер), СокрЛП(Отправитель), СокрЛП(КомуОтправить), , ,
           СокрЛП(ТемаПисьма), "", стрВложения);
       Сообщить("Конец отправки письма");
       
       Сообщить("Перенос писем в архив");
       ПеренестиПисьмаВАрхив();          
       Сообщить("Окончание переноса писем в архив");
   КонецЕсли;

КонецФункции
4 Злопчинский
 
21.09.06
12:56
оправка используя CDO? готовое, ничего программить не надо - взял и юзай
http://www.infostart.ru/projects/?id=266&ref=174