DevTrain Forum - Re: Druckaufträge löschen

Forum: VB.NET | Thema: Re: Druckaufträge löschen | Von: Tobi Ulm ( 06.12.2005 15:22)

		HI Ralf,

leider hab ich vorhin schmarrn geschrieben im 2.ten code bsp.

<code>
   Public Function CancelPrintJob(ByVal printerName As String, ByVal printJobID As Integer) As Boolean

        Dim isActionPerformed As Boolean = False
        Dim searchQuery As String = "SELECT * FROM Win32_PrintJob"
        Dim searchPrintJobs As ManagementObjectSearcher = New ManagementObjectSearcher(searchQuery)
        Dim prntJobCollection As ManagementObjectCollection = searchPrintJobs.Get()
        For Each prntJob As ManagementObject In prntJobCollection
            Dim jobName As String = prntJob.Properties("Name").Value.ToString()
            Dim splitArr(1) As Char
            splitArr(0) = Convert.ToChar(",")
            Dim prnterName As String = jobName.Split(splitArr)(0)
            Dim prntJobID As Integer = Convert.ToInt32(jobName.Split(splitArr)(1))
            Dim documentName As String = prntJob.Properties("Document").Value.ToString()
            If (String.Compare(prnterName, printerName, True) = 0) Then
                If (prntJobID = printJobID) Then
                    prntJob.Delete()
                    isActionPerformed = True
                    Exit For
                End If
            End If
        Next
        Return isActionPerformed
    End Function
</code>

dass müsste es jetzt tun.

cu

Tobi
	

Betreff Von Datum

Re: Druckaufträge löschen

Wow, echt cool. Das werd ich gleich mal testen Danke erst mal 

Ralf Ziola 07.12.2005 14:22

Antworten Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!