UnZip

Unzip compressed files (without any external tool)

Function Unzip($ZipFile, $UnzipPath) {
$ShellApplication = New-Object -com Shell.Application
$ZipPackage = $ShellApplication.NameSpace($ZipFile)
$DestFolder = $ShellApplication.NameSpace($UnzipPath)
$DestFolder.CopyHere($ZipPackage.Items()) 
}