TD工作流:当开发修改当前状态为修复时弹窗提示加入修复的原因
本帖最后由 allen2000 于 2011-3-9 16:05 编辑if (User.IsInGroup("Developer") and FieldName = "BG_STATUS") then
if (Bug_Fields("BG_STATUS").Value = "Fixed" and Bug_Fields("BG_DEV_COMMENTS").IsModified) then
Msgbox(":) 感谢支持")
else
Msgbox(" :( 请输入修复原因,否则无法修改状态为Fixed")
Bug_Fields("BG_STATUS").Value="Reopen"
end if
end if
另外问几个小白问题:
怎么加注释而不会删除以前的注释呢? 如加黑字体,改完状态后在注释里加一句: 某某修复了此缺陷 (当作为选择”是“的证据,哈哈,偶不要看历史记录)
BUG_FIELD("注释").value=user.username+ " 修改了此缺陷"
刚接触VBS 没经验哈!
页:
[1]