Question

I’ve got a desktop application with a listview filled with installed printers on my local computer. This is a simple printer managed, so I want to be able to right click on an item and then delete that particular printer. How can I do this?

Here is how I list the printers

Public Sub listInstalledPrinters()
        Dim i As Integer
        Dim pkInstalledPrinters As String

        For i = 0 To printersettings.InstalledPrinters.Count - 1
            pkInstalledPrinters = PrinterSettings.InstalledPrinters.Item(i)
            listViewLocal.Items.Add(pkInstalledPrinters, nIndex)
        Next

    End Sub

But how can I delete one of them? Is there a built-in way of doing this?

Answer 1

If you query the printers via System.Management.ManagementScope, you can easily delete them using the Delete method of the ManagementObject class.

Dim scope = New ManagementScope(ManagementPath.DefaultPath)
scope.Connect()
Dim printers = New ManagementObjectSearcher(scope, new SelectQuery("select * from Win32_Printer")).[Get]()
For Each printer As ManagementObject In printers
    Dim nameOfPrinter = printer("Name").ToString()

     If nameOfPrinter = "ThePrinterYouWantToDelete" Then
         printer.Delete()
     End If
Next