51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 3979|回复: 12
打印 上一主题 下一主题

[原创] CQ高手指点一下,field字段写的代码编译通过,但是不起作用??

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2006-8-11 17:25:49 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我想根据项目名称字段的取值,筛选过滤模块名称下的值。编译通过,看不到效果。那位高手指点一下。
代码如下:
    Sub fldcolumn_1_ChoiceList(fieldname, choices)
       
' SetFieldValue "mdname", ""

        dim pr_choice

        set pr_choice = GetFieldValue("project")

        select case pr_choice.GetValue()

        case "cs"

                choices.AddItem ("Win95")

                choices.AddItem ("NT")

                choices.AddItem ("Web")

        case "dj"

                choices.AddItem ("Web")

        end select



End Sub


没有根据项目名称的取值显示不同的模块名称。??/
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

  • TA的每日心情
    慵懒
    昨天 11:43
  • 签到天数: 3650 天

    连续签到: 102 天

    [LV.Master]测试大本营

    2#
    发表于 2006-8-11 17:34:01 | 只看该作者
    多加msg,看哪个值没有取到。
    直接select case pr_choice就可以了吧,上一步set不是已经取值了么。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    3#
     楼主| 发表于 2006-8-14 09:10:41 | 只看该作者

    多谢搂主~

    我这个版本api函数看不到:(

    再试一次。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    4#
     楼主| 发表于 2006-8-14 09:23:47 | 只看该作者

    还看不到代码控制的结果,还有什么要设置吗?

    设置的msg信息,在编译后在最下方应该出现msg信息吧。好像没看到,只提示没语法错误
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    慵懒
    昨天 11:43
  • 签到天数: 3650 天

    连续签到: 102 天

    [LV.Master]测试大本营

    5#
    发表于 2006-8-14 09:31:36 | 只看该作者
    晕,msg是运行期间弹提示框,可以很方便看到当前取值。
    至于编译,很弱智的,只检查语法,不检查错误。

    另外问问,在你的开始菜单中,Clearquest项目,没有“ClearQuest API Reference”吗?
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    6#
     楼主| 发表于 2006-8-14 09:52:09 | 只看该作者

    试验中。。。。。。。。

    有这个ClearQuest API Reference,但是打不开。只是一幅图片。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    7#
     楼主| 发表于 2006-8-14 10:14:41 | 只看该作者

    luming再问一个简单的问题,多谢多谢

    我加了个 MsgBox pr_choice,代码编译通过后,我点击testWork,点击new defect界面出现提示:

    ERROR!Execution of a hook failed during the action Submit.It was the FIELD_CHOICE_LIST hook of the field mdName,attached to the defect "test00000006". The reason for the failure was:对象不支持此。。。。。
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    慵懒
    昨天 11:43
  • 签到天数: 3650 天

    连续签到: 102 天

    [LV.Master]测试大本营

    8#
    发表于 2006-8-14 10:22:06 | 只看该作者
    应该是你的script中使用了不支持的方法和属性。
    你看看你的安装目录下Program Files\Rational\ClearQuest\doc\books\cq_api.pdf。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    9#
     楼主| 发表于 2006-8-14 11:03:21 | 只看该作者

    找到API函数了

    程序还是调不通,郁闷。。。。。。。。。。。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    10#
    发表于 2006-8-21 11:03:18 | 只看该作者
    这个好象只有客户端可以实现,web端不能实现吧。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    11#
    发表于 2006-12-31 16:36:43 | 只看该作者
    Sub fldcolumn_1_ChoiceList(fieldname, choices)
            dim pr_choice
            pr_choice = GetFieldValue("project").GetValue()
            select case pr_choice
            case "cs"
                    choices.AddItem ("Win95")
                    choices.AddItem ("NT")
                    choices.AddItem ("Web")
            next
            case "dj"
                    choices.AddItem ("Web")
            next
            end select
    End Sub
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    12#
    发表于 2006-12-31 16:39:58 | 只看该作者
    原帖由 mastertester 于 2006-8-14 10:14 发表
    我加了个 MsgBox pr_choice,代码编译通过后,我点击testWork,点击new defect界面出现提示:

    ERROR!Execution of a hook failed during the action Submit.It was the FIELD_CHOICE_LIST hook of the fiel ...


    msgbox 后面的函数也应该是string类型的才行的啊,可你申明的
    pr_choice不是string类型。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    13#
    发表于 2007-1-8 14:35:13 | 只看该作者
    学习sdlkfj2
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-24 06:47 , Processed in 0.079683 second(s), 27 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表