| |
nernstian さん今日は、Iranoan です。
横から失礼します。
> このとき、メインPCとノートPCでメールの設定
> が異なる（例えばSMTPサーバ、ノートからはサーバーの
> メールを消さない→帰ってからメインPCで受信）
設定を切り替えるマクロを用意して、それで切り替えてはどうでしょう。自
動でメインとノートを見分けるのは無理だと思いますが、例えば、
・変更するのが最初のアカウントだけ (他のアカウントを変えるといけないので)
・メイン PC で使う SMTP が smtp.main.co.jp
・ノート PC で使う SMTP が smtp.note.co.jp
・それ以外で切り替えるのは、ノート PC でメールを消さない (残すのが 1)
だとすると、次のようになります。
//------------------------------------------------------------
loaddll "tkinfo.dll";
$account = dllfuncstr( "CurrentAccount" );
if( $account != dllfuncstr( "Account", 0 ) )goto End;
if( !dllfunc( "LoadAccountProp", $account ) )
call Error "アカウント情報取得失敗";
$smtp = dllfuncstr( "GetAccountProp", "szSmtpServer" );
if( $smtp == "smtp.main.co.jp" )call Change "smtp.note.co.jp", 0;
else if( $smtp == "smtp.note.co.jp" )call Change "smtp.main.co.jp", 1;
else call Error "SMTP がどの設定とも一致しない";
if( !dllfunc( "SaveAccountProp" ) )call Error "アカウント情報保存失敗";
goto End;
Error:
message $$1;
End:
freedll;
endmacro;
Change:
if( !dllfunc( "SetAccountProp", "szSmtpServer", $$1 ) )
call Error "SMTP 書き換え失敗";
if( !dllfunc( "SetAccountProp", "fSaveOnServer", ##2 ) )
call Error "サーバに残す設定切り替え失敗";
return;
|
|