PRINTER JUST STOPS!!!

HI GUYS,

WE JUST DID A NEW INSTALL FOR A CLIENT.
SERVER 2003 WITH 6 DUMB TERMINALS LOGGING ONTO SERVER. THEY HAVE TWO PRINTERS CONNECTED TO THE SERVER VIA USB AND TERMINALS PRINT TO THAT. THEN I HAVE A NETWORKED PRINTER(TCP PORT).
EVERY NOW AND THEN THE PRINTER JUST STOP PRINTING. IT SAYS ERROR PRINTING. AFTER I RESTART THE SERVER ALL WORKS. NO PATTERN. SOMETIMES 2 OF THEM WORK AND SOMETIMES NONE.

I AM GOING MAD. UPDATED DRIVERS. TRIED DIFFERENT ONES. CHECKED FIREWALL. CHECKED CABLES. CHECKED PRINTERS. NO LUCK. AND NO ERRORS IN THE EVENT LOG

PLEASE HELP
LVL 2
Reinert WentzelManaging MemberAsked:
Who is Participating?
 
naushadkhanConnect With a Mentor Commented:
This is because your spooler service stops. I have faced this problem for a long time and finally found the solution to this. Save the following script as clearerrorprint.vbs

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colInstalledPrinters =  objWMIService.ExecQuery _
    ("Select * from Win32_Printer Where PrinterStatus = '1' " _
        & "or PrinterStatus = '2'")

If colInstalledPrinters.Count = 0 Then
    Else
    For Each objPrinter in colInstalledPrinters
        objPrinter.CancelAllJobs()
    Next
End If

Schedule it to run for every 30 min on your Server

Save the following script as restartspooler.vbs

' ReStartService.vbs
' Sample script to Stop or Start a Service
' www.computerperformance.co.uk/
' Created by Guy Thomas December 2005 Version 2.4
' -------------------------------------------------------'
Option Explicit
Dim objWMIService, objItem, objService
Dim colListOfServices, strComputer, strService, intSleep
strComputer = "email-server"

'On Error Resume Next
' NB strService is case sensitive.
strService = " 'Spooler' "
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" _
& strComputer & "\root\cimv2")
Set colListOfServices = objWMIService.ExecQuery _
("Select * from Win32_Service Where Name ="_
& strService & " ")
For Each objService in colListOfServices
WSCript.Sleep intSleep
objService.StartService()
Next
WScript.Quit
' End of Example WMI script to Start / Stop services

And schedule it to run at every 40 mins on your server.

I have did this stuff on my server and now i dont get any issues regarding printing. the first script detects any printer with error and clears the error. And the second script just restrat the spooler service, which keeps your printing running smoothly.
0
 
Mikael JanssonCommented:
Can you give some more info about the print drivers used, print processor used on the print queues.
is "Standard TCP/IP port" used as port for the networked printer.
does the USB connected printers also stop printing with "Error printing"? or is it only the network printer
/ Mikael
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.