Error 5142 Printing

4.20, 4.30, 4.40 Symptoms When attempting to print a Guard1 Plus report you receive the following error: 5142:Windows cannot print due to a problem with the current printer setup Print Preview works normally. Cause The system default printer is unavailable Problems with the printer driver, Registry entries or other printer files Resolution Verify that the system default printer is online and functional. Refer to Microsoft KBarticle 329845 for more information about this error. Set a different printer as the system default. Close and reopen Guard1 Plus and try to print the report again. Copyright © 2013 TimeKeeping Systems, Inc. Open topic with navigation

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. Results 1 to 3 of 3 Thread: Printing file in Acrobat Distiller Tweet Thread Tools Show Printable Version Subscribe to this Thread… Display Linear Mode Switch to Hybrid Mode Switch to Threaded Mode https://www.guard1.com/Support/KB/Content/Errors/5142-Windows-cannot-print-due-to-a-problem-with-the-current-printer-setup.htm Jun 21st, 2001,05:43 PM #1 rowena View Profile View Forum Posts Thread Starter Member Join Date May 2000 Location NY Posts 47 Printing file in Acrobat Distiller Hi. Have you encounter this error message when you try to print your document in Acrobat Distiller in VB6 using the "Word.Application" library and "Printout" function? Run-time error '5142' Windows cannot print due http://www.vbforums.com/showthread.php?84476-Printing-file-in-Acrobat-Distiller to a problem with the current printer setup. Try one or more of the following: *Check the printer by printing a test page from Windows *Make sure printer is turned on and online. *Reinstall the printer driver. I already did the 3 choices. I already uninstall and reinstall Acrobat for so many times already but I am still getting the same error. I also can print the test page and the printer is online. If anyone knows my problem, kindly help me. Thank you so much! Rowena Reply With Quote Jun 21st, 2001,08:50 PM #2 eer3 View Profile View Forum Posts Addicted Member Join Date Sep 2000 Location Ca Posts 165 rowena, I hate to see your question go unanswered, but it's a little confusing. Maybe you could clarify a few things and someone will be able to help. You said that you "try to print your document in Acrobat Distiller in VB6", but you also said that you're using the "Word.Application" library. I've used Distiller, and I've used the "Word.Application" library, but I'm not sure how you're usin

the following code together from a little research: Dim AppWord As http://www.actuarialoutpost.com/actuarial_discussion_forum/archive/index.php/t-189418.html Word.Application Set AppWord = CreateObject("Word.Application.8") AppWord.Visible = True Set mydoc = Documents.Open(Filename:="file_path", ReadOnly:=True) Application.ActivePrinter = "printer" With AppWord .ActiveDocument.PrintOut Background:=False .Quit SaveChanges:=False End With Set AppWord = Nothing It keeps choking at the print stage ".ActiveDocument.PrintOut Background:=False" with the following error: Run-time error '5142': Windows cannot print due to error 5142 a problem with the current printer setup. Prior to this point in the code it has printed an Excel tab to this printer. Does anyone have any ideas what is happening or how to fix it? Rick_G04-03-2010, 09:59 AMI got your code to work, but I had to make a error 5142 printing few changes: I always use "Option Explicit", which helps avoid simple typos in variable names. I made the new document (mydoc) belong to the AppWord instance. If you already have Word open, then changes to AppWord would not affect the new document. I had to use the MsgBox to get the correct "name" for the printer. Then I commented that line out. I also modify the active printer that belongs to the AppWord instance. Your code was modifying the Excel printer definition. Option Explicit Dim AppWord As Word.Application Set AppWord = CreateObject("Word.Application.8") AppWord.Visible = True Dim mydoc As Word.Document Set mydoc = AppWord.Documents.Open(Filename:="E:\Data\junk.doc", ReadOnly:=True) 'MsgBox "active printer", , Application.ActivePrinter AppWord.ActivePrinter = "HP 4300 PS no duplex on NE05:" With AppWord .ActiveDocument.PrintOut Background:=False .Quit SaveChanges:=False End With Set AppWord = Nothing Kenny04-03-2010, 11:31 AMThanks for the help Rick. It compiles now. Word opens and closes, but it doe