Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
Топик располагается на нескольких страницах: Ctrl  назад   1 [2]      все
 Re: Можно ли из программы Access снять процесс?  [new]
Александр Маркин
Member

Откуда: 307cwam.ucoz.ru
Сообщений: 289
Joss,
Модуль.
Option Compare Database
Option Explicit

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
    (ByVal ClassName As String, _
    ByVal WindowName As String) As Long

Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
    (ByVal hwnd As Long, _
    ByVal msg As Long, _
    ByVal Param1 As Long, _
    Param2 As Any) As Long
    
Private Const GetClose = &H10

Function CloseWindow(WindowName)
Dim str As String
str = FindWindow(vbNullString, WindowName)
    If str <> 0 Then
    CloseWindow = SendMessage(str, GetClose, 0, vbNullString)
    End If
End Function


Вызов, например так:
В кавычках Имя файла,
как оно отображается в Диспетчере задач.
CloseWindow ("Microsoft Excel - Проверка Excel.xlsx")


К сообщению приложен файл. Размер - 56Kb
16 янв 15, 19:05    [17130037]     Ответить | Цитировать Сообщить модератору
 Re: Можно ли из программы Access снять процесс?  [new]
Joss
Member

Откуда: г. Минск
Сообщений: 4684
Спасибо за советы, но есть несколько вопросов-замечаний.

Если установлен Windows XP, то там диспетчер задач выглядит иначе, но это так... к слову... А вот то, что процесс может открываться без окна.... Как быть в этом случае? Наверно только по PID их и можно будет различить?

Всем спасибо за советы. Часть проблемы решена (это та, где загрузка из файлов Excel). Осталась та, где выгрузка в файлы Excel. Но как всегда начальство срочно бросило на другую работу. Закончу новую задачу - вернусь к этой. Если опять упрусь во что-то - отпишу.
20 янв 15, 16:11    [17143685]     Ответить | Цитировать Сообщить модератору
Между сообщениями интервал более 1 года.
 Re: Можно ли из программы Access снять процесс?  [new]
Joss
Member

Откуда: г. Минск
Сообщений: 4684
Вот здесь наткнулся на решение своей старой проблемы - закрытие приложений, запущенных из Access и не закрывающихся стандартными методами ( .Quit) VBA - принудительное закрытие приложений Может кому пригодится?
5 окт 18, 12:08    [21696221]     Ответить | Цитировать Сообщить модератору
Топик располагается на нескольких страницах: Ctrl  назад   1 [2]      все
Все форумы / Microsoft Access Ответить