[معاند الحظ]

اخي الكريم
هذا الكود يجد المسار مهما تغير اتمنى يكون هو الحل واتمنى اكون مافهمت سؤالك غلط

كود :

Dim path As String = My.Application.Info.DirectoryPath & "\Report\ReportName.rpt"
CrystalReportViewer1.ReportSource = path

او استخدم التالي

كود :

Environment.CurrentDirector