Dotazování na stav asynchronní operace
Aplikace, které můžou provádět jinou práci při čekání na výsledky asynchronní operace, by neměly blokovat čekání, dokud se operace nedokončí. Pokud chcete pokračovat v provádění pokynů a čekat na dokončení asynchronní operace, použijte jednu z následujících možností:
IsCompleted Pomocí vlastnosti IAsyncResult vrácené metodou BeginOperationName asynchronní operace určete, zda byla operace dokončena. Tento přístup se označuje jako dotazování a ukazuje se v tomto tématu.
Pomocí delegáta AsyncCallback můžete zpracovat výsledky asynchronní operace v samostatném vlákně. Příklad, který ukazuje tento přístup, viz Použití delegáta AsyncCallback k ukončení asynchronní operace.
Příklad
Následující příklad kódu ukazuje použití asynchronních metod ve Dns třídě k načtení informací domain Name System pro uživatelem zadaný počítač. Tento příklad spustí asynchronní operaci a potom v konzole vytiskne tečky (".") do dokončení operace. Všimněte si, že hodnota null (Nothing v jazyce Visual Basic) se předává pro BeginGetHostByNameAsyncCallback parametry a Object parametry, protože tyto argumenty nejsou při použití tohoto přístupu vyžadovány.
/*
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
