Crystal Report - migracion 2003-2005 error al exportar

hola a todos, tengo un problema y no se de donde viene, migre un sitio que tenia en 2003 a 2005 con el asistente, todo me anda bien salvo cuando quiero exportar a pdf, me tira el error :
"Referencia a objeto no establecida como instancia de un objeto"
no toque nada del codigo y en 2003 andaba perfecto
les paso lo que tengo a ver si alguno me dice que puede ser
gracias

Dim rpt As CorresReportes.ReportConsumos
Dim dt As New DataTable

Try
If Me.grdconsumos.Items.Count = 0 Then
Exit Sub
End If

Dim FilePath As String
FilePath = Request.PhysicalApplicationPath + "ReportsConsumos.pdf"
rpt = New CorresReportes.ReportConsumos
Dim dfdoCustomers As New CrystalDecisions.Shared.DiskFileDestinationOptions
dt = DirectCast(Me.ViewState("DT"), DataTable)

rpt.SetDataSource(dt)

rpt.SetParameterValue("FechaD", Me.txtFechaD.Text)
rpt.SetParameterValue("FechaH", Me.txtFechaH.Text)
If Me.grdconsumos.Columns(4).Visible = True Then
rpt.SetParameterValue("Articulos", "Articulo")
Else
rpt.SetParameterValue("Articulos", "")
End If
If Me.grdconsumos.Columns(5).Visible = True Then
rpt.SetParameterValue("Cantidad", "Cantidad")
Else
rpt.SetParameterValue("Cantidad", "")
End If
rpt.SetParameterValue("total", Me.txtTotal.Text)

dfdoCustomers.DiskFileName = FilePath

With rpt
.ExportOptions.ExportDestinationType = CrystalDecisions.Shared.ExportDestinationType.DiskFile
.ExportOptions.ExportFormatType = CrystalDecisions.Shared.ExportFormatType.PortableDocFormat
.ExportOptions.DestinationOptions = dfdoCustomers
.Export()
End With

dfdoCustomers = Nothing

Catch ex As Exception
Me.lblError.Text = "No se pudo generar el reporte."
Me.lblError.Visible = True
GuardarError(ex)
Exit Sub
Finally
If Not rpt Is Nothing Then
rpt.Dispose()
rpt = Nothing
End If
End Try
Response.Redirect("ReportsConsumos.pdf")