I would like to fax a report from paradox with winfax pro. But it always uses the printer settings in Paradox and not from Windows. Can anybody help me that I get the print dialogue box or open winfax automatically if I use print button in Paradox, thank you!? This is the code:
method pushButton(var eventInfo Event)
var
qs String
onderzoeknr String
repI ReportPrintInfo
Rep Report
endVar
onderzoeknr = ""
if vanverr.size() > 0 or totverr.size() > 0 then
if (vanverr.size() > 0) then
onderzoeknr = ">= " + vanverr
endif
if (totverr.size() > 0) then
if (onderzoeknr.size() > 0) then
onderzoeknr = onderzoeknr + ", "
endif
onderzoeknr = onderzoeknr + "<= " + totverr
endif
endif
if (onderzoeknr.size() > 0) then
onderzoeknr = ", " + onderzoeknr
endif
; first create
executeQBEFile("geslverr.qbe", "geslvlst.db")
qs = "Query\n\n" +
"geslvlst.db | verrichtingnr | \n" +
" | _verr " + onderzoeknr + " | \n\n" +
"zoektest.db | onderzoeknr | testgroepnr | testnr | datum | uitslag | getest | \n" +
" | check _verr | check | check | check | check | check only 1 | \n\n" +
"EndQuery"
RepI.querystring = qs
RepI.name = "testrslt" ; naam van report
if (not Rep.print(RepI)) then
errorshow("report error", "verricht")
endif
endmethod