Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / проверка версий Access / 5 сообщений из 5, страница 1 из 1
14.11.2006, 13:43
    #34127005
Коза
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка версий Access
Как сделать проверку на наличие установленных версий Access? В программе использую импорт таблиц парадокса 4.0 в БД Access 2000. Если на пользовательском компьютере вместо 2000 стоит 97, то выходит досадная ошибка. Как сделать проверку на то, что Access 2000 все-таки есть?
...
Рейтинг: 0 / 0
14.11.2006, 14:08
    #34127160
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка версий Access
через реестр
HKLM\SOFTWARE\Microsoft\Office\
и ветки 11.0, 9.0, 8.0
можно также через
Код: plaintext
1.
2.
3.
4.
5.
Dim objAccessApp As Object
Set objAccessApp=CreateObject("Access.Application")
WScript.Echo objAccessApp.Version
objAccessApp.Quit
Set objAccessApp=Nothing
...
Рейтинг: 0 / 0
14.11.2006, 16:54
    #34127975
Worobjoff
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка версий Access
...
Рейтинг: 0 / 0
15.11.2006, 08:19
    #34128971
Коза
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка версий Access
orunbek
можно также через
Код: plaintext
1.
2.
3.
4.
5.
Dim objAccessApp As Object
Set objAccessApp=CreateObject("Access.Application")
WScript.Echo objAccessApp.Version
objAccessApp.Quit
Set objAccessApp=Nothing


Спасибо, только на строке

WScript.Echo objAccessApp.Version

выскакивает ошибка 438 "Object doesn't support this property"

Если проверять версию Excel или Word, то все в порядке.
...
Рейтинг: 0 / 0
15.11.2006, 10:46
    #34129328
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка версий Access
Ну тады через реестр, самый верный метод
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / проверка версий Access / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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