水晶报表工具栏的问题

[wenhongL]

显示数据正常，但一点击报表上的按钮，没有反应。报表上的数据马上没有！！！

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
If Request("ID") <> "" Then
CrBind(Request("ID"))
End If
End If
End Sub
Sub CrBind(ByVal ID As String)
Dim bll As New Bll.Ship.BLL.Folder.InvoiceMaster
Dim ds As New DataSet
ds = bll.Print(ID)
Dim Cr As New ReportDocument
Dim reportPath As String = Server.MapPath("invoice.rpt")
Cr.Load(reportPath)
Cr.SetDataSource(ds.Tables("ds"))
Me.CrView.ReportSource = Cr
Me.CrView.DataBind()
End Sub

[wenhongL]

顶

[leaohong]

显示报表函数放到！ISPOSTBACK外面

[wenhongL]

谢谢， 回复人：leaohong(无定河) ( 四级(中级)) 信誉：100