初心者のFileMaker pro Q&A (旧掲示板)

nori

Member

Powershellを使ったメールにファイルが添付されない

Windows7 FileMakerPro15
WindowsServer2012R2 FileMakerServer15

http://joy-h.com/bbs2/viewtopic.php?id=6897
前に上記で質問させて頂いた者です。
メール送信は可能になったのですが添付ファイルが添付されずご相談になります。

スクリプトA
変数を設定 $$ファイル名：Get(デスクトップパス)&"【題名】 " & フィールド名 & ".pdf"
レコードをPDFとして保存：＄$ファイル名
スクリプト実行[スクリプトB]

スクリプトB
宛先、CC、件名、本文をの変数に格納
Eventを送信で下記の記述
"powershell  -windowstyle hidden -Command \"
$Outlook = New-Object -ComObject Outlook.Application;
$Mail = $Outlook.CreateItem(0);
$Mail.Display();
$Mail.To = '"& $宛先 &"';
$Mail.Cc = '"& $Cc &"';
$Mail.Subject = '"& $件名 &"';
$Mail.Body = '"& $本文 &"';
$Attachment=New-Object Net.Mail.Attachment('" & $$ファイル名 & "')
$Mail.Attachments.Add($Attachment)
add-type -AssemblyName microsoft.VisualBasic;
add-type -AssemblyName System.Windows.Forms;
    $ps = Get-Process | Where-Object {$_.Name -eq 'OUTLOOK'};
    foreach($process in $ps){
        if($process.MainWindowTitle -ne '') {
            if($process.MainWindowTitle -match 'メッセージ') {
            [Microsoft.VisualBasic.Interaction]::AppActivate($process.ID);
            }
        }
    }
\""

outlookが立ち上がり、宛先、CC、件名、本文は問題ないのですが、添付ファイルが添付されません。
デスクトップへのpdf保存はできております。何か記述でおかしい箇所があればご教示頂ければと思います。
※スクリプトA、スクリプトBに分けているのは大きな意味はありません。長文にすると分かりにくくなるので分割しただけです。

Last edited by nori (2018-01-13 14:59:15)

qb_dp

Member

Re: Powershellを使ったメールにファイルが添付されない

ファイルパスは、Windowsに合わせる必要があるので以下のようにして先頭の / を取り除きます。

変数を設定 [$FilePath_Win; 値:Replace ( $$ファイル名 ; 1 ; 1 ; "" )]

以下の行は、不要です。
$Attachment=New-Object Net.Mail.Attachment('" & $$ファイル名 & "')

以下で添付ファイルを追加するようにします。
$Mail.Attachments.Add('" & $FilePath_Win & "')

あと以下の行末に ; (セミコロン)が必要です。
$Mail.Attachments.Add('" & $FilePath_Win & "')
↓
$Mail.Attachments.Add('" & $FilePath_Win & "');

nori

Member

Re: Powershellを使ったメールにファイルが添付されない

qb_dp様
返信が遅くなり申し訳ありませんでした。
教えて頂いた内容で問題なくファイルを添付する事ができました。
ありがとうございます！