Code: Select all
Set($cf,<curfolder>);
Set($cp,<curpath>);
Set($nn,<date yyyymmddhhnnss>);
OpenWith("""C:\program files\winrar\winrar.exe"" e -- *.rar * $nn-temp", "s");
Msg("Press OK when WinRAR is finished.",1);
GoTo("<curpath_s>\$nn-temp")
Sel(a);
Rename(bat,$cf);
Focus(L);
MoveTo("..\..");
#523;
#523;
Rename(bat,$nn,,"$cp");
SelFilter($nn, d, Name);
Focus(L);
#170;
XYplorer Beta Club
