This documentation is archived and is not being maintained.

CredentialCache.GetEnumerator Method

Returns an enumerator that can iterate through the CredentialCache instance.

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

'Declaration
Public Function GetEnumerator As IEnumerator

Implements

IEnumerable.GetEnumerator

The following code example uses the GetEnumerator method to return an enumerator that can iterate through the CredentialCache instance.


    Try
        Dim myCredentialCache As New CredentialCache
        ' Dummy Credentials used here.             
        myCredentialCache.Add(New Uri("http://microsoft.com/"), "Basic", New NetworkCredential("user1", "passwd1", "domain1"))
        myCredentialCache.Add(New Uri("http://msdn.com/"), "Basic", New NetworkCredential("user2", "passwd2", "domain2"))

        myCredentialCache.Add(New Uri(url), "Basic", New NetworkCredential(userName, password, domainName))
        Dim myWebRequest As WebRequest = WebRequest.Create(url) 'Creates a webrequest with the specified url 
        myWebRequest.Credentials = myCredentialCache
        Dim listCredentials As IEnumerator = myCredentialCache.GetEnumerator()
        Console.WriteLine("Displaying credentials stored in CredentialCache: ")
        While listCredentials.MoveNext()
            Display(CType(listCredentials.Current, NetworkCredential))
        End While
        Console.WriteLine(ControlChars.Cr + "Now Displaying using 'foreach': ")
        ' Can use foreach with CredentialCache(Since GetEnumerator method of IEnumerable has been implemented by 'CredentialCache' class.
        Dim credential As NetworkCredential
        For Each credential In myCredentialCache
            Display(credential)
        Next credential
        Dim myWebResponse As WebResponse = myWebRequest.GetResponse() 'Sends the request and waits for response.
        ' Process the response here
        Console.WriteLine(ControlChars.Cr + "Response Received.")
        myWebResponse.Close()

    Catch e As WebException
        If Not (e.Response Is Nothing) Then
            Console.WriteLine(ControlChars.Lf + ControlChars.Cr + "Failed to obtain a response. The following error occured : {0}", CType(e.Response, HttpWebResponse).StatusDescription)
        Else
            Console.WriteLine(ControlChars.Lf + ControlChars.Cr + "Failed to obtain a response. The following error occured : {0}", e.Status)
        End If
    Catch e As Exception
        Console.WriteLine(ControlChars.Cr + "The following exception was raised : {0}", e.Message)
    End Try

End Sub 'GetPage

Public Shared Sub Display(credential As NetworkCredential)
    Console.WriteLine(ControlChars.Cr + "Username : {0} ,Password : {1} ,Domain : {2}", credential.UserName, credential.Password, credential.Domain)
End Sub 'Display


.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.
Show: