中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-07 20:52
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [求助]挑出vbs错误 查看 618 回复 5
楼 主 [求助]挑出vbs错误 发表于 2008-03-25 17:11 ·  中国 黑龙江 大庆 联通
高级用户
★★
积分 547
发帖 261
注册 2006-04-15 16:50
20年会员
UID 53887
状态 离线
on error resume next
dim fs,dis,fold
set fs=wscript.createobject("scripting.filesystemobject")
'建立FSO模型
if (fs.folderexists("c:\temptest")) then
'如果该文件夹存在,该怎么做
dis="该文件夹存在"
else
dis="该文件夹bu存在"
set fold=fs.createfolder("c:\temptest")
'如果该文件夹存在,该怎么做
'fs.copyfolder "c:\temp" "c:\temptest",true
end if

set fold=fs.getfolder("c:\temptest")
fold.move "d:\temp"

set fold=fs.getfolder("c:\temp")
fold.copy "d:\Temp",true
'测试copy命令没好使

set fold=fs.getfolder("c:\temp")
fold.move "d:\Temp"
'测试move命令没好使

set fold=fs.getspecialfolder(2)
'getspecialfolder(值)可取0,1,2,分别代表windows目录,system32目录和临时目录
wscript.echo fold
wscript.echo err.number & err.description & err.source

为什么有错误提示?
2 发表于 2008-03-25 19:06 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
on Error Resume Next
Dim
fs,dis,fold
Set fs = wscript.CreateObject("Scripting.FileSystemObject")
'建立FSO模型
If (fs.folderexists("c:\temptest")) Then
'如果该文件夹存在,该怎么做
dis = "该文件夹存在"
Else
dis = "该文件夹bu存在"
Set fold = fs.createfolder("c:\temptest")
'如果该文件夹存在,该怎么做
'fs.copyfolder "c:\temp" "c:\temptest",true
End If

Set
fold = fs.getfolder("c:\temptest")
fold.move "d:\temp"

Set fold = fs.getfolder("c:\temp")
fold.copy "d:\Temp",True
'测试copy命令没好使

Set fold = fs.getfolder("c:\temp")
fold.move "d:\Temp"
'测试move命令没好使

Set fold = fs.getspecialfolder(2)
'getspecialfolder(值)可取0,1,2,分别代表windows目录,system32目录和临时目录
wscript.echo fold
wscript.echo Err.Number & Err.description & Err.source

你指什么错误?我运行有权限的提示,代码上的错误不算吧?
还有测试的话,不知道C和D的TEMP有无影响不?所以测试代码的话
尽量都新建。
3 发表于 2008-03-26 11:36 ·  中国 黑龙江 大庆 大庆中基石油通信建设有限公司
高级用户
★★
积分 547
发帖 261
注册 2006-04-15 16:50
20年会员
UID 53887
状态 离线
总提示权限问题!
4 发表于 2008-03-27 00:18 ·  中国 河北 保定 联通
银牌会员
★★★
积分 1,513
发帖 554
注册 2005-12-30 00:50
20年会员
UID 48180
性别 男
状态 离线
Originally posted by tempuser at 2008-3-26 11:36:
总提示权限问题!


应该属于正常现象。。。。。
如果把代码中的源路径和目标路径换成同一分区内的不同文件夹就不会提示权限问题了。
move的动作似乎只能在同一逻辑分区之内使用,Windows自己都是这样的,有没有发现windows下移动一个几个G的文件在同一分区内很快,而到不同的分区则很慢了,同理不同分区的move只能通过copy + createfolder 的方式解决,windows自己也如此。
5 发表于 2008-03-27 10:17 ·  中国 黑龙江 大庆 联通
高级用户
★★
积分 547
发帖 261
注册 2006-04-15 16:50
20年会员
UID 53887
状态 离线
Originally posted by baomaboy at 2008-3-27 00:18:


应该属于正常现象。。。。。
如果把代码中的源路径和目标路径换成同一分区内的不同文件夹就不会提示权限问题了。
move的动作似乎只能在同一 ...

你好,我是以管理员权限测试的,怎么会有权限提示的问题?

另外,经过测试,copy命令正常,而 move却提示上面的问题,为什么?
6 发表于 2008-03-27 15:33 ·  中国 河北 保定 联通
银牌会员
★★★
积分 1,513
发帖 554
注册 2005-12-30 00:50
20年会员
UID 48180
性别 男
状态 离线
Originally posted by tempuser at 2008-3-27 10:17:

你好,我是以管理员权限测试的,怎么会有权限提示的问题?

另外,经过测试,copy命令正常,而 move却提示上面的问题,为什么?


与管理员权限无关,这应该属于系统底层问题,我上面不是说了吗,在分区之间move 的动作就连微软自己也是通过copy + createfolder 的方式实现的。分区内move 的话数据簇是不用move的,修改的只是分区表中关于此文件的储存位置的信息,所以move是个很快的过程,而分区之外的move连微软自己都要用copy + createfolder 的方式实现,那么慢的过程。。。。。
和管理员的权限无点关联。
论坛跳转: