|
コマンドライン
TuruKame.exe /XGETML.MAC
で実行する以下のようなマクロを書いたのですが、
NewMailでひらいたウインドウが閉じられません。
SendNowした後に閉じるにはどこをどうすればよいでしょう?
-----
loaddll "TKInfo.dll";
openreg "CURRENTUSER", "Software\\Hidemacro\\samba";
#n =getregnum("last");
#e =getregnum("end");
#m = #n + 10;
if( #m > #e ){
#m = #e;
}
if( #n < #m ){
#x = dllfunc( "NewMail" );
#h = hidemaruhandle(0);
#x = dllfunc( "SetEditorAccount2", "accountx", 0);
$sub = "get " + str(#n+1) + " - " + str(#m) ;
$s = dllfuncstr( "SetHeader", "Subject", $sub );
$s = dllfuncstr( "SetHeader", "To", "xxxxxxxxxxxx@samba.gr.jp" );
gofiletop;
#sndflg = 0;
while( #n < #m ){
#n = #n+1;
insert "get " + str(#n) + "\n";
}
writeregnum "last",#n;
#x = dllfunc("SendNow");
closehidemaruforced (#h);
}
closereg;
endmacro;
-----
|
|