И снова я со своим сервисом, который запускает Ворд. Задача следующая: иногда Ворд, запущенный из этого сервиса, остается как висящий процесс, и тогда приходится его находить и убивать (в частности потому, что он держит нужные файлы). Но убивать надо именно свои Ворды, а не те, которые открыты другими сервисами и еще нужны. Чтобы их различать, я пытаюсь использовать свойство аппликации Ворда Caption. Код такой:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
'Описана константа:
Const MYCAPTION = "чегототам"
'Так я запускаю Ворд:
o = New Word.Application
o.Caption = MYCAPTION
'Так я нахожу все свои Ворды и убиваю:
For Each p As Process In Process.GetProcessesByName("winword")
If p.MainWindowTitle Like "*" & MYCAPTION & "*" Then
p.Kill()
p.WaitForExit()
p.Close()
End If
Next
Это хорошо работало, пока я отлаживал код в обычной аппликации. Как только я превратил ее в сервис, перестало работать Caption. Есть ли какое-то другое решение? Заранее спасибо.
