Outlook 子文件夹附件保存 - powershell COM

Question

#file path
$filepath = “c:\test\”


#set outlook to open
$o = New-Object -comobject outlook.application
$n = $o.GetNamespace(“MAPI”)


#you'll get a popup in outlook at this point where you pick the folder you want to scan
$f = $n.pickfolder()

#date string to search for in attachment name
$date = Get-Date -Format yyyyMMdd


#now loop through them and grab the attachments
$f.Items | foreach {
    $_.attachments | foreach {
    Write-Host $_.filename
    $a = $_.filename
    If ($a.Contains($date)) {
    $_.saveasfile((Join-Path $filepath $a))
      }
  }
}

任何人都可以帮助处理上述脚本，它实际上运行并写入主机，但附件没有出现在驱动器文件夹中，有什么想法吗？

谢谢

Answer 1

假设您刚刚复制了脚本并且没有注意到它只是保存名称包含当前日期的附件，格式为 yyyyMMdd，如果您想保存所有附件，您会这样做：

#file path
$filepath = “c:\test\”


#set outlook to open
$o = New-Object -comobject outlook.application
$n = $o.GetNamespace(“MAPI”)


#you'll get a popup in outlook at this point where you pick the folder you want to scan
$f = $n.pickfolder()

#now loop through them and grab the attachments
$f.Items | foreach {
    $_.attachments | foreach {
    Write-Host $_.filename
    $a = $_.filename
    $_.saveasfile((Join-Path $filepath $a))
  }
}