スキーマ リポジトリに関連付けられたグループのコレクションを戻します。これは読み取り専用のプロパティです。表示できますが設定できません。
戻されたコレクション内の各エレメントは 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);