Книга знаний

1С:Предприятие

Получение путей баз vb скриптом (краткий пример)

Получение путей баз 1cv77 скриптом vbАвтор статьи: DGorgoN | Редакторы:
Последняя редакция №2 от 07.09.07 | История
URL: http://kb.mista.ru/article.php?id=587

Ключевые слова: 1cv77, 1с, vb, пути баз


Краткий пример получения путей баз 1с 1cv77 скриптом vb



Const HKEY_CURRENT_USER = &H80000001
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
Set oRegProv = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv")
strKeyPath = "Software\1C\1Cv7\7.7\Titles"
iRes = oRegProv.EnumValues(HKEY_CURRENT_USER, strKeyPath, arrValues)
strpath = join(arrValues,";")
MsgBox "база" & strpath, vbOK

Описание | Рубрикатор | Поиск | ТелепатБот | Захваченные статьи | Установки | Форум
© Станислав Митичкин (Волшебник), 2005-2025 | Mista.ru

Яндекс.Метрика