Groups

説明

スキーマ リポジトリに関連付けられたグループのコレクションを戻します。これは読み取り専用のプロパティです。表示できますが設定できません。

戻されたコレクション内の各エレメントは Group オブジェクトです。

構文

VBScript

adminSession.Groups 

Perl

$adminSession->GetGroups(); 
識別子
説明
adminSession
AdminSession オブジェクトは、現在のスキーマ リポジトリのアクセス セッションを表します。
戻り値
スキーマ リポジトリ内のすべてのグループを含む Groups オブジェクト

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);

フィードバック