Crystal Report在Asp.net中導出為PDF有誤？解決立即送分！

Question

Web 上只能导出到服务器端，还要编程发送到客户端……CR 9.2 内置导出功能……
水晶报表 9.2 的下载!(如果是 VS.NET 2003，不要装，有 BUG...)
ftp://211.140.160.74/水晶报表92.iso

Answer 1

大家一起去这个贴子支持一下！！！
http://expert.csdn.net/Expert/TopicView1.asp?id=2291055
ＣＳＤＮ　开个　Ｃｒｙｓｔａｌ　Ｒｅｐｏｒｔ 版吧！！！＆＆＆我与水晶报表……
haibodotnet 海波.NET想了解更多水晶报表的知识和技巧，请到
NET专栏 -> 水晶报表专栏
http://218.56.11.178:8009/
jpyc(九品御厨-进军嵌入式)

Answer 2

传递具体的参数数值……
水晶报表参数编程示例代码（作者：海波.NET，更新：2003-10-21-1）    Imports CrystalDecisions.Shared
    Imports CrystalDecisions.CrystalReports.Engine    Private Const RPT_NAME As String = "CustomerOrders.rpt"
    Private Const PARAMETER_FIELD_NAME As String = "CustomerID"    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        '在此处放置初始化页的用户代码        ' 设置报表源
        report = New ReportDocument()
        report.Load(GetReportPath(RPT_NAME))        ' 设置参数
        crvOrders.ParameterFieldInfo = GetParameterInfo(CType(Session("list"), ListItemCollection))        crvOrders.ReportSource = report        ' 显示报表
        crvOrders.DataBind()    End Sub
    
    '----------------------------------------------------------------
    ' Function GetParameterInfo:
    '   从复选框列表获取参数字段信息
    ' Returns:
    '   参数字段
    ' Parameters:
    '   [in]  list: 复选框列表
    ' Throws:
    '   
    ' PreConditions:
    '   
    '----------------------------------------------------------------
    Private Function GetParameterInfo(ByVal list As ListItemCollection) As ParameterFields        Dim item As ListItem
        Dim isEmpty As Boolean = True
        Dim itemCount As Integer = 0        ' 声明将参数传递给查看器控件所需的变量。
        Dim paramFields As New ParameterFields()
        Dim paramField As New ParameterField()
        Dim discreteVal As New ParameterDiscreteValue()        ' 参数是具有多个值的离散参数。        ' 设置参数字段的名称，它必须和报表中的参数相符。
        paramField.ParameterFieldName = PARAMETER_FIELD_NAME        For Each item In list
            If item.Selected Then
                isEmpty = False
                itemCount += 1                ' 设置一个离散值并将其传递给该参数
                discreteVal.Value = item.Value
                paramField.CurrentValues.Add(discreteVal)
                ' 新建一个离散值
                discreteVal = New ParameterDiscreteValue()
            End If
        Next        If isEmpty Then
            For Each item In list
                ' 设置一个离散值并将其传递给该参数
                discreteVal.Value = item.Value
                paramField.CurrentValues.Add(discreteVal)
                ' 新建一个离散值
                discreteVal = New ParameterDiscreteValue()
            Next
        End If        ' 将该参数添加到参数字段集合。
        paramFields.Add(paramField)
        GetParameterInfo = paramFields    End Function