Visual Studio PowerShell：Outlook附件拖入List Box失效问题求助

嗨，这个问题我之前也踩过坑！Outlook拖放附件时并没有使用标准的FileDrop数据格式，所以你现有的代码无法识别到拖入的内容。咱们需要扩展拖放事件的处理逻辑，支持Outlook特有的拖放数据格式。

问题根源 #

当你从Outlook拖放附件时，数据并不是以本地文件路径的形式（FileDrop格式）传递的，而是通过FileGroupDescriptor（存储文件元信息）和FileContents（存储文件二进制内容）这两种格式来传递的。你的现有代码只检查了FileDrop，自然对Outlook的拖放无反应。

修改后的完整代码 #

# 处理DragOver事件：同时支持FileDrop和Outlook拖放格式
$listBox1_DragOver = [System.Windows.Forms.DragEventHandler]{
    # 检查是否是标准文件拖放，或者是Outlook的拖放格式
    if ($_.Data.GetDataPresent([Windows.Forms.DataFormats]::FileDrop) -or 
        $_.Data.GetDataPresent("FileGroupDescriptor")) {
        $_.Effect = 'Copy'
    } Else {
        $_.Effect = 'None'
    }
}

# 处理DragDrop事件：兼容标准文件和Outlook附件
$listBox1_DragDrop = [System.Windows.Forms.DragEventHandler]{
    # 先处理标准文件拖放的情况
    if ($_.Data.GetDataPresent([Windows.Forms.DataFormats]::FileDrop)) {
        foreach ($filename in $_.Data.GetData([Windows.Forms.DataFormats]::FileDrop)) {
            $listBox1.Items.Add($filename)
        }
    }
    # 再处理Outlook附件拖放的情况
    elseif ($_.Data.GetDataPresent("FileGroupDescriptor")) {
        # 获取文件描述符数据
        $fileGroupDescriptor = $_.Data.GetData("FileGroupDescriptor")
        $memoryStream = New-Object System.IO.MemoryStream($fileGroupDescriptor)
        $binaryReader = New-Object System.IO.BinaryReader($memoryStream)
        
        # 读取文件描述符，提取文件名
        $fileName = ""
        try {
            # 跳过前76字节的固定结构，读取文件名
            $binaryReader.ReadBytes(76) | Out-Null
            $byte = $binaryReader.ReadByte()
            while ($byte -ne 0) {
                $fileName += [char]$byte
                $byte = $binaryReader.ReadByte()
            }
        }
        finally {
            $binaryReader.Close()
            $memoryStream.Close()
        }

        # 获取文件内容并保存到临时文件
        $fileContent = $_.Data.GetData("FileContents")
        $tempPath = Join-Path $env:TEMP $fileName
        $fileStream = New-Object System.IO.FileStream($tempPath, [System.IO.FileMode]::Create)
        try {
            $fileContent.CopyTo($fileStream)
        }
        finally {
            $fileStream.Close()
            $fileContent.Close()
        }

        # 将临时文件路径添加到列表框
        $listBox1.Items.Add($tempPath)
    }
}

### Add events to form ###
$listBox1.Add_DragOver($listBox1_DragOver)
$listBox1.Add_DragDrop($listBox1_DragDrop)
#$form.Add_FormClosed($form_FormClosed)
#### Show form and return result ###
$dialogResult = $Form12.ShowDialog()
if ($dialogResult -eq [System.Windows.Forms.DialogResult]::OK) {
    $Form12.SuspendLayout()
    [array]$items = $listbox1.Items| sort -CaseSensitive
    if ($items.Count -gt 1){
        $items
    } ELSE {
        [string]$items[0]
    }
    $Form12.Close() | out-null
}

代码关键点说明 #

1. DragOver事件扩展：新增对FileGroupDescriptor格式的检查，让程序识别Outlook的拖放操作。
2. Outlook拖放处理逻辑：
   • 从FileGroupDescriptor中解析出附件的文件名。
   • 从FileContents中读取附件的二进制内容，保存到系统临时目录下的文件。
   • 将临时文件的路径添加到列表框中（和标准文件拖放的逻辑保持一致）。

注意事项 #

• 临时文件会保存在%TEMP%目录下，你可以在程序关闭时添加清理逻辑，避免占用磁盘空间。
• 如果需要拖放多个Outlook附件，上面的代码只处理了单个文件，你可以扩展循环逻辑来处理多文件的情况（FileGroupDescriptor实际上是一个数组结构，需要循环读取每个文件的描述符）。

内容的提问来源于stack exchange，提问作者RISL2023