Sandwich
Никак не могу убить этот процесс по HWND

cNameProcess = "excel.exe"
WshShell = CreateObject("WScript.Shell")
WshShell.Run("taskkill /IM " + cNameProcess, 0)

Sandwich
Программно создаю (точнее заполняю готовую форму файла Excel) товарную накладную.
Методика: в папке с формами хранится Excel шаблон, программа копирует его в tmp-папку с tmp-именем, открывает эту копию и заполняет.

ssa
К тому же уже есть и способы создания Excel файлов без использования Excel.

Sandwich
... Excel-процесс с tmp-именем остаётся "висеть" невидимым и при следующей попытке копирования шаблона в tmp-папку с tmp-именем возникает ошибка. Программа выводит соответствующее сообщение ...

Равиль
Заброшенные при сбоях Excel-процессы - явление довольно частое, но тут не понятно почему возникает ошибка, если шаблон копируется с уникальным именем :

Sandwich
... Excel-процесс с tmp-именем остаётся "висеть" невидимым и при следующей попытке копирования шаблона в tmp-папку с tmp-именем возникает ошибка. Программа выводит соответствующее сообщение ...

Может кусочек кода этого копирования и открытия покажете ?

file_name = 'счет_'+alltrim(str(doc.nomer))+'.xlsx'
newfile='Общая папка\Документы\Счета\'+file_name 
ON ERROR copy_error=.t.
copy file &form_dir\&form_file to (newfile)
ON ERROR 
IF copy_error
    * здесь надо убить процесс и скопировать снова
ENDIF 
LOCAL loExcel as Excel.Application
loExcel=CREATEOBJECT('Excel.Application')
LOCAL loBook as Excel.Workbook
loBook = m.loExcel.workbooks.open(newfile)

Sandwich
...
Имя файла не уникально, оно содержит номер документа
[code]
file_name = 'счет_'+alltrim(str(doc.nomer))+'.xlsx'
newfile='Общая папка\Документы\Счета\'+file_name
...

Sandwich
Естественно методика не выдерживает критики

Crispy
cNameProcess = "excel.exe"
WshShell = CreateObject("WScript.Shell")
WshShell.Run("taskkill /IM " + cNameProcess, 0)

cNameProcess = "имя_окна_полученное_по_его_хэндлу"

Sandwich
Но ведь вопрос стоит более широко: я не умею убивать процессы (и не важно Excel или нет, формы, парадигмы, юзеры, разделения полномочий и пр.)

Sandwich
Просто программа рождена еще в самом начале этого века. Ну очень не хочется переделывать.

Sandwich
убивает все Открытые Excel окна, а скрытый процесс продолжает висеть

Crispy
приведенные здесь советы по переделке программы все же более корректны могли бы оказаться.

Igor Korolyov
Убивать процесс нехорошо уже хотя бы потому что потом, при очередном старте экселя он может предложить "восстановить файл после сбоя".

Igor Korolyov
По завершению формирования документа сохранить его в нужное место под нужным именем и завершить рабочий экселевский процесс.

PuMa
Проще всего, наверное, поместить процесс заполнения в TRY и в его секции CATCH выдать пользователю сообщение об ошибке и корректно закрыть Excel

Igor Korolyov
формировать документ (заполнять шаблон) стоит в отдельной, независимой копии экселя (созданной по CreateObject("Excel.Application") и по возможности максимально "изолированной" от взаимодействия с пользователем

Владимир Максимов
loExcel.Workbooks.Close()
loExcel.quit()

loExcel.DisplayAlerts    = .F.    && чтоб не просил сохранить
loBook.Close                    && закрываем нашу книгу
* Если храним не объекты-книги, а их имена, то примерно так:
* this.oExcel.Workbooks(this.aBooks[m.li]).Close

If loExcel.Workbooks.Count =0    && были открыты только наши книги
    loExcel.Quit                && гасим процесс
Else        && возвращаем Excel в состояние интерактива
    loExcel.DisplayAlerts    = .T.
    * остальное если меняли:
    loExcel.ScreenUpdating    = .T.
    loExcel.Interactive        = .T.
    loExcel.UserControl        = .T.
    loExcel.Visible            = .T.
EndIf

Владимир Максимов
loExcel.saved = .T.

andrewk
В более свежих версиях, насколько помню, ситуация изменилась. Но в Excel-2007 (только что проверил под WinXP) получается вот что:
Если процесс заполнения относительно долгий, и за это время юзер успел открыть какой-то «свой» Excel, то в диспетчере задач новый процесс не появляется. Более того, наш невидимый эксель становится видимым, и человек может чего-то делать – и в своём, и в нашем.

loXl = CREATEOBJECT("Excel.Application")
loXl.DisplayAlerts = .F.
loXl.IgnoreRemoteRequests = .T.