Total Commander

[angry_dog]

1.начало выполнил, заменил блок
2.нашел строку: Dim StartMenuPath, UnknowTypeIcon
3.добавил в неё: , AppData, ProgramData
4.получилось: Dim StartMenuPath, UnknowTypeIcon, AppData, ProgramData
5.Под неё следуя контексту поста поместил:
AppData = WSH.Environment("Process")("APPDATA")
ProgramData = WSH.Environment("Process")("ProgramData")
6.Вроде всё правильно сделал?
7.ошибка:
---------------------------
Windows Script Host
---------------------------
Сценарий: D:\Downloads\Temp\789.vbs
Строка: 12
Символ: 2
Ошибка: Требуется объект: ''
Код: 800A01A8
Источник: Ошибка выполнения Microsoft VBScript

---------------------------
ОК
---------------------------