PowerShell中DataObject字符串无法写入剪贴板的问题求助

核心问题：剪贴板的HTML格式需要特殊包装 #

Windows剪贴板的HTML条目不是直接存储纯HTML字符串，必须附加特定的头部结构（包含版本、字节偏移标记等），否则系统无法识别该HTML内容。

具体解决步骤 #

• 1. 导入Windows Forms程序集
  PowerShell中需先加载必要的程序集，才能操作剪贴板和DataObject：

  Add-Type -AssemblyName System.Windows.Forms
  

• 2. 为HTML内容添加剪贴板专用包装
  纯HTML片段无法被剪贴板正确识别，必须用指定模板包装，并计算各标记的字节偏移量替换占位符：

  # 替换$yourHtmlContent为实际生成的HTML表格内容
  $yourHtmlContent = "<table><tr><td>测试单元格1</td><td>测试单元格2</td></tr></table>"
  
  # 剪贴板HTML格式模板
  $htmlTemplate = @"
  Version:1.0
  StartHTML:00000000
  EndHTML:00000000
  StartFragment:00000000
  EndFragment:00000000
  <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
  <HTML><HEAD></HEAD><BODY>
  <!--StartFragment-->
  $yourHtmlContent
  <!--EndFragment-->
  </BODY></HTML>
  "@
  
  # 计算各标记的UTF-8字节偏移量（剪贴板HTML要求用UTF-8编码）
  $encoding = [System.Text.Encoding]::UTF8
  $startHtml = $encoding.GetByteCount($htmlTemplate.Substring(0, $htmlTemplate.IndexOf('<!DOCTYPE')))
  $endHtml = $encoding.GetByteCount($htmlTemplate)
  $startFragment = $encoding.GetByteCount($htmlTemplate.Substring(0, $htmlTemplate.IndexOf('<!--StartFragment-->') + 19))
  $endFragment = $encoding.GetByteCount($htmlTemplate.Substring(0, $htmlTemplate.IndexOf('<!--EndFragment-->')))
  
  # 替换模板中的占位偏移量
  $formattedHtml = $htmlTemplate -replace 'StartHTML:00000000', "StartHTML:$($startHtml.ToString('D8'))" `
                                -replace 'EndHTML:00000000', "EndHTML:$($endHtml.ToString('D8'))" `
                                -replace 'StartFragment:00000000', "StartFragment:$($startFragment.ToString('D8'))" `
                                -replace 'EndFragment:00000000', "EndFragment:$($endFragment.ToString('D8'))"
  

• 3. 正确构建DataObject并写入剪贴板
  同时添加纯文本和包装后的HTML条目，写入时需保持剪贴板内容（第二个参数设为$true）：

  $dataObj = New-Object System.Windows.Forms.DataObject
  # 添加纯文本内容（替换$plainTextContent为剪贴板读取的原始文本）
  $plainTextContent = "测试内容1,测试内容2`n测试内容3,测试内容4"
  $dataObj.SetData([System.Windows.Forms.DataFormats]::Text, $plainTextContent)
  # 添加包装后的HTML内容
  $dataObj.SetData([System.Windows.Forms.DataFormats]::Html, $formattedHtml)
  
  # 写入剪贴板，保持内容不随程序退出清空
  [System.Windows.Forms.Clipboard]::SetDataObject($dataObj, $true)
  

• 4. 验证剪贴板内容
  用以下代码读取并确认两种格式的内容是否正常：

  $clipboardData = [System.Windows.Forms.Clipboard]::GetDataObject()
  # 读取纯文本
  if ($clipboardData.GetDataPresent([System.Windows.Forms.DataFormats]::Text)) {
      Write-Host "纯文本内容：`n$($clipboardData.GetData([System.Windows.Forms.DataFormats]::Text))"
  }
  # 读取HTML内容
  if ($clipboardData.GetDataPresent([System.Windows.Forms.DataFormats]::Html)) {
      Write-Host "HTML内容：`n$($clipboardData.GetData([System.Windows.Forms.DataFormats]::Html))"
  }
  

常见误区 #

• 直接存储纯HTML字符串至DataFormats.Html格式，未添加剪贴板要求的头部结构。
• 写入剪贴板时未设置第二个参数为$true，导致脚本运行结束后剪贴板内容被清空。
• 计算偏移量时使用了错误的编码（必须用UTF-8，否则偏移值不准确）。

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