Вопрос № 19084: скажите пожалуйста как можно проверить наличие какого либо ключа реестра???????????...
Вопрос № 19084
скажите пожалуйста как можно проверить наличие какого либо ключа реестра???????????
Отправлен: 01.04.2005, 22:35
Вопрос задал: Zheka (статус: Посетитель)
Всего ответов отправлено: 2
Отвечает: ale2k
Здравствуйте, Zheka!
Попробуй так:
Private Sub Command1_Click()
On Error Resume Next
Set reg = CreateObject("WScript.Shell")
aaa = reg.RegRead("HKLMSoftwareMicrosoftWindowsCurrentVersionRun
wiz")
' aaa - значение ключа, если есть
' в скобках подстав своё значение
If Err Then msgbox "Нет такого ключа"
End Sub
также можно писать в реестр( reg.RegWrite) и т.д.
Этот способ легче, чем в API
Ответ отправил: ale2k (статус: 2-ой класс)
Отправлен: 02.04.2005, 02:30