http://wiki.ecibemet.com/index.php?action=history&feed=atom&title=PdcReport.PrintToPrinter PdcReport.PrintToPrinter - Revision history 2026-05-06T17:19:53Z Revision history for this page on the wiki MediaWiki 1.43.1 http://wiki.ecibemet.com/index.php?title=PdcReport.PrintToPrinter&diff=2307&oldid=prev TC at 06:08, 5 November 2013 2013-11-05T06:08:49Z <p></p> <table style="background-color: #fff; color: #202122;" data-mw="interface"> <col class="diff-marker" /> <col class="diff-content" /> <col class="diff-marker" /> <col class="diff-content" /> <tr class="diff-title" lang="en"> <td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">← Older revision</td> <td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 06:08, 5 November 2013</td> </tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l35">Line 35:</td> <td colspan="2" class="diff-lineno">Line 35:</td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>       objReport.PrintToPrinter 1, strPrinterName</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>       objReport.PrintToPrinter 1, strPrinterName</div></td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>     else</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>     else</div></td></tr> <tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>       msgbox "This is not a correct filter.<del style="font-weight: bold; text-decoration: none;">"</del></div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>       msgbox "This is not a correct filter <ins style="font-weight: bold; text-decoration: none;">| " &amp; objReport</ins>.<ins style="font-weight: bold; text-decoration: none;">ErrorMessage</ins></div></td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>     end if</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>     end if</div></td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>   else</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>   else</div></td></tr> </table> TC http://wiki.ecibemet.com/index.php?title=PdcReport.PrintToPrinter&diff=1292&oldid=prev Mike: Created page with "== Declaration == PrintToPrinter(Copies as long,Printer as String) as Boolean == Description == == Notes == This method prints the reports immediately to the printer. The p..." 2012-05-21T11:53:20Z <p>Created page with &quot;== Declaration == PrintToPrinter(Copies as long,Printer as String) as Boolean == Description == == Notes == This method prints the reports immediately to the printer. The p...&quot;</p> <p><b>New page</b></p><div>== Declaration ==<br /> PrintToPrinter(Copies as long,Printer as String) as Boolean<br /> <br /> == Description ==<br /> <br /> <br /> == Notes ==<br /> This method prints the reports immediately to the printer.<br /> The parameter copies is the number of prints.<br /> With the printername parameter the script can specify a printer.<br /> <br /> == Code example ==<br /> This example code opens a report with ID 336 and print it on the specified printer.<br /> <br /> &lt;source lang=&quot;vb&quot;&gt;<br /> dim objReports<br /> dim objReport<br /> dim objPrinters<br /> dim intCnt<br /> dim strPrinterNames<br /> dim strPrinterName<br /> <br /> set objReports = pdc.Reports<br /> set objPrinters = objReports.PrinterNames<br /> for intCnt = 0 to objPrinters.Count - 1<br /> strPrinterNames = strPrinterNames &amp; objPrinters(intCnt) &amp; vbCrLf<br /> if InStr(UCase(objPrinters(intCnt)), &quot;PARTOFPRINTERNAME&quot;) &gt; 0 then<br /> strPrinterName = objPrinters(intCnt)<br /> end if<br /> next<br /> <br /> if Trim(strPrinterName) &lt;&gt; &quot;&quot; then<br /> set objReport = objReports.Open(336)<br /> if objReport.AddFilter(&quot;DO_CALC&quot;, &quot;DO_ORDNR=&#039;00464&#039;&quot;) then<br /> objReport.PrintToPrinter 1, strPrinterName<br /> else<br /> msgbox &quot;This is not a correct filter.&quot;<br /> end if<br /> else<br /> msgbox strPrinterNames<br /> end if<br /> &lt;/source&gt;<br /> <br /> == Availability ==<br /> Available since February 2011 (from version 4.2).</div> Mike