使用 OTA 在 ALM 中删除测试集
Delete a TestSet in ALM using OTA
所以,我正在慢慢努力,使用 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
您似乎使用了错误的工厂 - 您需要使用 TestSetFactory
而不是 TSTestFactory
所以,我正在慢慢努力,使用 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
您似乎使用了错误的工厂 - 您需要使用 TestSetFactory
而不是 TSTestFactory