Показано с 1 по 10 из 10

Тема: автоматическая распечатка писем *.doc *.xls

  1. #1
    Новичок
    Регистрация
    26.11.2003
    Сообщений
    6

    автоматическая распечатка писем *.doc *.xls

    Я уже видел подобную *http://www.forum.nobat.ru/index.php?...;threadid=287* тему но она была заблокирована так что я не смог там ответить. Хотелось бы узнать можно ли таким же способом сделать с офисовскими документами.
    для самого бата смогу написать и сам вот примерный принцип работы (буду исходить из старого топика)
    1. получен документ с вложением
    2. печатается само письмо
    3. приаттаченые сообщения сохраняются (к примеру) c:\temp\print
    4. запускается программа и смотрит наличие документов с расширением *.doc *.xls
    5. печатает их
    6. удаляет
    7. (незнаю как это сделать самым последним шагом) перемещает в папку (например) старое


    И еще вопрос не теме: возможно ли создать сортировщик писем так чтобы он смотрел на дату и перемещал (создавал если в первый раз) письмо в папку январь, февраль, март...

  2. #2
    Участник
    Регистрация
    02.11.2002
    Сообщений
    796

    Re:автоматическая распечатка писем *.doc *.xls

    в первом пункте -- не понял вопроса. Ну разумеется, можно, проблема-то в чем?

    во втором пункте -- нет.

  3. #3
    Новичок
    Регистрация
    26.11.2003
    Сообщений
    6

    Re:автоматическая распечатка писем *.doc *.xls

    Цитата Сообщение от Alexander Kiselev
    в первом пункте -- не понял вопроса. Ну разумеется, можно, проблема-то в чем?
    нужно чтобы офис открыл распечатал а потом закрыл, как енто сделать?

  4. #4
    Участник
    Регистрация
    21.02.2003
    Сообщений
    610

    Re:автоматическая распечатка писем *.doc *.xls

    Эх, какая-то версия офиса (97, кажется) умела печатать через параметр командной строки "p". xp, вроде как не умеет
    Так что самый разумный вариант: состряпать VBScript. На память не подскажу, но там все просто: будет строчки четыре, типа открыть ворд, напечатать, закрыть ворд. Сходи на какой-нить форум по vbs -- помогут (да и примеров там дофига).

  5. #5
    Новичок
    Регистрация
    26.11.2003
    Сообщений
    6

    Re:автоматическая распечатка писем *.doc *.xls

    а на visual basic никто не поможет там есть какието плагины для офиса

  6. #6
    Участник
    Регистрация
    21.02.2003
    Сообщений
    610

    Re:автоматическая распечатка писем *.doc *.xls

    Да по синтаксису это одно и тоже, практически. Если это на VBA делать, то этот макрос будет постоянно с вордом грузится (даже если ты какой-нить левый документ откроешь), что не очень хорошо, имхо (хотя бы потому, что проверять придется: надо печатать открываемый документ или нет).
    А если на vbs делать, то те же команды пишутся в текстовый файл с расширением vbs, т.е. практически, как батник получается. Его из сортировщика писем и будешь запускать.

  7. #7
    Новичок
    Регистрация
    26.11.2003
    Сообщений
    6

    Re:автоматическая распечатка писем *.doc *.xls

    Неужели значит что нельзя ничем помоч страдающему админу? :(

  8. #8
    Участник
    Регистрация
    21.02.2003
    Сообщений
    610

    Re:автоматическая распечатка писем *.doc *.xls

    Justao, я же дал всю необходимую информацию. По этой информации тебе понадобится не более 15 мин чтобы все сделать. Сходи просто на соответсвующий сайт и посмотри примеры. Здесь сайт по Бату все же...
    Я бы тебе это все сделал, но времени совсем нет Может как-нить потом...

  9. #9
    Новичок
    Регистрация
    07.12.2003
    Сообщений
    1

    Re:автоматическая распечатка писем *.doc *.xls

    Есть работающий вариант через фильтр. Отлажено и работает уже 2 года как :-)
    1. Делается фильтр , сохраняющий письмо на диск и запускающий батник разбирающий это письмо.
    2. Вытаскивается приложенный файл утилитой decode64 (почему не получилось сохранять просто файл а не письмо уже не помню)
    3. Запускается скрипт print.js следующего содержания
    ============CUT====================
    var objXL = WScript.CreateObject("Excel.Application");
    objXL.Visible = false;
    objXL.WorkBooks.Open("c:\\mail\\doc.xls");
    objXL.WorkSheets("Sheet1").PageSetup.Zoom =false ;
    objXL.WorkSheets("Sheet1").PageSetup.FitToPagesWid e = 1;
    objXL.WorkSheets("Sheet1").PageSetup.FitToPagesTal l = 10;
    objXL.WorkSheets("Sheet1").PrintOut();
    objXL.Application.DisplayAlerts = 0;
    objXL.Quit();
    ============CUT====================
    Задача была печатать только xls файлы но думаю doc не сильно меняют ситуацию.

  10. #10
    Участник
    Регистрация
    21.02.2003
    Сообщений
    610

    Re:автоматическая распечатка писем *.doc *.xls

    Во-во. Типа этого. Единственное предложение: вместо WorkSheets("Sheet1") лучше писать WorkSheets(1). В противном случае, если лист будет называться как-нить подругому ("Лист1", например), то он может и не распечататься)

Похожие темы

  1. Автоматическая пометка писем
    от Alexivanov в разделе The Bat!: вопросы и ответы
    Ответов: 0
    Последнее сообщение: 29.08.2006, 13:16
  2. автоматическая отправка писем на другой ящик
    от doctor_s в разделе The Bat!: вопросы и ответы
    Ответов: 6
    Последнее сообщение: 16.08.2005, 06:06
  3. Автоматическая склейка больших разрезанных писем
    от beerfuck в разделе The Bat!: вопросы и ответы
    Ответов: 0
    Последнее сообщение: 18.06.2004, 12:36
  4. Автоматическая сортировка и пересылка писем.
    от Red в разделе The Bat!: вопросы и ответы
    Ответов: 1
    Последнее сообщение: 18.09.2003, 01:22
  5. Распечатка писем из TB
    от PavelM в разделе The Bat!: вопросы и ответы
    Ответов: 2
    Последнее сообщение: 16.05.2003, 10:57

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •