Visual Basic

Hi:

   I work on a program that must capture the printout of a DOS application, filter its contents and send them to another printer.
   
   Monitoring the print queue, I can detect the print job, but I need to take the name of the .spl file that contains the data to print or some way to take its content.
   I use the PrintSystemJobInfo object but:
The JobStream property has a NULL value
    Neither the JobName property nor the Name property point to the name of the file that contains the data.

(I have read the code of the PrinterQueueWatch project published in the articles, but it is too complex)
This is my first post in the forum.
I appreciate the help

Public Class ImageViewer
    Inherits Panel

    'based on http://www.codeproject.com/KB/linq/ScrollablePicturebox.aspx

    Dim innerPicture As New PictureBox()
    Dim mPictureFile As String = String.Empty
    Dim mAutoScroll As Boolean = True

    Sub New()
        ' add the inner picture
        innerPicture.Top = 0
        innerPicture.Left = 0
        innerPicture.SizeMode = PictureBoxSizeMode.Normal

        Controls.Add(innerPicture)
    End Sub

    Public Property PictureFile() As String
        Get
            Return mPictureFile
        End Get
        Set(value As String)
            mPictureFile = value

            If (String.IsNullOrEmpty(mPictureFile) = False) Then
                ' set the image to the image file
                innerPicture.Image = Image.FromFile(mPictureFile)

                ' resize the image to match the image file
                innerPicture.Size = innerPicture.Image.Size
            Else

                innerPicture.Image = Nothing
            End If

        End Set
    End Property


    Public Overrides Property AutoScroll As Boolean
        Get
            Return mAutoScroll
        End Get
        Set(value As Boolean)
            mAutoScroll = value
        End Set
    End Property



End Class

Dim cboSelect As SqlDataAdapter = New SqlDataAdapter("SELECT condition FROM dbo.status", connection)
Dim cbox As New DataTable
cboSelect.Fill(cbox)
With cboServ
            .DisplayMember = "condition"
            .DataSource = cbox
        End With

SELECT condition FROM dbo.aircraft WHERE avNum='XXXXX'