[VB.NET] Passaggio dinamico variabile a query che crea report

[manuel marzotto]

Ciao
il problema è questo :

sto imparando ora a utilizzare il reportview; ho utilizzato un video presente nell MSDN per imparare ad usarlo (http://msdn.microsoft.com/it-it/vstudio/Bb643819);

Ho creato un dataset, ho disegnato il report e se vado a aprirlo funziona tutto.

Ora cliccando sul tasto stampa che ho creato nel FORM1, si dovrebbe aprire la finestra del FORM2 contenente il reportview, il quale dovrebbe compilare i propri campi estrapolando i dati da un database filtrati secondo una variabile globale impostata dal FORM1
(ovvero SELECT ecc..... WHERE id = variabileglobalepassata)

Non riesco a capire fare o dove sto sbagliando.

[manuel marzotto]

allora ho quasi risolto cercando un po via internet....

questo il codice di caricamento del reportview

Private Sub report_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      

        Dim adapter As New assegnazioniDataSetTableAdapters.ASSEGNAZIONITableAdapter
        Dim table As New assegnazioniDataSet.ASSEGNAZIONIDataTable

        adapter.FillBy(table, s(0))

        Dim ndatasource As New ReportDataSource("ASSEGNAZIONI", table)

        Me.ReportViewer1.LocalReport.DataSources.Add(ndatasource)
        Me.ReportViewer1.LocalReport.Refresh()

        Me.ReportViewer1.RefreshReport()
    End Sub

ALLORA s(0) è la mia variabile GLOBALE.

il problema è in questa riga qui :

Dim ndatasource As New ReportDataSource("ASSEGNAZIONI", table)

l' errore in dichiarazione è :


Overload resolution failed because no accessible 'New' is most specific for these arguments:
'Public Sub New(name As String, dataSourceValue As System.Collections.IEnumerable)': Not most specific.
'Public Sub New(name As String, dataSourceValue As System.Data.DataTable)': Not most specific.

[manuel marzotto]

HO ADATTATO QUELLA RIGA DA C# A VB.

in origine era

reportdatasource newdatasource = new reportdatasource("ASSEGNAZIONI", (DataTable)table);

[ShaleN]

Occhio, che in C# scrivere questo:

(DataTable)table

Equivale a questo codice VB.NET:

Ctype(table, DataTable)

[manuel marzotto]

Grazie della risposta

ho risolto così e non so il perchè

Private Sub report_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'assegnazioniDataSet.ASSEGNAZIONI' table. You can move, or remove it, as needed.

        Dim Params As List(Of Microsoft.Reporting.WinForms.ReportParameter) = _
            New List(Of Microsoft.Reporting.WinForms.ReportParameter)

        Params.Add(New Microsoft.Reporting.WinForms.ReportParameter("id", Val(s(0))))

        ReportViewer1.LocalReport.SetParameters(Params)

        Me.ASSEGNAZIONITableAdapter.FillBy(assegnazioniDataSet.ASSEGNAZIONI, s(0))
        Me.ReportViewer1.RefreshReport()
    End Sub