Copying Directories and files

I have an asp.net (VB) page that I am trying to copy subfolders and their
files into a new folder. I am using the asp.net code below, but it is not
working. It copies all files in each of the subdirectories but not the
folders that contain them. Can anyone tell me what I am missing? Thanks.

David

For Each foundDirectory As String In
My.Computer.FileSystem.GetDirectories(strListFolderPath,
FileIO.SearchOption.SearchAllSubDirectories, "*")
My.Computer.FileSystem.MoveDirectory(foundDirectory,
strCloseFolderPath, True)
Next