problema con Referencia a objeto no establecida

[Nyd]

buen dia o noche segun la hora que tengan xD, tengo un pequeñisimo problema que me esta vovliendo loca -.- utilizo crystal report XI y visual basic 2005.net, todo parece estar bien no me marca ningun error de sintaxis ni nada por el estilo, sin embargo, al correrlo o abrir la pagina me sale un error, utilizo asp.net

si alguien seria tan amable de decirme cual es el error que estoy cometiendo me sentiria muy agradecida, al correr la pagina me sale el siguiente error...

Referencia a objeto no establecida como instancia de un objeto.

y lo marca en la siguiente linea

Línea 28: 'codigo de conexion con la base de datos
Línea 29: Dim myTables As Tables
Línea 30: myTables = myReportDocument.Database.Tables
Línea 31: For Each myTable As CrystalDecisions.CrystalReports.Engine.Table In myTables
Línea 32: Dim myTableLogonInfo As TableLogOnInfo = myTable.LogOnInfo

mi codigo es el siguiente:

Código:

Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Partial Class _Default
    Inherits System.Web.UI.Page
    Private cilabReport As ReportDocument

    Protected Sub CrystalReportViewer1_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles CrystalReportViewer1.Init
        'direccionar el codigo de conexion a la base de datos

        Dim myConnectionInfo As ConnectionInfo = New ConnectionInfo()
        myConnectionInfo.ServerName = "trabajo"
        myConnectionInfo.DatabaseName = "cilabv3"
        myConnectionInfo.UserID = "sa"
        myConnectionInfo.Password = ""
        SetDBLogonForReport(myConnectionInfo, cilabReport)
        'enlace del crystal
        cilabReport = New ReportDocument()
        Dim reportPath As String = Server.MapPath("Resultados.rpt")
        cilabReport.Load(reportPath)
        CrystalReportViewer1.ReportSource = cilabReport

    End Sub

    Private Sub SetDBLogonForReport(ByVal myConnectionInfo As ConnectionInfo, ByVal myReportDocument As ReportDocument)
        'codigo de conexion con la base de datos
        Dim myTables As Tables
        myTables = myReportDocument.Database.Tables
        For Each myTable As CrystalDecisions.CrystalReports.Engine.Table In myTables
            Dim myTableLogonInfo As TableLogOnInfo = myTable.LogOnInfo
            myTableLogonInfo.ConnectionInfo = myConnectionInfo
            myTable.ApplyLogOnInfo(myTableLogonInfo)
        Next
    End Sub

de antemano, gracias por tomarse la molestia de leer ^^U