複数のコピーした文字列から検索して一覧No.00134
kiwikazuya さん 07/07/28 00:54
 
中国在住のkiwikazuyaです。

コピーした文字列を検索文字列として
検索して一覧を作成するマクロを作りました。

これを、複数のコピーした文字列で or 条件で
検索して一覧を作成できるようにならないでしょうか?

作成したものはこれです。
loaddll "TKInfo.dll";

 beginclipboardread;
 $s = getclipboard;
 //$s = input( "検索対象文字列は?" );
 $s = dllfuncstr( "YenEncode", $s );
 #n = dllfunc( "SetFindPack", "(\"" + $s + "\", target=body)");
 #n = dllfunc("DoGrep", "Calender", "User\\calender");

クリップボードから配列に取り込んでするのかと
思いますが、なかなかうまくできません。
Message-IDを検索するものを作ってみました。
ご指導いただけないでしょうか。

$n = input( "Message-IDの個数は?");
#i = 0;
#i = val($n);
#i2 = #i;
    beginclipboardread;
$a[#i3] = getclipboard;
while( $a[#i3] != "" ) {
    #i = #i + 1;
    $a[#i3] = getclipboard;
}

 $s2 = "";
while( #i2 > 0 ) {
 #n = #i2;
 if( #n == 0 ){break;}
 $s2 = $s2 + "( \"SetFindPack\", (\"" + $a[#i3] + "\", target=person) , mess
ageidtarget=all\")";
 $s2 = dllfuncstr( "YenEncode", $s2 );
 #i2 = #i2 - 1;
 #i3 = #i3 - 1;
}

#n = dllfunc( $s2 );
#n = dllfunc("DoGrep", "Calendar", "受信");
endmacro;



[ ]