Problema como Dataset y crystal report 10

[kivurkian]

He descubierto lo que he querido y para quien necesite la misma forma de crear un reporte aca esta mi solucion

Imports System
Imports System.Web
Imports System.Text
Imports System.Data
Imports System.Web.UI
Imports System.Collections
Imports System.Web.Security
Imports System.Configuration
Imports System.Data.SqlClient
Imports System.Web.UI.WebControls
Imports System.Web.UI.HtmlControls
Imports System.Collections.Generic
Imports System.Collections.Specialized
Imports System.Web.UI.WebControls.WebParts
Imports menuser (es el dataset que tengo en mi ensamble)

Imports CrystalDecisions.CrystalReports.Engine
Partial Class modulos_produccion_reportes
Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load


Dim Ndset As New menuser()
Dim dS As New menuserTableAdapters.empleadosTableAdapter()
'Ndset.empleados, representa mi tabla del dataset menuser.
dS.Fill(Ndset.empleados)
Dim custDS As DataSet = New DataSet
custDS = Ndset.Tables.Item("empleados").DataSet

Dim REPORTE1 As New ReportDocument
REPORTE1.Load("Ruta reporte")
REPORTE1.SetDataSource(custDS)
CrystalReportViewer1.ReportSource = REPORTE1