Olá Pessoal, Preciso de uma ajuda, Como consigo fazer um relatório em crystal que é gerado a partir de filtros que são definidos em uma Query SQL? Eu carrego o relatório assim: Dim ds As New DataSet() Dim cmd As New OleDb.OleDbCommand(strSql, conn) Dim adaptor As New OleDb.OleDbDataAdapter(cmd) Dim crpt As New CrystalReport1 Dim strReportPath As String adaptor.Fill(ds) strReportPath = String.Concat(Replace(My.Application.Info.DirectoryPath(), "\bin\Debug", ""), "\CrystalReport1.rpt") crpt.Load(strReportPath) conn.Open() crpt.SetDataSource(ds) CrystalReportViewer1.ReportSource = crpt E ao ser gerado ele lista TODOS os dados da Tabela como se não houvesse nenhum Filtro. Fico Aguardando Grato Leonardo