LocalPrintServer Class (System.Printing)

		' -------------------- GetPrintXpsDocumentWriter() -------------------
		''' <summary>
		'''   Returns an XpsDocumentWriter for the default print queue.</summary>
		''' <returns>
		'''   An XpsDocumentWriter for the default print queue.</returns>
		Private Function GetPrintXpsDocumentWriter() As XpsDocumentWriter
			' Create a local print server
			Dim ps As New LocalPrintServer()

			' Get the default print queue
			Dim pq As PrintQueue = ps.DefaultPrintQueue

			' Get an XpsDocumentWriter for the default print queue
			Dim xpsdw As XpsDocumentWriter = PrintQueue.CreateXpsDocumentWriter(pq)
			Return xpsdw
		End Function ' end:GetPrintXpsDocumentWriter()

// -------------------- GetPrintXpsDocumentWriter() -------------------
/// <summary>
///   Returns an XpsDocumentWriter for the default print queue.</summary>
/// <returns>
///   An XpsDocumentWriter for the default print queue.</returns>
private XpsDocumentWriter GetPrintXpsDocumentWriter()
{
    // Create a local print server
    LocalPrintServer ps = new LocalPrintServer();

    // Get the default print queue
    PrintQueue pq = ps.DefaultPrintQueue;

    // Get an XpsDocumentWriter for the default print queue
    XpsDocumentWriter xpsdw = PrintQueue.CreateXpsDocumentWriter(pq);
    return xpsdw;
}// end:GetPrintXpsDocumentWriter()