With Bug_Fields("BG_STATUS")
.Value="open"
End With
With Bug_Fields("BG_RESPONSIBLE")
.Value="frh"
End With
With Bug_Fields("BG_PRIORITY")
.Value="2-Medium"
End With
With Bug_Fields("BG_DETECTION_VERSION")
.Value="v1.40"
End With
With Bug_Fields("BG_USER_01")
.Value="功能问题"
End With作者: yongku 时间: 2009-8-20 11:16
楼上的,这段代码是哪里的?能具体点吗?有点晕