A common business process to automate is moving files from an FTP server. To copy the files from an FTP server we first need to get a file listing. The following routine serves nicely:<\/p>\n
function Get-FtpDir ($url,$credentials) {\r\n $request = [Net.WebRequest]::Create($url)\r\n $request.Method = [System.Net.WebRequestMethods+FTP]::ListDirectory\r\n if ($credentials)\r\n {\r\n $request.Credentials = $credentials\r\n }\r\n $response = $request.GetResponse()\r\n $reader = New-Object IO.StreamReader $response.GetResponseStream()\r\n $reader.ReadToEnd()\r\n $reader.Close()\r\n $response.Close()\r\n}\r\n<\/pre>\nLet\u2019s set some basic parameters for the file migration:<\/p>\n
$url = 'ftp:\/\/sftp.SomeDomain.com';\r\n$user = 'UserID';\r\n$pass = 'Password' #single quotes recommended if unusual characters are in use\r\n$DeleteSource = $true; #controls whether to delete the source files from the FTP Server after copying\r\n$DestLocation = '\\DestinationServerAnyLocation';\r\n<\/pre>\nLet\u2019s start the processing with connecting to the FTP server, getting the file list, and processing:<\/p>\n
$credentials = new-object System.Net.NetworkCredential($user, $pass)\r\n $webclient = New-Object System.Net.WebClient\r\n $webclient.Credentials = New-Object System.Net.NetworkCredential($user,$pass) \r\n \r\n$files=Get-FTPDir $url $credentials\r\n$filesArr = $files.Split(\"`n\")\r\n \r\nForeach ($file in ($filesArr )){\r\n if ($file.length -gt 0) #this actually happens for last file\r\n {\r\n $source=$url+$file\r\n $dest = $DestLocation + $file\r\n $dest = $dest.Trim() # this is actually needed, as trailing blank appears in FTP directory listing\r\n $WebClient.DownloadFile($source, $dest)\r\n }\r\n}\r\n<\/pre>\nLet\u2019s now delete the source files, if configured to do so:<\/p>\n
$credentials = new-object System.Net.NetworkCredential($user, $pass)\r\n $webclient = New-Object System.Net.WebClient\r\n $webclient.Credentials = New-Object System.Net.NetworkCredential($user,$pass) \r\n \r\n$files=Get-FTPDir $url $credentials\r\n$filesArr = $files.Split(\"`n\")\r\n \r\nForeach ($file in ($filesArr )){\r\n if ($file.length -gt 0) #this actually happens for last file\r\n {\r\n $source=$url+$file\r\n $dest = $DestLocation + $file\r\n $dest = $dest.Trim() # this is actually needed, as trailing blank appears in FTP directory listing\r\n $WebClient.DownloadFile($source, $dest)\r\n }\r\n}\r\n<\/pre>\nLet\u2019s now delete the source files, if configured to do so:<\/p>\n
if ($DeleteSource)\r\n{\r\nForeach ($file in ($filesArr )){\r\n if ($file.length -gt 0) #this actually happens for last file\r\n {\r\n $source=$url+$file\r\n $ftprequest = [System.Net.FtpWebRequest]::create($source)\r\n $ftprequest.Credentials = New-Object System.Net.NetworkCredential($user,$pass)\r\n $ftprequest.Method = [System.Net.WebRequestMethods+Ftp]::DeleteFile\r\n $ftprequest.GetResponse()\r\n }\r\n}\r\n}\r\n<\/pre>\nThat\u2019s it in a nutshell. Just don\u2019t try to move zero length files, and trim the filenames for trailing blanks. Ensure your FTP ports are open, and you are good to go!<\/p>\n