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 campo di accesso 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).
VBScript
adminSession.GetAuthenticationLoginName
Perl
$adminSession->GetAuthenticationLoginName();
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);