Dim Rel As CrystalReport1 = New CrystalReport1
Dim DS As New DataSet
Dim strConn As String
strConn = ConfigurationSettings.AppSettings("strConn")
Dim parametros() As SqlParameter = New SqlParameter(1) {}
parametros(0) = New SqlParameter("@CapId", SqlDbType.Int)
parametros(0).Value = 1
parametros(1) = New SqlParameter("@CapHorId", SqlDbType.Int)
parametros(1).Value = 6
DS = SqlHelper.ExecuteDataset(strConn, CommandType.StoredProcedure, "MostrarInscritos", parametros)
Rel.SetDataSource(DS)
CrystalReportViewer1.ReportSource = Rel
CrystalReportViewer1.DataBind()