Unterstützt die CopyHere-Methode von Windows Shell die Umleitung?

Question

Ich verwende Windows Shell CopyHere Methode, um Archive in einigen Stapeln zu entpacken. Im Allgemeinen funktioniert es, wie in dem folgenden Skriptbeispiel gezeigt, gibt aber in einigen Fällen einen Fehler. Insbesondere habe ich festgestellt, es gibt einen Fehler beim Entpacken eines Archivs in einen speziellen Systemordner wie Downloads, wenn es von einem Benutzer an einen neuen Speicherort verschoben wurde, trotz der Ordner Symlink wurde von OS in seiner Standardposition in das Benutzerprofil, und der Benutzer hat Schreibberechtigungen für den neuen Standort.

Gibt es eine Möglichkeit, diese Einschränkung zu umgehen oder den folgenden Code zu ändern, ohne den allgemeinen Batch-Hybrid-Ansatz zu ändern?

<!-- : Begin batch script 
@echo off 
set "dir=%temp%" & set "file=%USERPROFILE%\Backup\archive.zip\" 
cscript //nologo "%~f0?.wsf" "%dir%" "%file%" 
exit /b 

----- Begin wsf script ---> 
<job><script language="VBScript"> 
set fso = CreateObject("Scripting.FileSystemObject") 
Set Ag=Wscript.Arguments 
If NOT fso.FolderExists(Ag(0)) Then 
fso.CreateFolder(Ag(0)) 
End If 
set objShell = CreateObject("Shell.Application") 
set FilesInZip = objShell.NameSpace(Ag(1)).items 
objShell.NameSpace(Ag(0)).CopyHere(FilesInZip) 
set fso = Nothing 
set objShell = Nothing 
</script></job> 

:: Error if user profile's Downloads folder was moved from default location 

\test.bat?.wsf(15, 3) Microsoft VBScript runtime error: Object required: 'objShell.NameSpace(...)' 

Answer 1

Es scheint, CopyHere-Methode unterstützt keine spezielle Ordnerpfadumleitung. Wenn ein Benutzer Ort eines speziellen Ordner in den Enumerating Special Folders Dokument wie Eigenen Dateien aufgeführten Windows-geändert, ein einfaches VBS-Konstrukt würde es ermöglichen aktuelle Ordner und Dateipfad zu finden:

set objShell = CreateObject("Shell.Application") 
set objFolder = objShell.Namespace(&H5&) 
set FilesInZip = objShell.NameSpace(Ag(1)).items 
objShell.NameSpace(objFolder).CopyHere(FilesInZip) 

Andernfalls wird VBS nicht bieten Methode, um den aktuellen speziellen Ordnerpfad zu finden. Der einzige Weg, ich fand es in einem Hybrid-Batch & VBS-Skript ist durch Abfragen der Registrierungsschlüssel HKCU \ Software \ Microsoft \ Windows \ CurrentVersion \ Explorer \ Shell-Ordner. Der aktuelle .zip-Dateipfad wird dann als cscript-Argument mit dem fraglichen Skript gesendet.

Zum Beispiel, wenn archive.zip- Ordner zu aktuellen Downloads dekomprimiert werden:

@echo off 
setlocal EnableDelayedExpansion 
set "key=HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" 
for /f "tokens=* Skip=2" %%g in ('reg query "%key%" 2^>nul') do (
    echo %%g | find /i "Downloads" >nul && for %%o in (%%g) do (
     set "disk=%%o" & if exist "!disk:~0,3!" set dir=%%o)) 
echo !dir! 

K:\Downloads