TA的每日心情 | 开心 2017-7-4 15:34 |
---|
签到天数: 1 天 连续签到: 1 天 [LV.1]测试小兵
|
现QTP中现在已经不用使用Scripting.FileSystemObject 来进行文件的操作了,因为它引入了.net
以前用Scripting.FileSystemObject判断文件否存在:
Public function sFileExists(sFileName)
Dim fso, msg
Set fso = CreateObject("Scripting.FileSystemObject")
If (fso.FileExists(sFileName)) Then
sFileExists = true
Else
sFileExists = false
End If
End Function
现在可以使用.net里的类了,方法如:
Set var_CreateInstance = DotNetFactory.CreateInstance("System.IO.File", "")
dim filepath
filepath = "E:\Excel_VBA.txt"
dim b
b = var_CreateInstance.Exists(filepath)
msgbox b
可以达到同样的效果,这样我们不需要在为脚本语言不能实现的功能而头疼了,你直接用.net里的类就可以了.
我们的做法是,把在QTP时实现比较困难的功能,先在.net下写一个针对于自动化的库,然后通过上面的做法来引用自己写的库,就可以实现很多功能...
...
...
...
有了对.net 的支持,就不会说XXX功能在QTP下无法实现,因为编程.net可以,所以QTP可以 |
|