使用WinSCP.NET程序集在FTP服务器上生成新文件和修改过的文件的列表



我有一个PowerShell脚本,可以检测何时在FTP服务器上上载新文件。我想在邮件中包含这样的文件列表(可能有多个文件(。我已经有了将其添加到邮件中并发送的脚本部分(我认为我已经用正确的方式完成了(,但我只需要文件名,而不需要完整的路径。仅供参考:我正在使用winscpnet.dll库。

你知道怎么做吗?

这是脚本:

param (
# Use Generate Session URL function to obtain a value for -sessionUrl parameter.
$sessionUrl = "xxxxxxx",
$remotePath = "xxxxxxx"
)
### SENDING MAIL FONCTION IF NEW FILE ###
Function SendMail-New
{
$EXPEDITEUR = "xxxxxxx"
$DESTINATAIRE = "xxxxxxx","xxxxxxx"
$SUJET = "xxxxxxx"
$SERVEUR_SMTP = "sxxxxxxx" 
$CORPS_MAIL = "xxxxxxx"
#$PJ = ($added -Join "`n") # If attached file
#$attachment = New-Object System.Net.Mail.Attachment($PJ) # For attached file
$Mail_Message = New-Object System.Net.Mail.MailMessage # Creating mail object
$Mail_Message.From = $EXPEDITEUR
$Mail_Message.Subject = $SUJET
$Mail_Message.Body = $CORPS_MAIL
#$Mail_Message.Attachments.Add($PJ)
$Mail_Adresses = $Mail_Message.To
if ($DESTINATAIRE -is "System.Array") # If more than 1 adress
{
foreach ($Adr in $DESTINATAIRE) # Adding each mail adress
{
$Mail_Adress = New-Object System.Net.Mail.MailAddress $Adr
$Mail_Adresses.Add($Mail_Adress)
}
}
else
{
$Mail_Adress = New-Object System.Net.Mail.MailAddress $DESTINATAIRE
$Mail_Adresses.Add($Mail_Adress)
}
$SMTPClient = New-Object Net.Mail.SmtpClient($SERVEUR_SMTP, xxxxxxx) # SMTP server and port
$SMTPClient.EnableSsl = $false # If SSL his activated or not - import the certificate before ?
$SMTPClient.Credentials = New-Object System.Net.NetworkCredential("xxxxxxx", "xxxxxxx"); #ICI Login et password du compte mail
$SMTPClient.Send($Mail_Message) # Mail sending
}
### SENDING MAIL FONCTION IF DELETED FILE ###
Function SendMail-Deleted
{
$EXPEDITEUR = "xxxxxxx"
$DESTINATAIRE = "xxxxxxx","xxxxxxx"
$SUJET = "xxxxxxx"
$SERVEUR_SMTP = "xxxxxxx" 
$CORPS_MAIL = "xxxxxxx"
#$PJ = 'c:scriptRapport.txt' # If attached file
#$attachment = New-Object System.Net.Mail.Attachment($PJ) # For attached file
$Mail_Message = New-Object System.Net.Mail.MailMessage # Creating mail object
$Mail_Message.From = $EXPEDITEUR
$Mail_Message.Subject = $SUJET
$Mail_Message.Body = $CORPS_MAIL
#$Mail_Message.Attachments.Add($PJ)
$Mail_Adresses = $Mail_Message.To
if ($DESTINATAIRE -is "System.Array") # If more than 1 adress
{
foreach ($Adr in $DESTINATAIRE) # Adding each mail adress
{
$Mail_Adress = New-Object System.Net.Mail.MailAddress $Adr
$Mail_Adresses.Add($Mail_Adress)
}
}
else
{
$Mail_Adress = New-Object System.Net.Mail.MailAddress $DESTINATAIRE
$Mail_Adresses.Add($Mail_Adress)
}
$SMTPClient = New-Object Net.Mail.SmtpClient($SERVEUR_SMTP, xxxxxxx) # SMTP server and port
$SMTPClient.EnableSsl = $false # If SSL his activated or not - import the certificate before ?
$SMTPClient.Credentials = New-Object System.Net.NetworkCredential("xxxxxxx", "xxxxxxx"); #ICI Login et password du compte mail
$SMTPClient.Send($Mail_Message) # Mail sending
}
### SENDING MAIL FONCTION FOR A SCRIPT ERROR ###
Function SendMail-Error
{
$EXPEDITEUR = "xxxxxxx"
$DESTINATAIRE = "xxxxxxx"
$SUJET = "xxxxxxx"
$SERVEUR_SMTP = "xxxxxxx" 
$CORPS_MAIL = "Le script c'est fermé suite à une erreur: $($_.Exception.Message)"
#$PJ = 'c:scriptRapport.txt' # If attached file
#$attachment = New-Object System.Net.Mail.Attachment($PJ) # For attached file
$Mail_Message = New-Object System.Net.Mail.MailMessage # Creating mail object
$Mail_Message.From = $EXPEDITEUR
$Mail_Message.Subject = $SUJET
$Mail_Message.Body = $CORPS_MAIL
#$Mail_Message.Attachments.Add($PJ)
$Mail_Adresses = $Mail_Message.To
if ($DESTINATAIRE -is "System.Array") # If more than 1 adress
{
foreach ($Adr in $DESTINATAIRE) # Adding each mail adress
{
$Mail_Adress = New-Object System.Net.Mail.MailAddress $Adr
$Mail_Adresses.Add($Mail_Adress)
}
}
else
{
$Mail_Adress = New-Object System.Net.Mail.MailAddress $DESTINATAIRE
$Mail_Adresses.Add($Mail_Adress)
}
$SMTPClient = New-Object Net.Mail.SmtpClient($SERVEUR_SMTP, xxxxxxx) # SMTP server and port
$SMTPClient.EnableSsl = $false # If SSL his activated or not - import the certificate before ?
$SMTPClient.Credentials = New-Object System.Net.NetworkCredential("xxxxxxx", "xxxxxxx"); #ICI Login et password du compte mail
$SMTPClient.Send($Mail_Message) # Mail sending
}
try
{
# Load WinSCP .NET assembly
Add-Type -Path "WinSCPnet.dll"

# Setup session options
$sessionOptions = New-Object WinSCP.SessionOptions
$sessionOptions.ParseUrl($sessionUrl)

$session = New-Object WinSCP.Session

try
{
# Connect
$session.Open($sessionOptions)

$prevFiles = $Null;

while ($True)
{
# Collect file list
$files =
$session.EnumerateRemoteFiles(
$remotePath, "*.*", [WinSCP.EnumerationOptions]::AllDirectories) |
Select-Object -ExpandProperty FullName

if ($prevFiles -eq $Null)
{
# In the first round, just print number of files found
Write-Host "Found $($files.Count) files"
}
else
{
# Then look for differences against the previous list
$changes = Compare-Object -DifferenceObject $files -ReferenceObject $prevfiles

$added =
$changes |
Where-Object -FilterScript { $_.SideIndicator -eq "=>" } |
Select-Object -ExpandProperty InputObject
if ($added)
{
Write-Host "Added files:"
Write-Host ($added -Join "`n")
Write-Warning "xxxxxxx"
SendMail-New # Send notification by mail for NEW FILE
echo "Mail envoyé"
}

$removed =
$changes |
Where-Object -FilterScript { $_.SideIndicator -eq "<=" } |
Select-Object -ExpandProperty InputObject
if ($removed)
{
Write-Host "Removed files:"
Write-Host ($removed -Join "`n")
Write-Warning "Un rapport d'intervention a été supprimé"
SendMail-Deleted # Send notification by mail for DELETED FILE
echo "Mail envoyé"
}
}

$prevFiles = $files

Write-Host "Sleeping 10s..."
Start-Sleep -Seconds 10
}
}
finally
{
# Disconnect, clean up
$session.Dispose()
}
}
catch
{
SendMail-Error
Write-Host "Error: $($_.Exception.Message)"
echo "Mail d'erreur envoyé"
exit 1
}

我假设您的比较中没有任何子文件夹。否则你的要求对我来说就没有意义了。

如果这个假设是正确的,只需比较纯文件名(Name(而不是完整路径(FullName(。并排除子文件夹([WinSCP.EnumerationOptions]::None(,以表明代码不再支持它们。

$files =
$session.EnumerateRemoteFiles(
$remotePath, "*.*", [WinSCP.EnumerationOptions]::None) |
Select-Object -ExpandProperty Name

最新更新