Authorization Constructor (String, Boolean, String)
Creates a new instance of the Authorization class with the specified authorization message, completion status, and connection group identifier.
Assembly: System (in System.dll)
'Declaration 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 Try 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 Else 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
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.