GetAuthenticationLoginName

Descrizione

Riporta la stringa che un utente immette come nome di accesso durante l'autenticazione. Il valore di ritorno può essere differente dal nome utente Rational ClearQuest se l'utente è autenticato LDAP.

Utilizzare il metodo GetUserLoginName per ottenere il nome Rational ClearQuest dell'utente memorizzato nel record del profilo utente per l'utente.

Restituisce il nome di accesso utilizzato per creare l'oggetto AdminSession. Il valore restituito è il nome utilizzato per autenticare l'utente, non il nome del campo di accesso dell'utente Rational ClearQuest memorizzato nel record del profilo utente per l'utente. Il valore di ritorno può essere un nome di accesso LDAP (ad esempio, myname@us.ibm.com) e non un nome utente Rational ClearQuest (ad esempio, mycqname).

Nota: questo metodo è stato reso disponibile nella versione 2003.06.14.

Sintassi

VBScript

adminSession.GetAuthenticationLoginName 

Perl

$adminSession->GetAuthenticationLoginName(); 
Identificativo
Descrizione
adminSession
L'oggetto AdminSession rappresenta la sessione di accesso corrente del repository schema.
Valore di ritorno
Una stringa contenente il nome di autenticazione utilizzato per creare questo oggetto AdminSession.

Esempi

VBScript

set adminSession = CreateObject("ClearQuest.AdminSession") 
adminSession.Logon "admin", "admin", "" 
userLogin = adminSession.GetAuthenticationLoginName
' ...

Perl

use CQPerlExt;
my ($admin_user_login, $admin_pwd, $dbset, $cqusername) = @_;
my $authusername = $admin_user_login;
my $adminSessionObj = CQAdminSession::Build();
$adminSessionObj->Logon($admin_user_login, $admin_pwd, $dbset);
my $loginname = $adminSessionObj->GetUserLoginName();
my $authloginname = $adminSessionObj->GetAuthenticationLoginName();
print "Admin login: $authusername , $authloginname , $cqusername, $loginname \n";
if ($loginname ne $cqusername)
   {
      print "Admin login $loginname != $cqusername!!\n";
   }
if ($authloginname ne $authusername)
   {
      print "Admin authname $authloginname != $authusername!!\n";
   }
CQAdminSession::Unbuild($adminSessionObj);

Feedback