VBScript и реестр #294847


#0 by 1Снечег
Подскажите как правильно считать с помощью конструкции WshShell.RegRead значение параметра из ветки реестра "HKEY_CURRENT_USERSoftware1C1Cv77.7Titles" проблема в том что названия параметров там в виде "I:1C_Base" то есть в результате получается следующее: WshShell.RegRead("HKEY_CURRENT_USERSoftware1C1Cv77.7TitlesI:1C_Base") и при попытке случается ошибка (Err.Number=-2147024735, Err.Description="Неверная ссылка на корень в разделе реестра") подскажите пожалуйста синтаксис, а то я уже всю голову сломал
#1 by DGorgoN
мыло скажи..
#2 by IUnknown
#3 by DGorgoN
HKEY_CURRENT_USERSoftware1C1Cv77.7TitlesI:1C_Base - загоняешь в переменную, и уже WshShell.RegRead(переменная)
#4 by DGorgoN
+ попробуй..
#5 by 1Снечег
не, мне именно в VBScript нужно. боюсь что все-таки есть разница
#6 by IUnknown
там есть именно на VBScript только ковычки надо будет по сокращать
#7 by 1Снечег
у меня это сейчас так:
#8 by DGorgoN
не помогло?
#9 by DGorgoN
хм
#10 by DGorgoN
#11 by DGorgoN
#12 by DGorgoN
arrValues - там список всех баз.. удачи..
#13 by DGorgoN
добавил в КЗ как полный, простой и исчерпывающий пример..
#14 by 1Снечег
блин, ладно, с тем что дали как-нибудь разберусь но вообще мне список баз не нужен был, мне нужно было проверить конктретную базу
#15 by DGorgoN
Ну так и воспользуйся
#16 by 1Снечег
правильно порезал? а то все равно не пашет
#17 by DGorgoN
if instr(1,strPath,"ПУТЬ К ИСКОМОЙ БАЗЕ")>0 Then ' если нет в списке то добавим
#18 by 1Снечег
правда и тот способ пригодится потом
#19 by DGorgoN
помогло или нет? Или тебе че-то другое надо было?
#20 by 1Снечег
блин, копипаст забыл сделать=) порезал вот так: '        if x <> UBound(Arr) then Answer = Answer & "",""    next
Тэги:
Ответить:
Комментарии доступны только авторизированным пользователям

В этой группе 1С