i am getting exception error from following codes and not able to run cyrstal report i am using cyrstal report 8.5 with vs2005

Dim CaseRpt As New Crystal.CrystalReport
CaseRpt.Reset()
CaseRpt.LogOnServer("p2ssql.dll", "YOUSUF", "HospData", "sa", "hosp73")
CaseRpt.ReportFileName = "D:\HIS\FrontOffice\PtnMstSample.rpt"
CaseRpt.SelectionFormula = "{PtnMst.PtnNo}=" & IntPtnNo
CaseRpt.Destination = DestinationConstants.crptToWindow
CaseRpt.WindowState = WindowStateConstants.crptMaximized
CaseRpt.Action = 0