Флаг, отображающий что TDMS подключен к базе данных (включая проверку учетной записи пользователя TDMS)
Read-only свойство
| Visual Basic |
|---|
Public Property IsLoggedIn As Boolean |
| VB Script (VBScript) | Скопировать код |
|---|---|
'====================================================================== 'Проверка, подключена ли действущая учетная запись пользователя TDMS к базу данных(и само приложение) if ThisApplication.IsLoggedIn Then MsgBox("Текущий сеанс TDMS подключен к базе данных") else MsgBox("Текущий сеанс TDMS не подключен к базе данных") '====================================================================== | |