怎样移动文件夹？

folderspec = "c:\xxx"
    folderspec1 = "d"
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(folderspec)
    f.move "d:\"提示permission denied,不知哪里错了,求教.文件夹的属性也不是只读.