maybe you can give kixtart's imbedded dir() and copy command a try ...

code:

---

break on

$sourcedir = "m:\dir1"
$targetdir = "m:\dir2"
$newext = ".new"

$sourcefile = dir("$sourcedir\*.*")

while @error = 0

 if $sourcefile

  if (getfileattr("$sourcedir\$sourcefile") & 16) = 0

   copy "$sourcedir\$sourcefile" "$targetdir\$sourcefile$newext"

  endif

 endif

 $sourcefile = dir()

loop

exit

---

-Shawn

[This message has been edited by Shawn (edited 07 June 2001).]