Bulk unzip with windows compression libraries

We had a client send a large number of PDF files split across a number of zip files (old school RAR thinking).  Once copied to the server the following scripts can do a batch unzip using the compression libraries built into Windows Server.  There's probably a better way to do this with Powershell...


bulkunzip.bat

for %%i in (c:\temp\*.zip) do doUnzip "%%i"


doUnzip.vbs


ZipFile=WScript.Arguments.Item(0)
ExtractTo="c:\temp\unzipped"
set objShell = CreateObject("Shell.Application")
set FilesInZip=objShell.NameSpace(ZipFile).items
objShell.NameSpace(ExtractTo).CopyHere(FilesInZip)
Set fso = Nothing
Set objShell = Nothing