asp.net 水晶报表 参数 vb.net

为什么我的参数没有起到作用？
 每次出来的都是全部数据？
 请帮忙，谢谢

=================================================

Private Sub test()


        SqlStr = "SELECT * FROM D_Cass_Time_Fact "

        Dim dsDataSet As New Dataset1
 
        Dim objCon As New SqlConnection _
                     (ConfigurationSettings.AppSettings("strWebCon1"))
        objCon.Open()

        Dim objSqlCmd As New SqlDataAdapter(SqlStr, objCon)

        objSqlCmd.Fill(dsDataSet, "D_Cass_Time_Fact")

        Dim ListPDF As New CrystalReport1

        ListPDF.SetDataSource(dsDataSet)

        //此处设置参数名为out1,CrystalReport1在参数字段处也建一个明为out1的参数
         ListPDF.SetParameterValue("out1", Trim(Me.Drop_Koutei.SelectedItem.Text))


        Dim outStream As Stream = ListPDF.ExportToStream(CrystalDecisions.[Shared].ExportFormatType.PortableDocFormat)
        Dim buf(outStream.Length) As Byte

        outStream.Read(buf, 0, outStream.Length)
        outStream.Close()

        Response.ContentType = "application/pdf"
        Response.AddHeader("Content-disposition", "attachment;filename=D-Cass070LIST.pdf")
        Response.BinaryWrite(buf)
        Response.End()

        objCon.Close()

    End Sub --------------------编程问答-------------------- 学习+友情UP

--------------------编程问答-------------------- 不会,帮顶

补充：.NET技术 ,  图表区