次の方法で共有


方法: 印刷キューのサブセットを列挙する

企業全体にわたるプリンター セットを管理する情報技術 (IT) プロフェッショナルが直面する一般的な状況は、特定の特性を持つプリンターの一覧を生成することです。 この機能は、PrintServer オブジェクトの GetPrintQueues メソッドと EnumeratedPrintQueueTypes 列挙体によって提供されています。

次の例では、一覧表示する印刷キューの特性を指定するフラグの配列を作成することからコードが始まります。 この例では、プリント サーバーのローカルにインストールされ、共有されている印刷キューを探しています。 EnumeratedPrintQueueTypes 列挙体には、他にも多くの可能性があります。

このコードでは、次に、PrintServer から派生したクラスである LocalPrintServer オブジェクトを作成します。 ローカル プリント サーバーは、アプリケーションが実行されているコンピューターです。

最後の重要な手順は、配列を GetPrintQueues メソッドに渡すことです。

最後に、結果がユーザーに表示されます。

// Specify that the list will contain only the print queues that are installed as local and are shared
array<System::Printing::EnumeratedPrintQueueTypes>^ enumerationFlags = {EnumeratedPrintQueueTypes::Local,EnumeratedPrintQueueTypes::Shared};

LocalPrintServer^ printServer = gcnew LocalPrintServer();

//Use the enumerationFlags to filter out unwanted print queues
PrintQueueCollection^ printQueuesOnLocalServer = printServer->GetPrintQueues(enumerationFlags);

Console::WriteLine("These are your shared, local print queues:\n\n");

for each (PrintQueue^ printer in printQueuesOnLocalServer)
{
   Console::WriteLine("\tThe shared printer " + printer->Name + " is located at " + printer->Location + "\n");
}
Console::WriteLine("Press enter to continue.");
Console::ReadLine();
// Specify that the list will contain only the print queues that are installed as local and are shared
EnumeratedPrintQueueTypes[] enumerationFlags = {EnumeratedPrintQueueTypes.Local,
                                                EnumeratedPrintQueueTypes.Shared};

LocalPrintServer printServer = new LocalPrintServer();

//Use the enumerationFlags to filter out unwanted print queues
PrintQueueCollection printQueuesOnLocalServer = printServer.GetPrintQueues(enumerationFlags);

Console.WriteLine("These are your shared, local print queues:\n\n");

foreach (PrintQueue printer in printQueuesOnLocalServer)
{
    Console.WriteLine("\tThe shared printer " + printer.Name + " is located at " + printer.Location + "\n");
}
Console.WriteLine("Press enter to continue.");
Console.ReadLine();
' Specify that the list will contain only the print queues that are installed as local and are shared
Dim enumerationFlags() As EnumeratedPrintQueueTypes = {EnumeratedPrintQueueTypes.Local, EnumeratedPrintQueueTypes.Shared}

Dim printServer As New LocalPrintServer()

'Use the enumerationFlags to filter out unwanted print queues
Dim printQueuesOnLocalServer As PrintQueueCollection = printServer.GetPrintQueues(enumerationFlags)

Console.WriteLine("These are your shared, local print queues:" & vbLf & vbLf)

For Each printer As PrintQueue In printQueuesOnLocalServer
    Console.WriteLine(vbTab & "The shared printer " & printer.Name & " is located at " & printer.Location & vbLf)
Next printer
Console.WriteLine("Press enter to continue.")
Console.ReadLine()

各印刷キューをステップ実行する foreach ループで、さらにスクリーニングを行うようにこの例を拡張することができます。 たとえば、ループで各印刷キューの GetPrintCapabilities メソッドを呼び出して、両面印刷がサポートされていないプリンターを除外し、両面印刷の有無について返された値をテストすることができます。

関連項目