使用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:\script\Rapport.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"); #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:\script\Rapport.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"); #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