Hi Karen,
To copy a folder and all its contents (including sub-folders) you can just do this:
loFSO = CreateObject('Scripting.FileSystemObject')
loFolder = loFSO.GetFolder('c:\temp\myTest')
loFolder.Copy('c:\temp\myCopiedTest')
If you really need to copy them in reverse order (not sure I understand the reason) then you could loop for each folder with adir as Borislav showed.
"The five senses obstruct or deform the apprehension of reality."
Jorge L. Borges?
"Premature optimization is the root of all evil in programming."
Donald Knuth, repeating C. A. R. Hoare
"To die for a religion is easier than to live it absolutely"
Jorge L. Borges