Тема: VBS: функция не возвращает значение
Доброго времени суток!
Никак не могу победить причину, по которой функция на VBS не возвращает присвоенное значение.
Может быть сказывается 7-ой рабочий день...
Задача такая: есть функция ReadKey для обхода веток реестра, нужно с ее помощью вернуть значение. Добавляю скобки, делаю присвоение значения, а результат "пусто". Как так?
Вот пример, как я это пытаюсь сделать (весь код не привожу, только изменения для возврата значения):
...
f = ReadKey ("Software\ODBC")
' в результате f пустое...
msgbox f
Function ReadKey(strKey)
...
' для примера строку "WScript.Echo "HKEY_CURRENT_USER\" & strKey & "\, параметр """ & Param & """ = " & Val" заменяю на:
ReadKey = "HKEY_CURRENT_USER\" & strKey & "\, параметр """ & Param & """ = " & Val
' Exit Function ' это тоже делал после ReadKey = - толку ноль!
...
End Function
Никогда еще с таким не сталкивался. Внутри функции все значения есть (не пустые), но при выходе из функции "пусто". Даже не знаю на что уже думать - требуется Ваша помощь.