[k_medhat]

والله كثر خيرك.... جربت فكرتك بس برده مفيش فايدة
في حالتي الليست بوكس عناصه متغيرة
وده الكود اللي حاولت فيه اجرب فكرتك

كود :

Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       If IsPostBack Then
           Dim i As Integer
           For i = 0 To ListBox2.Items.Count - 1
           ObjectDataSource1.SelectParameters("HSort").DefaultValue = ListBox2.Items(i).ToString()
 Next
           ObjectDataSource1.DataBind()
           ReportViewer1.LocalReport.Refresh()

       End If
   End Sub

لو في اي خطأ ياريت تفيدوني