Message "Une instance de source de données manque pour la source de données 'DataSet1'." avec ReportViewer

Bonjour,

Je commence tout juste les rapports avec Visual Studio 2012 en utilisant ReportViewer.
J'essaye d'affecter via le code une requete pour remplir ma table.
A l'affichage j'ai le message :
"Une instance de source de données manque pour la source de données 'DataSet1'."

Quelqu'un pourrais m'aiguiller ?

Merci par avance


Public Sub DDL_Site_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DDL_Site.SelectedIndexChanged

If DDL_Site.SelectedValue <> "-- Selection --" Then
RV1.Visible = True
RV1.LocalReport.DataSources.Clear()
RV1.ProcessingMode = ProcessingMode.Local

Dim DT As Data.DataTable
Dim DS As New DataSet("Dataset1")
Dim Site As String = "'" & DDL_Site.SelectedValue & "'"
Dim localReport As LocalReport
Dim sql As String = ""
LocalReport = RV1.LocalReport

sql = "MaRequeteSQL"

AffecteTable(sql, Site, DS)

Dim RdS As New ReportDataSource()

For Each DT In DS.Tables
RdS.DataSourceId = "ObjectDataSource1"
RdS.Name = "ObjectDataSource1"
rds.Value = DT
RV1.LocalReport.DataSources.Add(RdS)
Next

Else
RV1.Visible = False

End If
RV1.LocalReport.Refresh()

End Sub


Public Sub AffecteTable(ByVal ReqSql As String, ByVal Site As String, ByRef DS As DataSet)

Dim Mycommand As New OleDbCommand(ReqSql, MyConnexion)
Dim Penibilite_Femme_Adapter As New OleDbDataAdapter(Mycommand)

My_Adapter.Fill(DS, "Ma_TABLE")

End Sub