مشکل با Reportsource

[plato]

من یک فایل ریپورت دارم که این کد رو واسش نوشتم.

مشکل من اینه که زمانی که مقادیر داخل datasource رو عوض می کنم و دوباره صفحه ریپورت رو لود می کنم، مقادیر نمایش داده شده برابر با مقادیر قبلی datasource خواهد بود.
Dim dSrcConn As New DataSourceConnections()
dSrcConn = repOrder.DataSourceConnections
Dim connInfo As IConnectionInfo
connInfo = dSrcConn(0)
connInfo.SetConnection(strAppPath + "CarSupport.mdb", "CarSupport.mdb", False)
//------------------------------------------
Dim adapterSearch As New OleDbDataAdapter(strQry, clsPublic.OleDbConn)
Dim dtSetResult As New DataSet()
adapterSearch.Fill(dtSetResult)
repOrder.SetDataSource(dtSetResult)
CrystalReportViewer1.ReportSource = repOrder
repOrder.Refresh()