SubscribedDatabases

Description

Returns the collection of databases to which the user is subscribed.

Il s'agit d'une propriété en lecture seule ; elle peut être visualisée mais pas définie.

Each element in the returned collection is a Database object. If this returns an empty collection or the collection has zero elements, the user is subscribed to all databases.

Remarque : The return value for this method does not include any subscriptions through group membership. Thus, the returned set may not include a database the user actually is allowed to log into.

Syntaxe

VBScript

user.SubscribedDatabases 

Perl

$user->GetSubscribedDatabases(); 
Identificateur
Description
user
Objet User.
Return value
A Databases collection object containing the databases to which the user is subscribed.

Exemple

Perl

use CQPerlExt;

$adminsession = CQAdminSession::Build();

$adminsession->Logon("admin", "",  "2003.06.00");

if (defined($adminsession->Logon("admin", "",  "2003.06.00"))) {

   print "Error: Not logged into ClearQuest.. please log in \n";

}

$userObj = $adminsession->GetUser("admin");

$dblist = $userObj->GetSubscribedDatabases();

$numdbs = $dblist->Count();

print $numdbs;

CQAdminSession::Unbuild($adminsession); 

Commentaires