【发布时间】:2019-02-26 21:10:11
【问题描述】:
因此,我正在慢慢努力,以使用 OTA 在 ALM 中自动化一个痛苦的手动过程。我目前的斗争是删除一个测试集。它只是没有做任何事情——没有错误,没有删除,什么都没有。这就像代码行甚至不存在。虽然,它肯定在做一些事情,因为 ALM 现在工作起来很时髦。
我尝试了不同的方法:Delete、RemoveNode。任何建议表示赞赏。
Set qcConnection = QCutil.QCConnection
Set tsFolder = qcconnection.TestSetTreeManager.NodeById(224)
Set tstestList = tsFolder.FindTestSets("", False, "")
If tstestList is Nothing Then
print "No manual tests present", vbOK
Else
For i = 1 to tstestList.Count
Set temp = tstestList.Item(i)
if temp.TestSetFolder.father.name = strMonth then
qcconnection.TSTestFactory.RemoveItem(temp.id)
end if
Next
End If
【问题讨论】:
-
也许
tstestList是空的? -
@Sergi - 我也想知道,所以我在内部 if 循环中添加了一个 print 语句。它准确地显示了我要删除的内容。
-
哦,我明白了原因-您使用了错误的工厂-您需要使用
TestSetFactory而不是TSTestFactory -
是的!你是我的英雄!!那工作得很好。有一天,我会弄清楚工厂之间的区别。我不知道我为什么用那个。