| |
文さん今日は、ひろです。
> Becky!のmbxファイルを操作するマクロを作成したのですが、大きめ(2MBぐらい)のフ
> ァイルで、実行時に時々、表題にあるエラーが出ることがあり、困っています。同じ
これだけの長さの macro ですと、ちょっと初めから見ていくのは辛いですが、
> // Becky! の *.mbx に次の処理を行うマクロ。
確か Becky! の *.mdx file は行頭に「.」のみがある行によって、次の
mail と区別している text file でしたよね。もし *.mdx に複数の文字
code が混在していないならば、以下の macro で同じことが出来ると思いま
す。保存する前に「問い合わせをするか?」「処理時間の計算をするか?」等
は適当に付けてやってください。
//------------------ begin macro -------------------------------------------
---
main:
disabledraw;
replaceallfast "[ \\t]+$", "", regular;
call del_mail_end_ret;
call RemoveIndexFile;
saveexit;//保存して終了。macro は自動的に終わる。
del_mail_end_ret:
replaceallfast "^\\n\\.\\n","\\.\\n",regular;
while(result!=0)replaceallfast "^\\n\\.\\n","\\.\\n",regular;
return;
RemoveIndexFile:
call get_base_name filename2;
$$IdxFile=$$return+".idx";
runsync2"command.com /c del \""+$$IdxFile+"\"";
return;
get_base_name:
##extension=strstr($$1,".");
if(##extension==-1){
message "拡張子が見つかりません。";
endmacro;
}$$1=leftstr($$1,##extension);
while(1){
##extension=strstr($$1,".");
if(##extension==-1)break;
else $$1=leftstr($$1,##extension);
}return $$1;
//------------------ end macro ---------------------------------------------
-----
|
|