Уважаемые,
Тут такое дело: открываю шаблон *.dot, заполняю, сохраняю в документ, закрываю - все работает как надо. Тока вот неприятная ситуовина возникает в процессе обработки (у worda visible = false), если узер жмет на мышку в форме (в процессе формирования док-а) вылазивает следующая мессага:
This action cannot be complated because the other
application is busy. Choose 'Switch To' to activate
this busy application and correct the problem.
Внизу 3 кнопочки: Switch To, Retry и заблокированный Cancel.
Если сидишь ждешь до конца обработки и ни чего не жмешь, то все ок. Понятно, что можно не заморачиваться и нажать 'Switch To', но некоторые людишки, из числа тех, кто использует прогу, не совсем адекватны к жизни, я уже не говорю о сложной вычислительной технике. Потому они глупо глядят в монитор, программа прекращает выполняться пока не тыкнешь на кнопочку, в итоге виноват программист.
Если хто знает как избежать этой траблы черкните пжлст. Замучился уже. Кстати блокирование формы типа (enable = false), не помогает, а скрывать форму нельзя, типа там процесс на наличие ошибок индицируется. On Error Resume Next так же отдыхает, видимо ошибка word'овая.
Не знаю, важная по сути проблемы инфа или нет, но все равно напишу:
W2k SP3, MS Office XP (с 2-мя сервис паками), VB 6 Enterprise, MDI-интерфейс, есно, что все библиотеки подцеплены.
P.S. Чтоб не смущались:
- Код: Выделить всё
Sub Word_Doc_Edit()
On Error Resume Next
frmMAIN.Enabled = False
frmAddDoc.Enabled = False
Set objWord = New Word.Application
Set objDoc = objWord.Documents.Add("Тут типа путь с именем шаблона документа")
objWord.Visible = False
'Тута типа обработка док-а.
objDoc.SaveAs ("Тут типа другой путь с именем док-а сформированного на основе шаблона")
objWord.Quit False
Set objWord = Nothing
frmMAIN.Enabled = True
frmAddDoc.Enabled = True
End Sub
]
