タイトルのみ転送No.08232
hMokichi さん 21/06/09 11:04
 
仕事用のPCで自動受信したメールをスマホへ転送したいのですが、その際、転送する
のはタイトルとFrom:のみとしたいです。何か方法は有りませんでしょうか?

[ ]
RE:08232 タイトルのみ転送No.08233
秀まるお2 さん 21/06/09 15:37
 
 手作業で転送するのであれば、転送用のテンプレートをいじって本文をカラにして
しまうことは可能です。

 テンプレートの例としては、例えば標準の転送用のテンプレートは


-----------------------転送元のメール-----------------------
$(SmallRootHeader)$-

$(RootBody)

 みたいになってますが、例えばこれを、

From:    $(RootHeader,From )
Subject: $(RootHeader,Subject)

 みたいな2行だけにして、さらには転送先も固定(携帯電話固定)なら、

From:    $(RootHeader,From )
Subject: $(RootHeader,Subject)
$(NoWarningHeaderUpdate)$-
$(SetHeader,"To", "xxxxxx@xxxx.xx")$-

 みたいにしてしまうと宛先も入れた形で転送が出来ます。

 そういう作戦がお勧めかと思います。

 パソコンの電源を入れっぱなしにした上で、秀丸メールも起動しっぱなしで定期受
信をさせて、とにかく届いたメールを全部携帯電話に転送したいってことになると、
それは別途マクロを使ってなんとかする必要があります。必要ならその例を作ること
は出来ます。

[ ]
RE:08233 タイトルのみ転送No.08234
hMokichi さん 21/06/09 15:52
 
秀まるお2さん
回答有難うございました。
定期受信した全メールの転送をしたいので、マクロのサンプルを例示して頂けません
か?よろしくお願いします。

[ ]
RE:08234 タイトルのみ転送No.08236
秀まるお2 さん 21/06/09 18:48
 
 サンプルマクロを掲載します。

 1行目の「$account = "..."」の所には実際のご自身のアカウント名を指定します。
 2行目の「$keitai_email = "..."の所に転送したい先のメールアドレスを指定し
ます。

 そして、アカウント毎設定で、転送用のテンプレートに、例えば

From:    $(RootHeader,From)
Subject: $(RootHeader,Subject)
$(SetHeader,Subject,$(RootHeader,Subject))$-

 みたいにしたらいいかと思います。

 マクロの名前を例えば「自動転送.mac」のようにして、「マクロ・マクロ登
録...」の「自動起動」ページの中の「受信が一段落した時」の所に、そのマクロを
登録すればいいです。

 あとは定期受信をONにした上で、さらに定期受信の動作を「送受信」にします。さ
らに、「全般的な設定・送受信・詳細」のページにある「送信と受信の順番」を「受
信してから送信」にすると、受信した直後に転送されて、なおいいかと思います。

 一応以下のマクロで大丈夫なはずですが、何かエラーが起きると止まってしまう恐
れはあります。

----------------------------------------------------------------------------
--------
    $account = "テストアカウント";      //転送したい対象のアカウントを指定す
る。
    $keitai_email = "xxxxxx@xxxx.xx";   //転送したい先のメールアドレス

    loaddll "tkinfo.dll";
    #newmailcount = dllfunc("GetFolderMailCount", $account, "受信", "hot");
    if( #newmailcount == 0 ) {
        endmacro;
    }
    #n = dllfunc("SetJapaneseCodePageMode", 1);
    $prevaccount = dllfuncstr("CurrentAccount");
    $prevfolder = dllfuncstr("CurrentFolder");
    while(1) {
        #n = dllfunc("SelectRecvMailInFolder", $account, "受信");
        if( #n == 0 ) {
            break;
        }
        #n = dllfunc("MakeForward");
        #n = dllfunc("SetCharSet", "utf-8");
        #n = dllfunc("SetHeader", "To", $keitai_email );
        #n = dllfunc("SendLater");
        #handle = hidemaruhandle(0);
        #n = dllfunc("SetMainWndTop");
        closehidemaruforced #handle;
    }

[ ]
RE:08236 タイトルのみ転送No.08239
hMokichi さん 21/06/10 09:22
 
サンプルマクロ有難うございました。
本日は出先の為、明日以降試して見ます。

有難うございました。

[ ]