hi guyz i really need your help...

i made a program and a report here in my pc. it works fine and it print good. but the problem s, when i'm going to install to another computer.. it will not print... i dont know what's the problem... hope u can help me... thanks n advance and God bless

here s my coding:

'at the top of my coding
Option Explicit

Private crystal As CRAXDRT.Application
Private report As CRAXDRT.report

'my code in print button

Set crystal = New CRAXDRT.Application
Set report = crystal.OpenReport(App.Path & "\listreport.rpt")
report.DiscardSavedData
report.PrintOut False
Set crystal = Nothing