 |
 | Home | Contact Us | FAQ | Search & Site Map | Link to Us |
 | Sign In | Join | Other 45 Sites in Network |
| HomeDiscussion Groups Database Servers DB2InformixIngresMS SQLOraclePervasive.SQLPostgreSQLProgressSybaseDesktop Databases FileMakerFoxProMS AccessParadoxGeneral General DB TopicsDatabase TheoryRelated Topics Java Development.NET DevelopmentVB DevelopmentMore Topics ... |
Database Forum / FoxPro / Reports and Printing / September 2008How to change the Windows Default Printer
How do you change the windows default printer from within VFP? I can find out what it was using: lcdefaultprt=set("printer",2) How can I change from within VFP programmatically without going through the print dialog? I think this maybe comes under the heading of "A Bad Thing To Do" in principle. IMNSHO the user should be the one to decide and take the appropriate action. In article <e27a89fe-6b25-40da-8107-2a85e106a98d@8g2000hse.googlegroups.com>, > *From:* benjamin <dwight.wilcox@state.mn.us> > *Date:* Fri, 5 Sep 2008 11:59:07 -0700 (PDT) [quoted text clipped - 6 lines] > How can I change from within VFP programmatically without going > through the print dialog? regards, Alan oNet = CreateObject('WScript.Network') oNet.SetDefaultPrinter('\\ServerName\PrinterName') > How do you change the windows default printer from within VFP? > [quoted text clipped - 3 lines] > How can I change from within VFP programmatically without going > through the print dialog? > oNet = CreateObject('WScript.Network') > oNet.SetDefaultPrinter('\\ServerName\PrinterName') [quoted text clipped - 6 lines] > > How can I change from within VFP programmatically without going > > through the print dialog? I was trying to eliminate the Print dialog when the user knows that they want a PDF (most of the time). Instead of changing the system default driver I put in two sections of code, one for VFP reports using: Report form myform to printer NAME (lcprinter_to_use) The other for Word documents: m.wzprinter=loword.activeprinter loword.Application.activeprinter = m.lcprinter_to_use loword.Application.PrintOut() loword.Application.activeprinter = m.wzprinter Thanks for the suggestions. It's a very bad idea. Any application that changed my default printer would very quickly be removed from my system. There are other ways to generate PDF programmatically and without a dialog being displayed.  SignatureCraig Berntson Microsoft MVP ------------- On Sep 6, 7:54 am, "Mike Gagnon" <mikegag...@mcrgsoftware.com> wrote: > oNet = CreateObject('WScript.Network') > oNet.SetDefaultPrinter('\\ServerName\PrinterName') [quoted text clipped - 10 lines] > > How can I change from within VFP programmatically without going > > through the print dialog? I was trying to eliminate the Print dialog when the user knows that they want a PDF (most of the time). Instead of changing the system default driver I put in two sections of code, one for VFP reports using: Report form myform to printer NAME (lcprinter_to_use) The other for Word documents: m.wzprinter=loword.activeprinter loword.Application.activeprinter = m.lcprinter_to_use loword.Application.PrintOut() loword.Application.activeprinter = m.wzprinter Thanks for the suggestions. |
Reply to this Message |
 Sign In
 Join
 My Latest Posts My Monitored Threads My Blog My Photo Gallery My Profile My Homepage Start New Thread Enable EMail Alerts Rate this Thread
|
©2009 Advenet LLC Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.