dustinberube.com

# Downloads files from an FTP server and unzips them.
# The script will only download new files that have not
# been previously downloaded and extracted into the
# working directory. This can be setup as a scheduled
# task to automate script run-time. Basic logging is
# is written into the FTPUtil.log text file in the 
# application directory.
#
# Created by Dustin Berube on 11/16/2010.
# Requires Indy.Sockets.dll and Mono.Security.dll version=1.0.5000.0
 
# Base Location of Files to work with
$workingPath = 'x:\path\to\your\file\location'
 
# File Extension
$fileExt = '.ZIP' # File extension of file you are downloading.
 
# FTP Information
$ftpDir 	= "/directory"  			# Directory path to folder on ftp server
$ftpServer 	= "ftp.yourserver.com"		# FTP Server address
$ftpUser 	= "username" 				# FTP Username
$ftpPass 	= "password" 				# FTP Password
 
# Application Directory - Usually C:\FTPUtil unless installed to different directory
$appDir = 'C:\FTPUtil'
 
#
# DO NOT CHANGE ANYTHING BELOW THIS LINE
#
 
set-location $workingPath
$shell = new-object -com shell.application
 
function unzip-Files {
	$location = $shell.namespace($workingPath)
	$zipFiles = get-childitem *.zip
 
	if (Test-Path ($workingPath + "\*$fileExt")) {
	foreach ($zipFile in $ZipFiles) {
		$destDirectory = ($workingPath + "\" + $zipFile.name.Trim($fileExt))
		if (!(Test-Path -path $destDirectory)) {
			[IO.Directory]::CreateDirectory($destDirectory) | out-null
			$location = $shell.namespace($destDirectory)
			$zipFolder = $shell.namespace($zipFile.fullname)
 
			$location.copyhere($zipFolder.items())
			((get-date).ToString() + " --- " + $zipFile.name + " extracted to $destDirectory") | out-file "$appDir\FTPUtil.log" -append
		}
	}
	Remove-ZipFiles
	}
	else {
		((get-date).ToString() + " --- NO FILES DOWNLOADED AND UNZIPPED") | out-file "$appDir\FTPUtil.log" -append
	}
}	
 
function Remove-ZipFiles {
	set-location $workingPath
	$location = $shell.namespace($workingPath)
	remove-item "*$fileExt"
}
 
function Open-FTPConnection {
	# Load Indy Sockets Library
	[Reflection.Assembly]::LoadFrom("C:\ftputil\Indy.Sockets.dll") | Out-Null
 
	$ftp = new-object Indy.Sockets.FTP
	$ftp.Disconnect()
 
	# Connect to FTP Server
	$ftp.Host = $ftpServer
	$ftp.Username = $ftpUser
	$ftp.Password = $ftpPass
	$ftp.Connect()
 
	# Set PASV mode
	$ftp.Passive = $true
 
	return $ftp
}
 
function Close-FTPConnection($ftp) {
	$ftp.Disconnect()
}
 
function Download-FTPFile($ftp) {
	$ls = new-object System.Collections.Specialized.StringCollection
	$ftp.List($ls, $ftpDir, $false)
	foreach($file in $ls) {
		$fileName = $file.Trim("$ftpDir/")
		if (!(Test-Path -path ($workingPath + "\" + $fileName.Trim($fileExt)))) {
			 $ftp.Get($file, ($workingPath + "\$fileName"), $true, $false)
			 ((get-date).ToString() + " --- $fileName Downloaded and saved to $workingPath") | out-file "$appDir\FTPUtil.log" -append
		}
	}
}
 
$f = Open-FTPConnection
Download-FTPFile $f 
Close-FTPConnection $f
unzip-Files