يك نفر لطف كند بگويد چگونه مي توانيم مكان پايگاه داده در كريستال ريپورت متغير كرده و يك آدرس ثابت نباشد
مشكل كدهاي زير چي هست؟

Dim CrDBTable As CRAXDRT.DatabaseTable

For Each CrDBTable In crRept.Database.Tables
CrDBTable.Location = App.Path & "\Test.mdb"
Next