Hi Rajesh,

Try using the Crystal OCX control and send its output to a window:

...
loCR = CREATEOBJECT('Crystal.crystalreport')
loCR.DESTINATION = 0  && Controls output: 0 preview window; 1 printer
loCR.WINDOWSTATE = 2  && Maximize preview window
loCR.COPIESTOPRINTER = 1
lnResult = loCR.PRINTREPORT  && Trigger the report
IF lnResult = 0 THEN
   && Means the report printed out well
ELSE
   && There was trouble ...
ENDIF
RELEASE loCR
...

Note that the OCX we are using here is CRYSTL32.OCX, you need to have it registered in order to get it working.

Hope his helps!