The script below is designed to mimic the way /rmdir behaves but will delete the folder and its contents:

Code:
rmdirex {
  if ($len($1-) == 0) {
    echo 2 -e * /rmdirex: insufficient parameters
    return
  }

  var %dir = $mircdir $+ $1-
  if (!$isdir(%dir)) return

  window -sh @rmdirex
  aline @rmdirex %dir
  noop $findfile(%dir, *.*, 0, aline @rmdirex $1-)
  noop $finddir(%dir, *.*, 0, aline @rmdirex $1-)

  var %n = $line(@rmdirex, 0)
  while (%n > 0) {
    var %fn = $line(@rmdirex, %n)
    if ($isdir(%fn)) .rmdir %fn
    else .remove -b %fn
    dec %n
  }

  window -c @rmdirex
  return

  :error
  reseterror
  window -c @rmdirex
  echo 2 -e * /rmdirex: unable to remove ' $+ %dir $+ '
}

By using /window -s to sort the list, files and folders are listed after their containing folders, so all the script needs to do is go backwards through the list. Note that it uses /remove -b to move deleted files to the recycle bin.