QC工作流问题

wul15 · 发表于 2009-8-14 11:17:38

现在项目运用到QC 但是在新建BUG时描述中是空的我觉得这点没有BUGFREE好用

我想在描述中加入 [步骤] [预期] [实际] [备注]

请问怎么在工作流中设置阿小弟编程水平有限,所以想请高手帮忙解决下深表感谢!

附图是BUGFREE上缺陷描述的图!

zhoward · 发表于 2010-4-30 18:09:54

Sub Defects_Bug_New
 On Error Resume Next

 Bug_Fields("BG_PLANNED_CLOSING_VER").IsVisible="false"
 Bug_Fields("BG_ACTUAL_FIX_TIME").IsVisible="false"
' 设置初始默认值
 Bug_Fields("BG_USER_01").Value="代码错误"
 Bug_Fields("BG_USER_06").Value="功能测试"
 Bug_Fields("BG_USER_02").Value="Win xp"
 Bug_Fields("BG_USER_10").Value="IE7"

'Start：缺陷内容模板配置
 '[步骤]：
'1.
''2.
 ' 3.
 '[预期结果]：
 '[实际结果]：
 Bug_Fields("BG_DESCRIPTION").Value="<html><body>" + Bug_Fields("BG_DESCRIPTION").Value+"[描述] " '+chr(13)
 Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+" 1. " '+chr(13)
 Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+" 2. " '+chr(13)
 Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+" 3. " '+chr(13)+chr(13)
 Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+"[预期结果] " '+chr(13)+chr(13)
 Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+"[实际结果] " '+chr(13)+chr(13) +chr(13)
 Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+ "</html></body>"

 On Error GoTo 0
 WizardFieldCust_Add ' 由向导添加

End Sub

near · 发表于 2010-3-22 14:58:13

可不可以进一步设置模版字体的颜色和大小

孤独无心 · 发表于 2010-3-13 00:32:41

请教下怎么解决的？非常感谢！

wenjun2014jsj3 · 发表于 2009-8-25 15:30:59

怎么解决的？说说呀。。。。。。。

wul15 · 发表于 2009-8-14 17:35:34

已解决!

wul15 · 发表于 2009-8-14 14:57:52

怎么赋值呢?

Sub Defects_Bug_New
WizardFieldCust_Add ' 由向导添加

End Sub

是这个函数吧?

hezerong · 发表于 2009-8-14 12:15:36

在工作流中写脚本，在Bugnew的函数中，把你想添加的模板内容赋值给描述字段。很简单的。

		自动登录	找回密码
密码			(注-册)加入51Testing

[原创] QC工作流问题

本帖子中包含更多资源

相关帖子

站长推荐 /1