allen2000 发表于 2011-3-9 14:50:01

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]
查看完整版本: TD工作流:当开发修改当前状态为修复时弹窗提示加入修复的原因