Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
 Как узнать установле но ли VPN соединение?  [new]
ByKiS
Member

Откуда:
Сообщений: 3760
Всё что я придумал - это сделать так:

Function MySync()
End Function
Dim dbs As Database
Set dbs = CurrentDb
If Dir("\\labserver-1\lkvitai\lkvitai.ldb") = "" Then
If Dir("\\labserver-1\lkvitai\exist.txt") = "" Then
DoCmd.RunMacro "Establish_VPN)"
Exit Function
Else
MsgBox "Sejcas etim zaniat drugoj user!"
Exit Function
Else
dbs.SYNCHRONIZE "\\labserver-1\lkvitai\lkvitai.mdb", dbRepImpExpChanges
MsgBox "Uspeshno!"
End If
End Function

Может кто подскажет лучший вариант?
10 янв 07, 10:26    [3619591]     Ответить | Цитировать Сообщить модератору
 Re: Как узнать установле но ли VPN соединение?  [new]
SergeySV
Member

Откуда: Москва
Сообщений: 1073
Кстати, неплохо бы еще узнать как VPN можно было бы включить при его отключке (а то у нас по разным причинам такое иногда происходит).

Слышал что это через WMI можно сделать, но самого кода не видел.
10 янв 07, 11:25    [3620010]     Ответить | Цитировать Сообщить модератору
 Re: Как узнать установле но ли VPN соединение?  [new]
ByKiS
Member

Откуда:
Сообщений: 3760
С этим-то проблемы нет - runmacro, где указано что делать (напр RunApp с простой командой)... Вот как узнать есть оно или нет???
10 янв 07, 11:36    [3620098]     Ответить | Цитировать Сообщить модератору
 Re: Как узнать установле но ли VPN соединение?  [new]
NAT14
Member

Откуда:
Сообщений: 1
Для SergeySV
Обращаемся здесь Насчет OfficeRecovery 3.0 с ключом, если можно переслать по почте NAT14@yandex.ru
Большое спасибо заранее
13 янв 07, 21:56    [3637226]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Access Ответить