alias filesize2 {
if !$isfile($1) { return }
var %a = fso $+ $ticks, %b = fsize $+ %a
.comopen %a Scripting.FileSystemObject
if $comerr { return }
if $com(%a,GetFile,1,bstr*,$1,dispatch* %b) && $com(%b) {
.comclose %a $com(%b,Size,2)
%a = $com(%b).result
.comclose %b
return $gettok(%a,1,46)
}
.comclose %a
}