Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » VBScript. Объектная переменная не задана

Модерирует : ShIvADeSt

ShIvADeSt (08-08-2017 01:55): http://forum.ru-board.com/topic.cgi?forum=33&topic=11963&start=860#lt  Версия для печати • ПодписатьсяДобавить в закладки

   

delano

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Занимаюсь очень простеньким скриптом, читающим ключ из реестра. Написал такой код.

Код:
 
Dim regObject
Set WshShell = WScript.CreateObject ("WScript.Shell")
regObject = WshShell.RegRead ("HKCU\Software\wsh_test\TestKey")
 
if regObject = Nothing Then
    WScript.StdOut.WriteLine("Registry key not found")
Else
    WScript.StdOut.WriteLine(regObject)
End If
 

Интерпретатор (cscript) ругается, что в строке (5,1) не задана объектная переменная. Если условия IF-THEN-ELSE заменить просто на  

Код:
 
WScript.StdOut.WriteLine(regObject)
 

то никакой ошибки не происходит, и выводится значения ключа.
Пробовал по всякому, типа Dim ... As Object, Set regObject = WshShell.RegRead(), Dim regObject = Nothing, и тп, че-то не очень помогает. Что не так делаю?

Всего записей: 11 | Зарегистр. 23-07-2017 | Отправлено: 17:39 07-08-2017
   

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » VBScript. Объектная переменная не задана
ShIvADeSt (08-08-2017 01:55): http://forum.ru-board.com/topic.cgi?forum=33&topic=11963&start=860#lt


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru