批处理之家 - Powered by Discuz! Board

标题: [问题求助] [已解决]运行vbs的时候提示没有权限(win7) [打印本页]

作者: winsfly 时间: 2024-1-19 11:18 标题: [已解决]运行vbs的时候提示没有权限(win7)

本帖最后由 winsfly 于 2024-3-5 19:54 编辑

Set objFolderItem = objFolder.Self 
objPath = objFolderItem.Path 
s = MsgBox("使用财神地图请点击确定，不使用财神地图点击取消", vbOKCancel)
If s = 1 Then set a=createobject("scripting.filesystemobject"):a.copyfolder "*.*",objPath
复制代码

这个代码之前还可以运行，今天突然就提示没有权限了

作者: jyswjjgdwtdtj 时间: 2024-1-19 13:47

哪行报错？是不是objpath是什么系统文档？

欢迎光临批处理之家 (http://www.bathome.net/)