Tombol Next pada Crystal Report tidak berjalan ASP.Net

Bismillah....

Berawal dari pengalaman pribadi berkutat dalam pemrograman ASP.Net. Menampilkan laporan dengan crystal report cukup mudah tetapi ketika data yang ditampilkan banyak pasti membutuhkan beberapa halaman.
Nah.... ketika data sudah tampil ternyata ketika klik tombol Next hanya berfungsi sampai halaman 2, untuk halaman 3 dan selanjutnya tidak bisa.
Masalahnya :
Anda meletakkan script menampilkan data pada event load.

Solusinya :
Letakkan script menampilkan laporan pada event init.




contoh scriptnya :
koneksi pada web konfiq

Imports System.Data
Imports System.Configuration
Imports System.Web.Configuration
Imports System.Data.SqlClient
Imports CrystalDecisions.CrystalReports.Engine
Public Class Laporan
    Inherits System.Web.UI.Page
    Dim DtReader As SqlDataReader
    Dim DtAdapter As SqlDataAdapter
    Dim Connection As New SqlConnection
    Dim Command As New SqlCommand
    Dim Ds As New DataSet1
    Dim cr As New CrystalReport1
    Sub koneksi()
        Connection.Close()
        Dim ConString As String = WebConfigurationManager.ConnectionStrings("koneksidb").ConnectionString
        Connection = New SqlConnection(ConString)
        Connection.Open()
    End Sub

    Private Sub Laporan_Init(sender As Object, e As EventArgs) Handles Me.Init
        If Not IsPostBack Then
            Call koneksi()
            Command = New SqlCommand("select * from view_history", Connection)
            DtAdapter = New SqlDataAdapter(Command)
            Ds.Tables("view_history").Clear()
            DtAdapter.Fill(Ds, "view_history")
            cr.SetDataSource(Ds.Tables("view_history"))
            CrystalReportViewer1.ReportSource = cr
        Else
            Call koneksi()
            Command = New SqlCommand("select * from view_history", Connection)
            DtAdapter = New SqlDataAdapter(Command)
            Ds.Tables("view_history").Clear()
            DtAdapter.Fill(Ds, "view_history")
            cr.SetDataSource(Ds.Tables("view_history"))
            CrystalReportViewer1.ReportSource = cr
        End If
     
    End Sub
End Class