To:とBCCの組み合わせで警告出したいNo.06360
cuma さん 03/02/20 07:00
 
こんにちは毎度お世話になってます。
こんな事可能でしょうか?

To:Aさん
へのメールを出す場合に、間違えてBCC:が設定されていたら警告する。


実は私は業務メールの割合が高く、BCCには仕事上のパートナーの
アドレスを設定している事が多いのです。

時々、非常に個人的なメールを出す場合も、うっかりと癖でBCCを
クリックして履歴からパートナーのアドレスを追加した(らしい)
事があります。
大失敗ででした。あるいは返信や新規のテンプレート選択をミス
したのかもしれません。

そこで、To:がある特定の相手(プライベート相手)の場合には
BCCが設定されていたら警告を出すと言う事は可能でしょうか?
マクロでOKなのですが。
警告タイミングとしては後から送信ボタンを押した時とか、
即送信ボタンを押した時でも良いのですが。

[ ]
RE:06360 To:とBCCの組み合わせで警告出しNo.06363
秀まるお さん 03/02/20 10:26
 
>そこで、To:がある特定の相手(プライベート相手)の場合には
>BCCが設定されていたら警告を出すと言う事は可能でしょうか?
>マクロでOKなのですが。

 「マクロでOKなのですが」とあるとおり、マクロで実現可能です。なので、マ
クロでやってほしいです。少なくとも鶴亀メール標準でそのような警告機能を付
けるつもりはありません。

 以下のマクロは速攻で作った物でして、まったく実行テストしてません。一応
参考程度に「こんな感じのマクロで出来るはず」ということで見てください。

----------------------------------------------
    // $WarnListに警告するメールアドレスをスラッシュ区切りで入れる。
    // 文字列の先頭と最後にもスラッシュ記号を入れる!
    $WarnList = "/xxx@aa.com/xxx@bbb.com/xxx@cc.com/" +
                "/xxx@ddd.com/xxx@ccc.com/";

    loaddll "tkinfo.dll";
    #x = 0;
    #xMax = dllfunc("CountCurrentHeader", "To");
    while( #x < #xMax ) {
        $s = dllfuncstr("CurrentHeader2", "To", #i);
        #y = 0;
        #yMax = dllfunc("CountEmailList", $s);
        while( #y < #yMax ) {
            $email = dllfuncstr("GetEmailList", $s, #y);
            $email = dllfuncstr("SetEmailOnly", $email);
            $email = dllfuncstr("ToLower", $email );
            if( strstr( $WarnList, "/" + $email + "/" ) >= 0 ) {
                ErrorMessage( "Bcc警告!!!" );
                #n = dllfunc("SetCancel", 1);
                endmacro;
            }
            #y = #y + 1;
        }
        #x = #x + 1;
    }

[ ]
RE:06363 To:とBCCの組み合わせで警告出しNo.06364
cuma さん 03/02/20 13:50
 
cumaです。
秀まるお様 早速のアドバイスありがとうございます。

>参考程度に「こんな感じのマクロで出来るはず」ということで見てくださ
>い。

参考ありがとうございます。
ここから先は自分でだとは思うのですが、本当は
どなたかHELP下さい。

 ErrorMessage( "Bcc警告!!!" );
 
 の行で「文法エラー」が出るのですが修正が出来ないのです。

[ ]
RE:06364 To:とBCCの組み合わせで警告出しNo.06365
秀まるお さん 03/02/20 14:01
 
> ErrorMessage( "Bcc警告!!!" );
>
> の行で「文法エラー」が出るのですが修正が出来ないのです。

 なぜか僕の頭がC言語モードになってました。

    message "Bcc警告!!!";

 に直せばいいんじゃないかと思います。

[ ]
RE:06364 To:とBCCの組み合わせで警告出しNo.06366
秀まるお さん 03/02/20 14:05
 
 そもそも話が「Bcc:を使ってる時」だったので、もう1つ処理が足りませんで
した。

    if( dllfuncstr("CurrentHeader","Bcc") == "" ) {
        endmacro;
    }

 を、loaddll "tkinfo.dll"の後ろ辺りに入れておかないとダメです。あるいは
自動的にBcc:ヘッダを削除するような処理を入れることも出来ますけど。

[ ]
RE:06366 To:とBCCの組み合わせで警告出しNo.06368
cuma さん 03/02/21 07:19
 
 cumaです。

秀まるお様、早速のアドバイスありがとうございます。
またこれでやってみます。
私の説明が不十分なためお手数をおかけしました。


> そもそも話が「Bcc:を使ってる時」だったので、もう1つ処理が足りま
>せんで
>した。
>
>    if( dllfuncstr("CurrentHeader","Bcc") == "" ) {
>        endmacro;
>    }
>
> を、loaddll "tkinfo.dll"の後ろ辺りに入れておかないとダメです。あ
>るいは
>自動的にBcc:ヘッダを削除するような処理を入れることも出来ますけど。

[ ]