51Testing软件测试论坛

标题: 如何检测某一个windows文件夹是否存在？ [打印本页]

作者: scdxorange 时间: 2007-8-29 17:29
标题: 如何检测某一个windows文件夹是否存在？
比如，我有这样一个文件夹
D:/temp/abc

那如何用QTP去检测“abc”文件夹是否存在？
谢谢！

作者: zhuyuancan 时间: 2007-8-29 18:08
Set fa=createobject("scripting.filesystemobject")
If fa.folderexists("D:/temp/abc") Then
msgbox "文件夹存在"
End If

作者: scdxorange 时间: 2007-8-29 21:22
哇，太厉害了。

这些命令从哪里学呢？

谢谢！

作者: 423799223 时间: 2007-8-30 13:42
如果实在不会的话
用VB检测吧
然后生成一个DLL给QTP调用
这样就方便多了
QTP自带的功能总是有限的

作者: winfood 时间: 2007-8-30 15:19

原帖由 423799223 于 2007-8-30 13:42 发表
如果实在不会的话
用VB检测吧
然后生成一个DLL给QTP调用
这样就方便多了
QTP自带的功能总是有限的

先用VB写dll然后还要QTP调用，这样不是舍近求远了。
2楼的代码用的是FileObjectSystem，简称FSO对象。它和QTP无关，是VBScript可以直接操作的代码。把那段代码Copy到vbs文件里面也也可以运行。

作者: jackymail 时间: 2007-8-30 15:26
楼上good!!!
vb帮助文件里面有这个对象属性方法介绍！

作者: milan330330 时间: 2007-8-30 15:32
FSO,VBS帮助里介绍,可以看看

作者: danmy 时间: 2007-8-30 16:45
有问题先看看QTP的帮助

作者: scdxorange 时间: 2007-8-31 15:18

原帖由 zhuyuancan 于 2007-8-29 18:08 发表
Set fa=createobject("scripting.filesystemobject")
If fa.folderexists("D:/temp/abc") Then
msgbox "文件夹存在"
End If

我可否在这里设置一个checkpoint，如果文件夹存在，就pass，否则就fail。代码怎么写呢？
谢谢！

作者: winfood 时间: 2007-8-31 16:53

原帖由 scdxorange 于 2007-8-31 15:18 发表

我可否在这里设置一个checkpoint，如果文件夹存在，就pass，否则就fail。代码怎么写呢？
谢谢！

不必用QTP自带的CheckPoint类型，只要自行判断以后把结果送到Result里面就可以了。用Reporter对象的ReportEvent方法：
Reporter.ReportEvent

比如：
If true Then
Reporter.ReportEvent micPass, "Custom Step", "The user-defined step passed."
Else
Reporter.ReportEvent micFail, "Custom Step", "The user-defined step failed."
End If

具体用法查QTP帮助。

作者: 看雪时节 时间: 2007-8-31 17:45
楼上正解

作者: scdxorange 时间: 2007-9-3 19:47
谢谢了！

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