Ao executar o VBSdescompacte o código lote no Win 10, estou recebendo o erro abaixo. O que pode ser uma razão para isso, dado que foi relatado antes por outras pessoas? Alterar diretórios de destino ou defini-los explicitamente não afeta o erro.

@echo off
setlocal enabledelayedexpansion
cd /d %~dp0
set vbs="%temp%\_.vbs"
call :UnZipFile "E:\Temp\" "%USERPROFILE%\Downloads\archive.zip\"
exit /b

:UnZipFile <ExtractTo> <newzipfile>
if exist %vbs% del /f /q %vbs%
>%vbs%  echo Set fso = CreateObject("Scripting.FileSystemObject")
>>%vbs% echo If NOT fso.FolderExists(%1) Then
>>%vbs% echo fso.CreateFolder(%1)
>>%vbs% echo End If
>>%vbs% echo set objShell = CreateObject("Shell.Application")
>>%vbs% echo set FilesInZip=objShell.NameSpace(%2).items
>>%vbs% echo objShell.NameSpace(%1).CopyHere(FilesInZip)
>>%vbs% echo Set fso = Nothing
>>%vbs% echo Set objShell = Nothing
cscript //nologo %vbs%
if exist %vbs% del /f /q %vbs%

::error
VBScript runtime error: Object required: 'objShell.NameSpace(...)'

EDIT: local do arquivo .zip alterado, agora o script funciona. O motivo do erro foi a pasta Download do usuário movida para um volume diferente, comparado ao padrão% USERPROFILE% \ Downloads. O script parece ter problemas funcionando corretamente com os links simbólicos da pasta do sistema.