Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Обычная тема Как отследить напечатан ли документ? (число прочтений - 3282 )
JohnyDeath
1c++ power user
1c++ donor
Отсутствует



Сообщений: 3050
Местоположение: Волгоград
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Как отследить напечатан ли документ?
16. Октября 2006 :: 08:36
Печать  
Есть примерно такой код:
Код
Выбрать все
WordDoc=СоздатьОбъект("Word.Application");
	WordDoc.Documents.Add();
//....
WordDoc.Documents.Open(ИмяФайла);
//Здесь идёт заполнение, форматирование и т.д.
WordDoc.Application.PrintOut();

//!!!!!!!!!!!!!!!!!
// А вот здесь надо как-нибудь отследить напечатался (отослался на принтер) ли документ
//!!!!!!!!!!!!!!!!
WordDoc.ActiveWindow.Close(0);
 


Собственно вопрос в коде. Выскажите, пжлст, свои мысли.
  
Наверх
 
IP записан
 
steban
1c++ developer
Отсутствует


#define sizeof(x) rand()

Сообщений: 787
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Как отследить напечатан ли документ?
Ответ #1 - 16. Октября 2006 :: 08:58
Печать  
microsoft.public.word.vba.general     Print and then close application
Код
Выбрать все
Options.PrintBackground = False
Application.PrintOut Copies:=1
Options.PrintBackground = True
Application.Quit (no)  

  

int getRandomNumber()&&{&&  return 4; //chosen by fair dice roll&&         //guaranteed to be random&&}
Наверх
 
IP записан
 
steban
1c++ developer
Отсутствует


#define sizeof(x) rand()

Сообщений: 787
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Как отследить напечатан ли документ?
Ответ #2 - 16. Октября 2006 :: 09:01
Печать  
Код
Выбрать все
WordDoc=СоздатьОбъект("Word.Application");
	WordDoc.Documents.Add();
//....
WordDoc.Documents.Open(ИмяФайла);
//Здесь идёт заполнение, форматирование и т.д.
WordDoc.PrintBackground = 0; //false
WordDoc.Application.PrintOut();
WordDoc.PrintBackground = -1;  //true
WordDoc.ActiveWindow.Close(0); 

  

int getRandomNumber()&&{&&  return 4; //chosen by fair dice roll&&         //guaranteed to be random&&}
Наверх
 
IP записан
 
JohnyDeath
1c++ power user
1c++ donor
Отсутствует



Сообщений: 3050
Местоположение: Волгоград
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Как отследить напечатан ли документ?
Ответ #3 - 16. Октября 2006 :: 09:07
Печать  
steban, Благодарю! Какой раз уже выручаешь!

P.S. Только в твоём коде надо
WordDoc.PrintBackground
поменять на
WordDoc.Options.PrintBackground
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать