VB复制整个磁盘下的文件，包括子文件夹，不要调用CMD命令。

首先不明白这么做的意图，要复制整盘内容并不是像你说的那么简单，如系统盘有些内容是在系统运行时不能被复制的，你这样操作肯定会中断。非系统盘是可行的，但要复制出来又得考虑很多问题，是打包还是不打包，是保持格式相同还是压缩……
建议你用ghost命令来操作，用VB来实现不是不可以，不给点分肯定没谁会写大堆代码出来，嘿嘿……

Set FSO=Server.CreateObject("Scripting.FileSystemObject")
FSO.CopyFolder "xxx", "xxx"

如果使用 FileSystemObject 有问题,可以参考下列介绍
http://baike.baidu.com/view/347454.htm

filecopy

Private Sub Command1_Click()
FileCopy "D:\普通软件\源文件\kugoo.exe", "E:\电影\kugoo.exe"
End Sub