I am not able to print crystal reports from ASP using the following code(The same works in VB).Can you help me.
<%
Dim objapp
Dim objrep
Dim objprintinfo
Set objapp = CreateObject("crystal.crpe.application"
Set objrep =objapp.openreport("C:\Program Files\Seagate Software\Crystal Reports\rt01.rpt"
Set objprintinfo=objrep.printerinfo
response.write "Port" & objprintinfo.portname
response.write "Driver Name" & objprintinfo.drivername
response.write "PrinterName" & objprintinfo.printername
response.write "okay"
objrep.printout False, , , 1,1
%>
<%
Dim objapp
Dim objrep
Dim objprintinfo
Set objapp = CreateObject("crystal.crpe.application"
Set objrep =objapp.openreport("C:\Program Files\Seagate Software\Crystal Reports\rt01.rpt"
Set objprintinfo=objrep.printerinfo
response.write "Port" & objprintinfo.portname
response.write "Driver Name" & objprintinfo.drivername
response.write "PrinterName" & objprintinfo.printername
response.write "okay"
objrep.printout False, , , 1,1
%>