足球游戏_中国足彩网¥体育资讯$

vbs fso跨盘移动文件夹的怪问题
来源:易贤网 阅读:1226 次 日期:2016-07-21 14:00:55
温馨提示:易贤网小编为您整理了“vbs fso跨盘移动文件夹的怪问题”,方便广大网友查阅!

在实际应用中,发现了一个问题,vbs跨盘移动文件夹无权限,权限拒绝,但是copy就可以。可以采用变通的办法先复制再删除

跨盘移动文件夹的怪问题

Set objFSO = CreateObject("Scripting.FileSystemObject")

objFSO.MoveFolder "C:\Scripts" , "d:\2"

权限拒绝,但是copy就可以。可以采用变通的办法先复制再删除

===========================wmi==============================

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _

& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colFolders = objWMIService.ExecQuery _

("Select * from Win32_Directory where name = 'c:\\Scripts'")

For Each objFolder in colFolders

errResults = objFolder.Rename("d:\\VBScript")

Wscript.Echo errResults

Next

错误码13,估计是更名的时候不允许ren c:\1 d:\2这样的格式

========================Shell.Application可以成功====================

Const FOF_CREATEPROGRESSDLG = &H0&

TargetFolder = "c:\3"

Set objShell = CreateObject("Shell.Application")

Set objFolder = objShell.NameSpace(TargetFolder)

objFolder.MoveHere "d:\downloads", FOF_CREATEPROGRESSDLG

但是必须目标文件夹(像本例的是c:\3)存在才可以

中国足彩网信息请查看脚本栏目
易贤网手机网站地址:vbs fso跨盘移动文件夹的怪问题
由于各方面情况的不断调整与变化,易贤网提供的所有考试信息和咨询回复仅供参考,敬请考生以权威部门公布的正式信息和咨询为准!
关于我们 | 联系我们 | 人才招聘 | 网站声明 | 网站帮助 | 非正式的简要咨询 | 简要咨询须知 | 加入群交流 | 手机站点 | 投诉建议
工业和信息化部备案号:滇ICP备2023014141号-1 足球游戏_中国足彩网¥体育资讯$ 滇公网安备53010202001879号 人力资源服务许可证:(云)人服证字(2023)第0102001523号
云南网警备案专用图标
联系电话:0871-65317125(9:00—18:00) 获取招聘考试信息及咨询关注公众号:hfpxwx
咨询QQ:526150442(9:00—18:00)版权所有:易贤网
云南网警报警专用图标