51Testing软件测试论坛

标题: VBS中FSO的问题，我用FSO对象去复制临时文件，总是报“文件没找到” [打印本页]

作者: csj 时间: 2010-8-2 14:54
标题: VBS中FSO的问题，我用FSO对象去复制临时文件，总是报“文件没找到”
例如临时文件里有一个cgi-bin文件
我的代码如下:
dim fs'定义fs
set fs=wscript.createobject("scripting.filesystemobject") 'fs 为FSO 实例
fs.copyfile "C:\Documents and Settings\Administrator\Local Settings\Temporary Internet Files\cgi-bin","d:\cgi-bin",true

运行时，直接报“找不到文件”，请问前辈们怎么解决这个问题

作者: skyzhu 时间: 2010-8-2 15:36
多数是系统不允许
cmd命令也不能复制，那里的文件还不能直接执行，手动复制也会自动重命名

作者: csj 时间: 2010-8-3 10:25
标题: 回复 2# 的帖子
是啊，问题是怎么解决这些问题呀

作者: june.diny 时间: 2010-8-3 10:38
cgi-bin是什么类型的文件， doc? txt?img?
要将文件名+文件类型都写上，才能找到文件，例如：
FileSystemObject.CopyFile "c:\test\*.doc", "c:\tempfolder\"

作者: skyzhu 时间: 2010-8-3 10:57
标题: 回复 4# 的帖子
全名也没用的，那个目录比较特殊，系统是没有直接操作权限的

作者: csj 时间: 2010-8-3 11:00
标题: 回复 4# 的帖子
哎，帅哥能不能给个实验成功的，要注意在临时文件夹里的文件啊“C:\Documents and Settings\Administrator\Local Settings\Temporary Internet Files”

作者: zhehaoshi 时间: 2010-8-3 15:13
这个是在某个用户下的临时文件夹啊
你登陆用户有操作权限吗

作者: csj 时间: 2010-8-3 15:56
标题: 回复 7# 的帖子
我用的是Adimistrator。所谓找不到，不是看不见，或者不能右键复制，而是用FSO不能找到，怎么办啊？

作者: skyzhu 时间: 2010-8-3 17:00
标题: 回复 8# 的帖子
换突破口吧。。。那个目录的文件不一样的，或者说不是实体文件

那个目录可以同名文件，可以非法名称文件。。。显然不是和一般的文件处理相同的

作者: csj 时间: 2010-8-4 10:18
标题: 回复 9# 的帖子
大哥，能给个解决方案不？

作者: rojer521 时间: 2010-8-4 21:40
特殊文件夹要用特殊方法，哥给你个方法吧，代码如下：

Const TEMPORARY_INTERNET_FILES = &H20&

Set oShell = CreateObject("Shell.Application")
Set oFolder = oShell.Namespace(TEMPORARY_INTERNET_FILES)
Set oTarget = oShell.NameSpace( "d:\cgi-bin" )

For Each oItem in oFolder.Items '会拷贝所有文件名包含cgi-bin的文件到d:\cgi-bin目录
If InStr(oItem.Name,"cgi-bin") Then
oTarget.CopyHere oItem
End If
Next

Set oTarget = Nothing
Set oFolder = Nothing
Set oShell= Nothing

作者: skyzhu 时间: 2010-8-5 10:58
是可以，就是有些缺点，重复的文件名拷出来就不知道哪个是1，哪个是2了。

作者: rojer521 时间: 2010-8-5 20:55

原帖由 skyzhu 于 2010-8-5 10:58 发表
是可以，就是有些缺点，重复的文件名拷出来就不知道哪个是1，哪个是2了。

既然都有了突破，应该有完善解决方案

作者: rojer521 时间: 2010-8-5 22:00
参考资料：http://zhidao.baidu.com/question/114808988.html

作者: 17800455 时间: 2010-8-6 09:02
标题: 回复 1# 的帖子
你复制的是文件，你路径是文件夹至少加个。“\”

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)