Inicia la sesión como el usuario especificado para una sesión de base de datos.
Antes de llamar a este método, debe haber creado e inicializado un nuevo objeto Session.
Si va a escribir código de enganche, no necesita llamar a este método. IBM Rational ClearQuest crea, automáticamente, el objeto Session e inicia la sesión del usuario antes de llamar a ningún enganche.
VBScript
session.UserLogon nombre_inicioSesión, contraseña, nombre_baseDatos, tipo_sesión,conjunto_basesDatos
Perl
$session->UserLogon(nombre_inicioSesión, contraseña, nombre_baseDatos, conjunto_basesDatos);
VBScript
' En el ejemplo siguiente se muestra cómo iniciar la sesión en la base de datos
' desde una aplicación Visual Basic.
set sessionObj = CreateObject("CLEARQUEST.SESSION")
' Iniciar la sesión en cada base de datos sucesivamente.
databases = sessionObj.GetAccessibleDatabases("MASTR","admin","")
For Each db in databases
dbName = db.GetDatabaseName
sessionObj.UserLogon "admin", "", dbName, AD_PRIVATE_SESSION, ""
' Acceder a la base de datos
' ... Next
Perl
use CQPerlExt;
#Iniciar una sesión de Rational
ClearQuest
$sessionObj = CQSession::Build();
#Obtener una lista de bases de datos a las que se puede acceder
$databases = $sessionObj->GetAccessibleDatabases("MASTR", "admin", "");
$count = $databases->Count();
#Para cada base de datos a la que se puede acceder, iniciar la sesión
#como joe con la contraseña gh36ak3
for($x=0;$x<$count;$x++){
$db = $databases->Item($x);
$dbName = $db->GetDatabaseName();
# Iniciar la sesión en la base de datos
$sessionObj->UserLogon( "joe", "gh36ak3", $dbName, "" );
#...
}
CQSession::Unbuild($sessionObj);