The simple function is below. the logic worked perfectly in com version 5 but I am getting an error of "Object doesn't support this property or method". Its the gdviewer1.print line which is throwing the error.
Our development system is Windows 7 64bit, using Microsoft Access 2010, running the newest version of gdpicture. The function is below:
Code: Select all
Private Sub print_one_Click() On Error GoTo Handler_Err If Print_cancel = False Then 'ok to use viewer to print If GdViewer1.PrintSetActivePrinter(Application.Printer.DeviceName) Then Me!xresponse.Caption = "" GdViewer1.PrintSetFromToPage GdViewer1.CurrentPage, GdViewer1.CurrentPage GdViewer1.Print Else Me!xresponse.Caption = "Unable to set printer" End If End If Handler_Exit: Exit Sub
Call err_log_entry(Err.Number, Err.Description, "image pop print 1")