CRYSTAL REPORT AVEC L'ASP.NET ( GESTION DES ÉTATS)

Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Imports System.Data.SqlClient
Imports System.Data

'http://www.kobra.ie.ma

Partial Class Default3
    Inherits System.Web.UI.Page
    Public con As New SqlConnection("data source=localhost;integrated Security=SSPI;database=gestion_note")
    Public cmd As SqlCommand
    Public da As SqlDataAdapter
    Public ds As New DataSet

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
       
    End Sub

    Protected Sub CrystalReportViewer1_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles CrystalReportViewer1.Init
       

    End Sub

    Protected Sub CrystalReportViewer1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles CrystalReportViewer1.Load
        Dim f As Integer = Request.QueryString("dd")
        Dim crt As New ReportDocument

        cmd = New SqlCommand("select * from kolchi WHERE code_stagaire=" & f & "", con)
        da = New SqlDataAdapter(cmd)
        da.Fill(ds, "kolchi")
        crt.Load("C:\Documents and Settings\hoummane\Bureau\asp.net (mouhim)\applicaton\gestion_note\CrystalReport.rpt")
        crt.SetDataSource(ds.Tables("kolchi"))
        Me.CrystalReportViewer1.ReportSource = crt
    End Sub
End Class