vbscript - 如何在 HP QC 脚本编辑器中读取用户电子邮件地址？

Question

在 HP Quality Center 脚本编辑器中，我可以使用“用户”对象访问当前用户信息（如用户名或全名）。

如何访问当前用户电子邮件地址属性？

Answer 1

从我在 QC 工作流文档中可以看到，用户对象只有以下属性：FullName、IsInGorup 和 UserName。

既然是这种情况，您需要访问完整的用户数据，您可以使用 OTA 公开的自定义元数据来获取这些数据。

要获取用户信息，您需要获取具有Email属性的CustomizationUser对象。以下是迭代用户列表的文档示例：

Sub ListUsers()

  Dim custUsers As CustomizationUsers
  Dim USR As CustomizationUser
  Dim UList As List

  Set custUsers = tdc.Customization.Users

  Set UList = custUsers.Users
  Debug.Print UList.Count

  Dim maxU%, uCnt%

  maxU = 5

  For Each USR In UList
    uCnt = uCnt + 1
    With USR
        Debug.Print .name & ", " & .Email
    End With
    If uCnt > maxU Then Exit For
  Next USR

Exit Sub
ErrorHandler:
    ErrHandler err
End Sub