Polling voor de status van een asynchrone bewerking
Toepassingen die andere werkzaamheden kunnen uitvoeren terwijl ze wachten op de resultaten van een asynchrone bewerking, mogen wachten niet blokkeren totdat de bewerking is voltooid. Gebruik een van de volgende opties om door te gaan met het uitvoeren van instructies terwijl u wacht tot een asynchrone bewerking is voltooid:
Gebruik de IsCompleted eigenschap van de IAsyncResult geretourneerde door de methode BeginOperationName van de asynchrone bewerking om te bepalen of de bewerking is voltooid. Deze benadering wordt polling genoemd en wordt in dit onderwerp gedemonstreerd.
Gebruik een AsyncCallback gemachtigde om de resultaten van de asynchrone bewerking in een afzonderlijke thread te verwerken. Zie Een AsyncCallback-gemachtigde gebruiken om een asynchrone bewerking te beëindigen voor een voorbeeld van deze benadering.
Opmerking
In het volgende codevoorbeeld ziet u hoe u asynchrone methoden in de Dns klasse gebruikt om domeinnaamsysteemgegevens op te halen voor een door de gebruiker opgegeven computer. In dit voorbeeld wordt de asynchrone bewerking gestart en worden puntjes ('.') in de console afgedrukt totdat de bewerking is voltooid. Houd er rekening mee dat null (niets in Visual Basic) wordt doorgegeven voor deAsyncCallbackBeginGetHostByNameen Object parameters omdat deze argumenten niet vereist zijn bij het gebruik van deze benadering.
/*
The following example demonstrates using asynchronous methods to
get Domain Name System information for the specified host computer.
This example polls to detect the end of the asynchronous operation.
*/
using System;
using System.Net;
using System.Net.Sockets;
using System.Threading;
namespace Examples.AdvancedProgramming.AsynchronousOperations
{
public class PollUntilOperationCompletes
{
static void UpdateUserInterface()
{
// Print a period to indicate that the application
// is still working on the request.
Console.Write(".");
}
public static void Main(string[] args)
{
// Make sure the caller supplied a host name.
if (args.Length == 0 || args[0].Length == 0)
{
// Print a message and exit.
Console.WriteLine("You must specify the name of a host computer.");
return;
}
// Start the asynchronous request for DNS information.
IAsyncResult result = Dns.BeginGetHostEntry(args[0], null, null);
Console.WriteLine("Processing request for information...");
// Poll for completion information.
// Print periods (".") until the operation completes.
while (result.IsCompleted != true)
{
UpdateUserInterface();
}
// The operation is complete. Process the results.
// Print a new line.
Console.WriteLine();
try
{
IPHostEntry host = Dns.EndGetHostEntry(result);
string[] aliases = host.Aliases;
IPAddress[] addresses = host.AddressList;
if (aliases.Length > 0)
{
Console.WriteLine("Aliases");
for (int i = 0; i < aliases.Length; i++)
{
Console.WriteLine("{0}", aliases[i]);
}
}
if (addresses.Length > 0)
{
Console.WriteLine("Addresses");
for (int i = 0; i < addresses.Length; i++)
{
Console.WriteLine("{0}",addresses[i].ToString());
}
}
}
catch (SocketException e)
{
Console.WriteLine("An exception occurred while processing the request: {0}", e.Message);
}
}
}
}
'The following example demonstrates using asynchronous methods to
'get Domain Name System information for the specified host computer.
'This example polls to detect the end of the asynchronous operation.
Imports System.Net
Imports System.Net.Sockets
Imports System.Threading
Namespace Examples.AdvancedProgramming.AsynchronousOperations
Public Class PollUntilOperationCompletes
Shared Sub UpdateUserInterface()
' Print a period to indicate that the application
' is still working on the request.
Console.Write(".")
End Sub
Public Shared Sub Main(args() as String)
' Make sure the caller supplied a host name.
If (args.Length = 0)
' Print a message and exit.
Console.WriteLine("You must specify the name of a host computer.")
End
End If
' Start the asynchronous request for DNS information.
Dim result as IAsyncResult = Dns.BeginGetHostEntry(args(0), Nothing, Nothing)
Console.WriteLine("Processing request for information...")
' Poll for completion information.
' Print periods (".") until the operation completes.
Do while result.IsCompleted <> True
UpdateUserInterface()
Loop
' The operation is complete. Process the results.
' Print a new line.
Console.WriteLine()
Try
Dim host as IPHostEntry = Dns.EndGetHostEntry(result)
Dim aliases() as String = host.Aliases
Dim addresses() as IPAddress = host.AddressList
Dim i as Integer
If aliases.Length > 0
Console.WriteLine("Aliases")
For i = 0 To aliases.Length - 1
Console.WriteLine("{0}", aliases(i))
Next i
End If
If addresses.Length > 0
Console.WriteLine("Addresses")
For i = 0 To addresses.Length - 1
Console.WriteLine("{0}", addresses(i).ToString())
Next i
End If
Catch e as SocketException
Console.WriteLine("An exception occurred while processing the request: {0}", e.Message)
End Try
End Sub
End Class
End Namespace
