在脚本中怎么访问TD中作为附件的数据文件？
我自己解决了。参见：http://bbs.51testing.com/thread-143038-1-1.html用vbScript的文件机制打开存放在TD中的文件，文件的路径怎么写啊？
虽然ExecuteFile可以用""来定位，但是这次要打开的不是脚本，而是普通的数据文件，该怎么打开呢？
'代码如下
'这一句会报告文件找不到
MsgBox FileContent( " Subject\Test\TestData.txt" )
Function FileContent( filePath )
'打开文件
Const ForReading = 1, ForWriting = 2
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(filePath, ForReading, False, True)
'读取内容
If Not f.AtEndOfStream Then '一定要加判断，否则当文件为空时会报错“输入超出了文件尾”
FileContent = f.ReadAll
End If
MsgBox FileContent
'关闭文件
f.Close
Set f = Nothing
Set fso = Nothing
End Function
[ 本帖最后由 lyghe 于 2009-3-13 14:31 编辑 ] 找到一个类似的帖子：请教有关QTP中脚本读取QC附件的问题
http://bbs.51testing.com/thread-133586-1-8.html
提出了一个方法：
dim CurrentTest
set CurrentTest = QCUtil.CurrentTest
Set attf = CurrentTest.Attachments
Set attList = attf.NewList("")
Set att = attList.Item(1)
If att.Type = TDATT_FILE Then
att.Load True, "c:"
str = att.FileName
Msgbox str
End If
可以访问当前测试下的附件，而且访问的是在本地临时文件夹中的副本。
个人猜想，既然QC是通过IIS发布的，那么肯定不可能直接访问QC中的附件，只能访问本地临时副本。
现在要解决的问题是：如何访问任何位置的附件的临时副本？
[ 本帖最后由 lyghe 于 2009-3-12 11:52 编辑 ]
页:
[1]
