Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как запустить другое приложение из Access97 / 3 сообщений из 3, страница 1 из 1
16.12.2003, 14:25
    #32353993
puzzo
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как запустить другое приложение из Access97
Каким образом можно запустить другое приложение из аксесса... вроде можно через макрос, то там как то непонятно, как менять команду. Как проще это сделать?
...
Рейтинг: 0 / 0
16.12.2003, 14:31
    #32354003
# Darth Vader #
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как запустить другое приложение из Access97
F1
Shell
...
Рейтинг: 0 / 0
16.12.2003, 14:41
    #32354024
RVI
RVI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как запустить другое приложение из Access97
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
Private Declare Function ShellExecute Lib  "shell32.dll"  Alias _
 "ShellExecuteA"  (ByVal hWnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long



Function my_funSysOpenFile(strFileName As String)
   Const SW_SHOWNORMAL =  1 
   
   Call ShellExecute( _
       hWndAccessApp, _
       vbNullString, _
       strFileName, _
       vbNullString, _
        "C:\" , _
       SW_SHOWNORMAL)
End Function

Function Shell_File()
Call my_funSysOpenFile( "C:\myPapka\myFile.doc"  или что угодно) ' - запуск
End Function
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как запустить другое приложение из Access97 / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]