GetAuthenticationMode

説明

ユーザーの現在の AuthenticationMode を戻します。

このメソッドを呼び出すには、特別な権限は必要ありません。

注: このメソッドは、バージョン 2003.06.14 で使用可能になります。

構文

VBScript

user.GetAuthenticationMode()  

Perl

user->GetAuthenticationMode(); 
識別子
説明
user
User オブジェクト。
戻り値
ユーザーの AuthenticationMode を含む Long を戻します。そうでない場合は、例外がスローされます。

VBScript

Public Function checkAuthentication_On_User(ByVal theUser As OAdUser)
	' Check the user's authentication mode   
	Const AD_LDAP_AUTHENTICATION = 1
	Const AD_CQ_AUTHENTICATION = 2
	Dim authentication 	 ' the user authentication mode 
	authentication = user.GetAuthenticationMode
	if authentication = AD_LDAP_AUTHENTICATION then
		checkAuthentication_On_User =  "LDAP Authenticated"
	elseif authentication = AD_CQ_AUTHENTICATION then
		checkAuthentication_On_User =  "CQ Authenticated"
	elseif authentication = 0 then
		checkAuthentication_On_User =  "CQ Authenticated"
	else
		checkAuthentication_On_User = "UNKNOWN"
	end if
end Function

Perl

sub checkAuthentication_On_User($)
# Check the user's authentication mode
{
    my $user = shift;
    $authentication = $user->GetAuthenticationMode();
    if ($authentication == $CQPerlExt::CQ_LDAP_AUTHENTICATION) {
        return "LDAP Authenticated";
    }
    if ($authentication == $CQPerlExt::CQ_CQ_AUTHENTICATION) {
        return "CQ Authenticated";
    }
        return "UNKNOWN";
	}

フィードバック