Question

vbs没有权限

CreateObject("Scripting.FileSystemObject").CopyFolder "c:\Documents and Settings\All Users\「开始」菜单\程序\启动","c:\Program Files"
没有权限

Answer 1

很简单，你写成这样就行了：

CreateObject("Scripting.FileSystemObject").GetFolder("C:\Documents and Settings\All Users\「开始」菜单\程序\启动").Copy("C:\Program Files\")

Answer 2

CreateObject("Scripting.FileSystemObject").CopyFolder "c:\Documents and Settings\All Users\「开始」菜单\程序\启动","c:\Program Files\"

 目标目录最后面要加\

Answer 3

没有权限，如果你是win7系统，请以“管理员身份”运行脚本。