一定の文字列検索 - 秀丸メール情報交換会議室 - スレッド21557, 2005/02/02

一定の文字列検索

chipseti2 さん　05/02/02 12:43

＊鶴亀に関することですが、マクロに関する質問なので、マクロ板でしたほうがよい
ならご指摘ください。

毎日来るほぼ同内容のメールがあります。リンクが30個くらいあるメールでそのうち
ひとつのリンクを　目で探してクリックします。

そのリンクは後半文字列が毎日微妙に変わりますが前半は同じなのでその前半部分だ
けをメール内検索すれば目で探さなくともすむのですが、毎日の作業なので　この検
索作業をマクロ化してツールバー登録しておきたいのですが、ご指導ねがえませんで
しょうか？

1．メール内容枠に見えているメールの内の一定の文字列（永久に変わらない固定の
文字列）を探し出して

2．それをハイライトなどしてこちらにわかるようにしてくれる

ということです。

尚2の部分を以下に置き換えた方がより理想的です。これが可能であればこちらをご
指導ください。

2’その文字列を含むリンクをダブルクリックしてくれる

よろしくおねがいします。

RE:21557 一定の文字列検索

chipseti2 さん　05/02/02 12:57

補足

検索対象の文字列は　そのメール内に一箇所だけしかありません。

RE:21559 一定の文字列検索

秀まるお2 さん　05/02/02 14:21

　「全般的な設定・メール表示」の「強調表示...」にて、その問題の文字列を
強調表示しておくのがいいと思います。それで見つけやすくなると思います。

　マクロでやるとしたら、例えば"abc"という文字列を探すなら、

loaddll "tkinfo.dll";
#n = dllfunc("SetFindPack", "(\"abc\", target=body)" );
#n = dllfunc("FindDown");
if( #n != 0 ) {
searchdown "abc";
}

　みたいなマクロになると思います。

RE:21557 一定の文字列検索

山紫水明 さん　05/02/02 20:34

　chipseti2さん，こんばんは。

>2’その文字列を含むリンクをダブルクリックしてくれる

　秀まるおさんのマクロを少し変形してみました。試してみてください。

//-----------------------------------------------------------//
$url = "https://www.abc.com/"; //ここでリンク先を指定
loaddll "tkinfo.dll";
#n = dllfunc("SetFindPack", "(\"" + $url + "\", target=body)" );
#n = dllfunc("FindDownInclude");
if( #n != 0 ) {
moveto 0, 0;
searchdown $url + "[!-~]*", regular; //これで十分か？
if( result ) openbyshell;
} else message "ありません。";
endmacro;
//-----------------------------------------------------------//

このマクロの実行には，「秀丸エディタの動作環境」で「検索での表示」を「範
囲選択」にする必要があります。もし点滅表示にしてマクロを実行したいという
ことでしたら，少し追加が必要です。

　では，　(^^)/~
山紫水明（ユーザー）
SANSHISUIMEI

RE:21563 一定の文字列検索

chipseti2 さん　05/02/03 14:58

お返事ありがとうございました。

>　「全般的な設定・メール表示」の「強調表示...」にて、その問題の文字列を
>強調表示しておくのがいいと思います。それで見つけやすくなると思います。

URLの一部だと強調されないようですが、どこか設定の修正で強調されるようになり
ますか？試したところURLの一部ではない場合はきちんと強調されます。
>

補足　いつも目で探してクリックしているリンクは

http://cgi.ebay.com/ws/eBayISAPI.dll?ViewItem&item=71*****62&ssPageName=Aa88
8:B:EOAB:US:6

といった感じで、

http://cgi.ebay.com/ws/eBayISAPI.dll?ViewItem&item=　以下が毎日変わるので　
変わらないこの部分を検索対象にすればいいのだとおもいます。これ全部でなくとも
例えばcgi.ebay.comだけでもユニークなのでもんだいありません。

RE:21566 一定の文字列検索

chipseti2 さん　05/02/03 14:59

すみません、作っていただいたどの部分を差し替えるのか今一度教えてもらえません
か？色々試したけどだめなんです。

補足します。　いつも目で探してクリックしているリンクは

http://cgi.ebay.com/ws/eBayISAPI.dll?ViewItem&item=71*****62&ssPageName=Aa88
8:B:EOAB:US:6

といった感じで、

http://cgi.ebay.com/ws/eBayISAPI.dll?ViewItem&item=　以下が毎日変わるので　
変わらないこの部分を検索対象にすればいいのだとおもいます。これ全部でなくとも
例えばcgi.ebay.comだけでもユニークなのでもんだいありません。

RE:21576 一定の文字列検索

秀まるお2 さん　05/02/03 15:10

　強調1～4および行の強調1,2だと、URLの色つけよりも優先順位が低いので、う
まく色が付かないようです。「特に強調1」か「特に強調2」にすれば色が付くよ
うです。

RE:21576 一定の文字列検索

chipseti2 さん　05/02/03 15:18

補足

同じ強調設定した文字列でもebayからのメールでは強調されずその他のメールでは強
調されています。どこか設定が悪いですか？

RE:21581 一定の文字列検索

秀まるお2 さん　05/02/03 15:48

　もしかしてe-bayからのメールの文字コードが、いわゆる欧文文字コードって
ことですかね。だとしても、鶴亀メールのバージョンが最新（V4.07）なら大丈
夫なはずですけど…。

　例えば"a"とかのありふれた文字列を強調表示したとしても、それはやはりe-
bayからのメールに限って強調表示されないんですかね？。

　はて？

RE:21577 一定の文字列検索

山紫水明 さん　05/02/03 17:42

　chipseti2さん，こんにちは。

>すみません、作っていただいたどの部分を差し替えるのか今一度教えてもらえ
>ませんか？色々試したけどだめなんです。

　URL の中に「*」という記号が並んでいますね。残念ながら先に提示しました
マクロではだめです。
　ところで，これらの URL はどういう状態で入っているのでしょうか。独立し
た１行ですとまだしも可能性がありますが，前後に他の文字があるとちょっとや
っかいです。

　では，　(^^)/~
山紫水明（ユーザー）
SANSHISUIMEI

RE:21587 一定の文字列検索

山紫水明 さん　05/02/03 17:58

追伸です。以下のマクロで試してみてください。

//-----------------------------------------------------------//
$url = "http://cgi.ebay.com/ws/eBayISAPI.dll?ViewItem&item=";
loaddll "tkinfo.dll";
#n = dllfunc("SetFindPack", "(\"" + $url + "\", target=body)" );
#n = dllfunc("FindDownInclude");
if( #n != 0 ) {
moveto 0, 0;
searchdown $url;
if( result ) {
escape;
while( code > '!' && code <= '~' ) right;
openbyshell;
escape;
}
} else message "ありません。";
endmacro;
//-----------------------------------------------------------//

　では，　(^^)/~
山紫水明（ユーザー）
SANSHISUIMEI

RE:21579 一定の文字列検索

chipseti2 さん　05/02/04 13:33

うまくいきました。ありがとうございました。

RE:21588 一定の文字列検索

chipseti2 さん　05/02/04 13:38

ありがとうございました。試してみましたがうまくいきません。

マクロ実行すると　メール内容枠がピクッと動いてこの文字列部分がメール内容枠の
下部に表示されることからマクロがはたらいたのは確かなのですが、ブラウザが開き
ません。

当方標準のブラウザは"E:\Sleipnir 2\Sleipnir.exe"　です。この文字列を含むURL
をクリックするとちゃんと立ち上がります。よろしくおねがいします。

鶴亀バージョンですか4.07です。

RE:21594 一定の文字列検索

chipseti2 さん　05/02/04 13:40

尚、上記のように強調には成功したので　十分便利になりましたので現在はとくにこ
まっておりません。お時間の許す範囲でいつでもご指導ください。

RE:21595 一定の文字列検索

秀まるお2 さん　05/02/04 14:09

　たぶん、文字カーソル表示がOFFなために動作してないだけな気がしますけど。

//-----------------------------------------------------------//
$url = "http://cgi.ebay.com/ws/eBayISAPI.dll?ViewItem&item=";
loaddll "tkinfo.dll";
#n = dllfunc("SetFindPack", "(\"" + $url + "\", target=body)" );
#n = dllfunc("FindDownInclude");
if( #n != 0 ) {
#brmode = browsemode;
if( #brmode ) {
browsemodeswitch;
}
moveto 0, 0;
searchdown $url;
if( result ) {
escape;
while( code > '!' && code <= '~' ) right;
openbyshell;
escape;
}
if( #brmode ) {
browsemodeswitch;
}
} else message "ありません。";
endmacro;
//-----------------------------------------------------------//

RE:21596 一定の文字列検索

山紫水明 さん　05/02/04 20:46

　更に肝腎な１行が落ちていました。これで試してください。

//-----------------------------------------------------------//
$url = "http://cgi.ebay.com/ws/eBayISAPI.dll?ViewItem&item=";
loaddll "tkinfo.dll";
#n = dllfunc("SetFindPack", "(\"" + $url + "\", target=body)" );
#n = dllfunc("FindDownInclude");
if( #n != 0 ) {
#brmode = browsemode;
if( #brmode ) {
browsemodeswitch;
}
moveto 0, 0;
searchdown $url;
if( result ) {
escape;
beginsel;//これを追加
while( code >= '!' && code <= '~' ) right;
openbyshell;
escape;
}
if( #brmode ) {
browsemodeswitch;
}
} else message "ありません。";
endmacro;
//-----------------------------------------------------------//

　では，　(^^)/~
山紫水明（ユーザー）
SANSHISUIMEI