Работа с UserDataset

Mandor

Никак не пойму, как работать с UserDataSet в VB.NET.
Делаю все, как в примерах - данных нет.
Вот пример кода, подскажите, что я делаю не так?

Mandor

Вот вызов построения отчета:

   Public Sub ShowReport()
        Dim mReportParam As Collection
        Dim rsTmp As ADODB.Recordset

        mReportParam = New Collection
        mReportParam.Add(VB6.Format(Today, "dd.mm.yyyy"), "dRepDate")
        mReportParam.Add(sUserName, "dRepPerson")

        rsTmp = New ADODB.Recordset
        gSqlServerTemp.SQLSelect("select * from " & mTblSwerka, rsTmp)

        gReports.DataFields = _
            "nnsch" + Environment.NewLine + _
            "atr_name" + Environment.NewLine + _
            "sql_val" + Environment.NewLine + _
            "fox_val" + Environment.NewLine + _
            "direct" + Environment.NewLine
        gReports.CreateReport(1, mReportParam, rsTmp)

        rsTmp.Close()
        rsTmp = Nothing

        mReportParam = Nothing
    End Sub