Dim con As New SqlClient.SqlConnection con.ConnectionString = chaine rdoc = New ReportDocument con.Open() Dim cmd1 As New SqlCommand("ps_billet", con) cmd1.CommandType = CommandType.StoredProcedure Dim da As SqlDataAdapter = New SqlDataAdapter(cmd1) Dim ds As DataTable = New DataTable da.Fill(ds) rdoc.Load("E:\billet.rpt") rdoc.SetDataSource(ds) CrystalReportViewer1.ReportSource = rdoc con.Close()
13 oct. 2015 à 09:42
Alors pourquoi ne pas déclaré "résolu" cette discussion ?
Cordialement
Modifié par cs_mohellebi le 16/10/2015 à 08:27