스키마 저장소에 연관된 그룹 콜렉션을 리턴합니다. 이는 읽기 전용 특성입니다. 즉, 볼 수는 있으나 설정할 수는 없습니다.
리턴된 콜렉션에 있는 각 요소는 Group 오브젝트입니다.
VBScript
adminSession.Groups
Perl
$adminSession->GetGroups();
VBScript
set adminSession = CreateObject("ClearQuest.AdminSession")
adminSession.Logon "admin", "", ""
set groupList = adminSession.Groups
for each groupObj in groupList
groupName = groupObj.Name
msgbox groupName
Next
Perl
use CQPerlExt;
#Create a Rational ClearQuest admin session
$adminSession= CQAdminSession::Build();
#Logon as admin
$adminSession->Logon( "admin", "admin", "" );
#Get the list of groups
$groupList = $adminSession->GetGroups();
#Get the number of groups
$numGroups = $groupList->Count();
#Iterate through the groups
for ( $x=0; $x<$numGroups; $x++ ) {
#Get the specified item in the collection of groups
$groupObj = $groupList->Item( $x );
#Get the name of the group
$groupName = $groupObj->GetName();
}
CQAdminSession::Unbuild($adminSession);