VisualS.Net VB+CR.Net

Problem with  CrystalReports (maybe with me)

MSDN shows example how to work with SetDataSource and  CrystalReportViewer1

Made small prog:
-----------START CODE ----------------------

crReportDocument = New CrystalReport1()

Dim eConnect As OleDbConnection

Dim strConn As String = ConfigurationSettings.AppSettings("String")

Dim strSQL As String

Dim eAdapter As OleDbDataAdapter

Dim eDataset As DataSet

strSQL = "SELECT Keyname," _

& "Fiel1," _

& "Fiel2 " _

& "FROM myTable" _

& "WHERE Keyname = 'A'"

eConnect = New OleDbConnection(strConn)

eAdapter = New OleDbDataAdapter(strSQL, eConnect)

eDataset = New DataSet()

eAdapter.Fill(eDataset, "myTable")

crReportDocument.SetDataSource(eDataset)

Dim objdv As New DataView(eDataset.Tables("WIEstatesList"))

DataGrid1.DataSource = objdv

DataGrid1.DataBind()

CrystalReportViewer1.ReportSource = crReportDocument

-----------------------END CODE -------------------------

Grid on Web forme shows DataSet has only one record but CrystalReportViewer1
shows all records from myTable.

What is problem, how to solve?