（発言者削除） - 秀丸メール情報交換会議室 - スレッド26299, 2006/02/08

（発言者削除）

tsuki さん　06/02/08 04:18

RE:26299 携帯にメール

秀まるお2 さん　06/02/08 09:22

　マクロとしてはこんな風になります。

loaddll "tkinfo.dll";
$s = dllfuncstr("CurrentHeader", "To");
$s = dllfuncstr("SetEmailOnly", $s);
#n = strstr( $s, "@" );
if( #n < 0 ) endmacro;
$s = midstr( $s, #n, 999 );
if( $s == "@docomo.ne.jp"
|| $s == "@vodaphone.ne.jp"
|| $s == "@ezweb.ne.jp" ) {
#n = dllfunc("SetHeader", "X-TuruKame-KeitaiSend:", "1");
}

　これを「あとで送信/今すぐ送信時」の自動起動用に登録しておけばいいんじ
ゃないかと思います。

RE:26303 携帯にメール

tsuki さん　06/02/09 05:04

tuki です。

>　マクロとしてはこんな風になります。

送信簿に

>X-TuruKame-KeitaiSend: 1

が入っていますが、どうも再度やってみますのに、このマクロうまく動作していない
事に気づきました。

やっぱりメールディターで↓をみながら入力するのが一番いい
のでしょうか？

誠にいい加減なレスをしてしまって申し訳ありません。

受けての携帯の OS にもよるのかもしれません。携帯の OS は linux,
Symbion, Tron の３つらしいです。

RE:26328 携帯にメール

tsuki さん　06/02/09 06:23

tuki です。

メーリングリスとの皆様：

Sleipnir で直接入力して、画面が幾つも開いてしまったもので、つい
うっかり入力ミスをしてしまいました。後で気づいて、沢山と削除しな
ていけなくなってしまいました。ご迷惑をお掛けして申し訳ありませ
んでした。

改めてお詫びもうしあげます。

今後とも宜しくお願いいたします。

RE:26328 携帯にメール

tsuki さん　06/02/09 20:09

tuki です。

>>　マクロとしてはこんな風になります。

秀丸マクロライブラリーに DelCRLF.mac がありました。
そこで

-----------------------
execmacro"keitai.mac";
execmacro"DelCRLF.mac";
execmacro"HMMCheckAdrs.mac";
-----------------------
とすると上手く動作しました。

(^-^)(^-^)

RE:26348 携帯にメール

tsuki さん　06/02/09 20:26

tuki です。

>秀丸マクロライブラリーに DelCRLF.mac がありました。

>-----------------------
>execmacro"keitai.mac";
>execmacro"DelCRLF.mac";
>execmacro"HMMCheckAdrs.mac";
>-----------------------
>とすると上手く動作しました。

どうも、

execmacro"DelCRLF.mac";
execmacro"HMMCheckAdrs.mac";

これだけでも良いようです、恐らく作られたマクロは携帯の Docomo、
au, Vodafone に送る時には DelCTLF.mac が動くようにするマクロ
だと思うのですが、これ以上は私には無理です。

何方かお助けを！！

RE:26349 携帯にメール

tsuki さん　06/02/09 20:47

tuki です。

どうも以下で良いような・・

----------------------------
loaddll "tkinfo.dll";
$s = dllfuncstr("CurrentHeader", "To");
$s = dllfuncstr("SetEmailOnly", $s);
#n = strstr( $s, "@" );
if( #n < 0 ) endmacro;
$s = midstr( $s, #n, 999 );
if( $s == "@docomo.ne.jp"
|| $s == "@n.vodaphone.ne.jp"
|| $s == "@ezweb.ne.jp" ) {
#n = dllfunc("SetHeader", "X-TuruKame-KeitaiSend:", "1");
execmacro"DelCRLF.mac";
}
----------------------------

どうでしょうか？
うまく操作しているみたいですが？

RE:26350 携帯にメール

tsuki さん　06/02/15 18:47

tuki です。

> || $s == "@n.vodaphone.ne.jp"

|| $s == "@k.vodafone.ne.jp"

でした。

n → k

のミステイクがありましたので、報告しておきます。

では。

RE:26433 携帯にメール

こいん さん　06/02/15 20:15

>> || $s == "@n.vodaphone.ne.jp"
>
> || $s == "@k.vodafone.ne.jp"
>
>でした。
>
>n → k
>
>のミステイクがありましたので、報告しておきます。

「ph」→「f」のミステイクのほうが重要だと思いますが。

それと「@n.」「@k.」は両方必要ですし、もっと追加しなくてはいけません。
「n」とか「k」とかは契約地域（全部で9種類）をあらわします。
http://www.vodafone.jp/japanese/release/2003/030715.pdf

該当箇所は以下のようにすべきでしょう。

if( $s == "@docomo.ne.jp"
|| $s == "@d.vodafone.ne.jp"
|| $s == "@h.vodafone.ne.jp"
|| $s == "@t.vodafone.ne.jp"
|| $s == "@c.vodafone.ne.jp"
|| $s == "@k.vodafone.ne.jp"
|| $s == "@r.vodafone.ne.jp"
|| $s == "@n.vodafone.ne.jp"
|| $s == "@s.vodafone.ne.jp"
|| $s == "@q.vodafone.ne.jp"
|| $s == "@ezweb.ne.jp" ) {

RE:26437 携帯にメール

tsuki さん　06/02/15 22:56

tsuki です。

>>のミステイクがありましたので、報告しておきます。
>
>「ph」→「f」のミステイクのほうが重要だと思いますが。
>
>それと「@n.」「@k.」は両方必要ですし、もっと追加しなくてはいけません。

あれれ、そうでしたか。これはありがたいです。

vodaphone → vodafone

ですよね、どうも vodafone が上手く動作しないものですからおかしい
と思っていたところです。

どうも、どうもです。早速修正しましたぁ。

RE:26437 携帯にメール

tsuki さん　06/02/16 05:45

tsuki です、

正規表現を使って vodafone のところは

> || $s == "@[a-z].vodafone.ne.jp"

では駄目でしょうか。

もしかしてミスかも(-^-)

まあ、どちらでも良いでしょうが。