smtpNo.05527
1hara さん 02/06/25 03:29
 
私は1つのラップトップPCを会社と家でそれぞれ異なったネットワークを使ってネ
ットにアクセスしています。その為にメールを送信するときのSMTPが異なります。
要望は1つのメールアカウントで複数のSMTPを設定できるようにして、一つを既
存に他を必要なときに選択出来るようにして頂ければ助かります。これはラップトッ
プ利用者で出先でネットにアクセスが必要な人には重宝すると思います。

私は昨日アウトルックから鶴亀に乗り換えたばかりなので、鶴亀の全ての機能を熟知
せずにお願いしております。もし、既にこのような機能があるなら、ご勘弁。

[ ]
RE:05527 smtpNo.05528
三月 さん 02/06/25 06:50
 
>私は1つのラップトップPCを会社と家でそれぞれ異なったネットワークを使って
>ネットにアクセスしています。その為にメールを送信するときのSMTPが異なり
>ます。要望は1つのメールアカウントで複数のSMTPを設定できるようにして、
>一つを既存に他を必要なときに選択出来るようにして頂ければ助かります。これは
>ラップトップ利用者で出先でネットにアクセスが必要な人には重宝すると思います。
>
逆にアカウントを2つにして、2つめは送信専用にして、
メールの作成時にFrom:からアカウントの変更をすればよいのでは?
受信が不要なら、全般的な設定の送受信と定期的な受信からチェックをはずせば良い
し。

送信済みメールは手動で元アカウントに移動しないといけないかもしれませんが。

[ ]
RE:05528 smtpNo.05529
1hara さん 02/06/25 09:20
 
>>私は1つのラップトップPCを会社と家でそれぞれ異なったネットワークを使って
>ネットにアクセスしています。その為にメールを送信するときのSMTPが異なり
>ます。要望は1つのメールアカウントで複数のSMTPを設定できるようにして、
>一つを既存に他を必要なときに選択出来るようにして頂ければ助かります。これは
>ラップトップ利用者で出先でネットにアクセスが必要な人には重宝すると思います。
>>
>逆にアカウントを2つにして、2つめは送信専用にして、
>メールの作成時にFrom:からアカウントの変更をすればよいのでは?
>受信が不要なら、全般的な設定の送受信と定期的な受信からチェックをはずせば良
>いし。
>
>送信済みメールは手動で元アカウントに移動しないといけないかもしれませんが。

最初から書いておけばよかったのですが、設定の異なるアカウントを複数持てば解決
することはわかっております。しかし、私はSMTPを変更できたほうがスマートだと考
えます。

[ ]
RE:05527 smtpNo.05530
stone さん 02/06/25 09:42
 
Kiyoです。

同じように会社と自宅でサーバー名を変えて使っていますが、私は
マクロで処理しています。置き換えだけでしたら、以下のマクロで
どうでしょうか? 3つ以上アカウントがある場合は、会社、自宅の
双方の設定で「自分の第2のアカウント名」をコピーして増やしていき
ます。

私は、ネットワークの設定も変更するため、ネットワーク設定
書き換えユーティリティ「Netswitcher」との併用でもう少し違った
方法をとっていますけど。

ちなみに、このマクロは以前このMLでアドバイスをいただいて作成
したものです。


         loaddll "tkinfo.dll";
         if( !result ) {
         message "DLLロードに失敗";
         endmacro;
         }

         if( dllfunc( "IsTransmitting" ) ) {
         message "送受信中です。";
         endmacro;
         }
         
         //会社での設定
         #n = dllfunc("LoadAccountProp", "自分のアカウント名" );
         $srvnm = dllfuncstr("GetAccountProp", "szSmtpServer");
         if($srvnm == "自宅のサーバー名"){
         #n = dllfunc("SetAccountProp", "szSmtpServer", "会社のサーバー名" );
         #n = dllfunc("SaveAccountProp");

         #n = dllfunc("LoadAccountProp", "自分の第2のアカウント名" );
         #n = dllfunc("SetAccountProp", "szSmtpServer", "会社のサーバー名" );
         #n = dllfunc("SaveAccountProp");
         
         message "サーバー名を「会社の設定」に書き換えました。";
         title "鶴亀メール(会社の設定)";
         title -1;
         endmacro;
         }
         
         //自宅の設定
         else{
         #n = dllfunc("SetAccountProp", "szSmtpServer", "自宅のサーバー名" );
         #n = dllfunc("SaveAccountProp");
         
         #n = dllfunc("LoadAccountProp", "自分の第2のアカウント名" );
         #n = dllfunc("SetAccountProp", "szSmtpServer", "自宅のサーバー名" );
         #n = dllfunc("SaveAccountProp");
         
         message "サーバー名を「自宅の設定」に書き換えました。";
         title "鶴亀メール(自宅の設定)";
         title -1;
         endmacro;
         }
         

[ ]
RE:05529 smtpNo.05531
秀まるお さん 02/06/25 09:45
 
 SMTPサーバーの変更はマクロを使えば出来ます。

 必要に応じて切り換えるということなら、例えばSmtpSwitch.macのような名前で以
下のような感じのマクロを作り、それを必要に応じて手動実行すればいいと思います。

---------------------例-----------------------------------
    loaddll "tkinfo.dll";
    menu "SMTPサーバーA", "SMTPサーバーB";
    #m = result;
    if( #m == 0 ) endmacro;
    if( #m == 1 ) {
        $SmtpServer = "SMTP_SERVER_A";
    } else {
        $SmtpServer = "SMTP_SERVER_B";
    }
    #n = dllfunc("LoadAccountProp", "アカウント");
    #n = dllfunc("SetAccountProp", "szSmtpServer", $SmtpServer);
    #n = dllfunc("SaveAccountProp");
----------------------------------------------------------

 詳しくは、「ヘルプ・鶴亀マクロヘルプ」のLoadAccountPropその他の関数を参照
ください。

[ ]
RE:05531 smtpNo.05532
1hara さん 02/06/25 11:08
 
kiyoさん、秀さん

ありがとうございました。
感謝

やっぱり鶴亀に替えて大正解。


[ ]
RE:05532 smtpNo.05533
stone さん 02/06/25 11:25
 
Kiyoです。

ひとつ言い忘れていました。
私のマクロで、鶴亀本体に自宅もしくは会社の設定を表示するように
なっていますが、以下のマクロを自動起動->受信が一段落したときに
登録しておかないと、メールを送受信したときに表示が消えてしまいます。



         loaddll "tkinfo.dll";
         if( !result ) {
         message "DLLロードに失敗";
         endmacro;
         }
         
         #n = dllfunc("LoadAccountProp", "アカウント名" );
         $srvnm = dllfuncstr("GetAccountProp", "szPop3Server");
         
         if($srvnm == "自宅サーバー名"){
         title "鶴亀メール(自宅の設定)";
         title -1;
         endmacro;
         }
         
         else{
         title "鶴亀メール(会社の設定)";
         title -1;
         endmacro;
         }

[ ]