没人回复,@。@
俺在网上看到一个读取Test中附件的方法,可惜这个方法不能读取目录中的附件。。
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