您的位置：您的位置：软件测试技术网 >> 软件测试技术 >> Rational软件测试工具 >> ClearQuest >> 查看资讯

ClearQuest的动态关联

发布: 2009-2-23 10:10 | 作者: 不详 | 来源: 领测软件测试网采编 | 查看: 1次 | 进入软件测试论坛讨论

    Set queryObj = sessionObj.BuildQuery("two_menu")

    queryObj.BuildField ("model_two_menu")

    Set filterObj = queryObj.BuildFilterOperator(AD_BOOL_OP_AND)
    filterObj.BuildFilter "one_menu", AD_COMP_OP_EQ, prj_name
    Set resultSetObj = sessionObj.BuildResultSet(queryObj)

    resultSetObj.Execute

    Do While resultSetObj.MoveNext = AD_SUCCESS
        choices.AddItem resultSetObj.GetColumnValue(1)