Export (0) Print
Expand All

Authorization Constructor (String, Boolean, String)

Creates a new instance of the Authorization class with the specified authorization message, completion status, and connection group identifier.

Namespace:  System.Net
Assembly:  System (in System.dll)

Public Sub New ( _
	token As String, _
	finished As Boolean, _
	connectionGroupId As String _


Type: System.String
The encrypted authorization message expected by the server.
Type: System.Boolean
The completion status of the authorization attempt. true if the authorization attempt is complete; otherwise, false.
Type: System.String
A unique identifier that can be used to create private client-server connections that are bound only to this authentication scheme.

The following code example creates a new instance of the Authorization class with the specified authorization message, completion status, and connection group identifier.

Public Function Authenticate(challenge As String, request As WebRequest, credentials As ICredentials) As Authorization Implements IAuthenticationModule.Authenticate
        Dim message As String
        ' Check if Challenge string was raised by a site which requires CloneBasic authentication.
        If challenge Is Nothing Or Not challenge.StartsWith("CloneBasic") Then
            Return Nothing
        End If
        Dim myCredentials As NetworkCredential
        If TypeOf credentials Is CredentialCache Then
            myCredentials = credentials.GetCredential(request.RequestUri, "CloneBasic")
            If myCredentials Is Nothing Then
                Return Nothing
            End If
            myCredentials = CType(credentials, NetworkCredential)
        End If 'Message encryption scheme : 
        '        a)Concatenate username and password seperated by space
        '        b)Apply ASCII encoding to obtain a stream of bytes
        '        c)Apply Base64 Encoding to this array of bytes to obtain our encoded authorization message

        message = myCredentials.UserName + " " + myCredentials.Password
        'Apply AsciiEncoding to our user name and password to obtain it as an array of bytes
        Dim asciiEncoding As Encoding = Encoding.ASCII
        Dim byteArray(asciiEncoding.GetByteCount(message)) As Byte
        byteArray = asciiEncoding.GetBytes(message)

        'Perform Base64 transform
        message = Convert.ToBase64String(byteArray)
        'The following overloaded contructor sets the 'Message' property of authorization to the base64 string
        '         *that  we just formed and it also sets the 'Complete' property to true and the connection group id
        '         *to the domain of the NetworkCredential object
        Dim myAuthorization As New Authorization("CloneBasic " + message, True, request.ConnectionGroupName)
        Return myAuthorization
    Catch e As Exception
        Console.WriteLine(("Exception Raised ...:" + e.Message))
        Return Nothing
    End Try
End Function 'Authenticate

.NET Framework

Supported in: 4, 3.5, 3.0, 2.0, 1.1, 1.0

.NET Framework Client Profile

Supported in: 4, 3.5 SP1

Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows XP SP2 x64 Edition, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

The .NET Framework does not support all versions of every platform. For a list of the supported versions, see .NET Framework System Requirements.

Community Additions

© 2015 Microsoft