2010-02-19 2 views

답변

1

QC 워크 플로 설명서에서 볼 수 있듯이 사용자 개체에는 FullName, IsInGorup 및 UserName 속성 만 있습니다.

이 경우이므로 OTA에서 제공하는 사용자 지정 메타 데이터를 사용하여 전체 사용자 데이터에 액세스 할 수 있어야합니다.

사용자 정보를 얻으려면, 당신은 이메일 속성을 가지고 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 
+0

고마워요! 코드를 바탕으로 드디어이 함께했다 : 이 설정 TD = tdconnection CUST = td.customization 설정 usrs의 =의 cust.Users 을 설정 USR 설정 = usrs.User (user.UserName) sEMail = usr.Email –

관련 문제