|
こんなマクロを使うと一発でサイズが出ますけど、どうでしょ?
loaddll "tkinfo.dll";
#c = dllfunc("CountCurrentHeader", "X-Attach" );
if( #c == 0 ) {
message "添付ファイルはありません。";
endmacro;
}
#i = 0;
while( #i < #c ) {
$attach = dllfuncstr("CurrentHeader2", "X-Attach", #i );
$path = dllfuncstr("HomeDir") + dllfuncstr("CurrentAccount")
+ "\\" + $attach;
#size = dllfunc("Bypass_GetFileSize", $path );
$base = midstr( $attach, 9, 999 );
$base = midstr( $attach, strstr($base,"\\") + 1, 999 );
$mes = $mes + $base + " = " + str(#size) + "\r\n";
#i = #i + 1;
}
message $mes;
|
|