VB Script to remove local printer and network printer

Posted on 2009-02-11
Last Modified: 2012-05-06
I need a script that will delete two printers on each workstation. One of the printers is a local printer named PIK 7000. With this, I also need it's associated custom port deleted which is named PIK 0. Also, I need all associated drivers removed. These drivers are primarily located in the below locations:

del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\ka*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\ki*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\ku*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\2\ka*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\2\ki*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\2\ku*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\2\temp\ka*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\2\temp\ki*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\2\temp\ku*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\3\ka*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\3\ki*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\3\ku*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\3\temp\ka*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\3\temp\ki*.*
del /F /Q C:\Windows\System32\Spool\Drivers\W32x86\3\temp\ku*.*
del /F /Q C:\Windows\System32\kaw2kppm.dll
del /F /Q C:\Windows\System32\kuwxppm.dll

** One side note - after deleting the files above, the driver still show up in Printers and Faxes > Server Properties > Drivers.

The other printer I need to be deleted from each workstation (in the same script) is named Plotter PIK 7000. This is a network printer and the UNC path is \\printserver\Plotter PIK 7000.

*** Side note - is there a way to target any associated drivers to be deleted?

Lastly I need the following registry key to be deleted from each workstation in this same script:


Let the battle Begin :)
Question by:Trihimbulus
    1 Comment
    LVL 4

    Accepted Solution

    'remove all local printers

    'change false to true for network printer
    strComputer = "."
    Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
    Set colInstalledPrinters =  objWMIService.ExecQuery _
        ("Select * from Win32_Printer Where Network = FALSE")
    For Each objPrinter in colInstalledPrinters

    Open in new window


    Write Comment

    Please enter a first name

    Please enter a last name

    We will never share this with anyone.

    Featured Post

    Enabling OSINT in Activity Based Intelligence

    Activity based intelligence (ABI) requires access to all available sources of data. Recorded Future allows analysts to observe structured data on the open, deep, and dark web.

    Introduction During my participation as a VBScript contributor at Experts Exchange, one of the most common questions I come across is this: "I have a script that runs against only one computer. How can I make it run against a list of computers in …
    Not long ago I saw a question in the VB Script forum that I thought would not take much time. You can read that question (Question ID  ( Here (http…
    It is a freely distributed piece of software for such tasks as photo retouching, image composition and image authoring. It works on many operating systems, in many languages.
    This video gives you a great overview about bandwidth monitoring with SNMP and WMI with our network monitoring solution PRTG Network Monitor ( If you're looking for how to monitor bandwidth using netflow or packet s…

    779 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    21 Experts available now in Live!

    Get 1:1 Help Now