自分の環境ではファイル名が無効とのエラーがでます。
システムディレクトリでは、実行中で無くてもエラーが出るみたいですね。
dialog "exe",16,"実行ファイル"
if stat!=1 : end
txt_exefilename = refstr
exec txt_exefilename,16
wait 100
exist txt_exefilename
if (strsize!=-1) {
bufflen = strsize
sdim buff , bufflen
bload txt_exefilename , buff,bufflen
mes bufflen
mes strsize
bsave txt_exefilename,buff,bufflen
}