Vb.net 不接受更新数据

我在

Reportviewer

中有一个

Dataset

绑定，我的

Dataset

有两个参数，在报告中，loud data将以正常方式显示。问题是，当我在新值中传递参数时，

reportviewer

，然后单击search

按钮，
reportviewer
中的上一个数据没有任何更改。表示将不显示较新的搜索数据

这是我的密码：

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 
            mysession() 
            ReportViewer1.ProcessingMode = ProcessingMode.Local 
            Dim rep As LocalReport = ReportViewer1.LocalReport 
            rep.ReportPath = "Leaving Report.rdlc" 
            Dim ds1 As DataSet = GetData() 

            Dim EMpReplt As New ReportDataSource() 
            EMpReplt.Name = "ProlDataSet_Lrepoert" 
            EMpReplt.Value = ds1.Tables("EMPData") 
            rep.DataSources.Add(EMpReplt) 
End sub 

 Private Function GetSalesData() 
        Dim ds As New DataSet 
        Dim sql As String = "select * from laeve where Status='" & DropDownList1.SelectedValue & "' and Agent='" & Session("Agence") & "'" 
            Dim command As New SqlCommand(sql,con) 
            Dim mysqlAdapter As New SqlDataAdapter(command) 
            mysqlAdapter.Fill(ds, "EMPData") 
            mysqlAdapter.Dispose() 
            command.Dispose() 
        End Using 
        Return ds 
    End Function 
 End Sub 


Protected Sub Search_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click 
    ReportViewer1.LocalReport.Refresh() 
End Sub

尝试放置
.IsPostBack

我已经准备好用这种方式在页面中使用ReportViewer1.LocalReport.Refresh（）。Reportviewer没有任何更改，我出错了，数据源没有提供实例名称！如果我更改代码，如果page.ispostBack=False，则------如果结束/it Ok Put未显示任何数据
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 
            mysession() 
   If Not Page.IsPostBack Then
            ReportViewer1.ProcessingMode = ProcessingMode.Local 
            Dim rep As LocalReport = ReportViewer1.LocalReport 
            rep.ReportPath = "Leaving Report.rdlc" 
            Dim ds1 As DataSet = GetData() 

            Dim EMpReplt As New ReportDataSource() 
            EMpReplt.Name = "ProlDataSet_Lrepoert" 
            EMpReplt.Value = ds1.Tables("EMPData") 
            rep.DataSources.Add(EMpReplt) 
     End if
End sub