FILTRO REPORTVIWER ACCESS

DAMASCENO.CESAR 27/08/2015 19:15:44
#450575

tou sem VS aqui, kkk, mas acho que é mais ou menos isso q vc quer

peguei na net, não é meu:

Dim StrPastaRelatorio As String
StrPastaRelatorio = String.Concat(Application.StartupPath.ToString(), [Ô]\Clientes.rdlc[Ô])
StrPastaRelatorio = StrPastaRelatorio.Replace([Ô]bin\Debug\[Ô], [Ô][Ô])
ReportViewer1.LocalReport.ReportPath = StrPastaRelatorio

Dados da Conexao
StrConexao = [Ô]Data Source=SERVIDOR[Ô] & _
[Ô];Persist Security Info=True[Ô] & _
[Ô];Initial Catalog=MEU BANCO[Ô] & _
[Ô];User ID=sa[Ô] & _
[Ô];Password=123[Ô]
StrConn.ConnectionString = StrConexao
StrConn.Open()

String de Consulta
StrSQL = [Ô]Select CodCliente, Nome From Clientes[Ô]

Dim Cmd As New SqlCommand(StrSQL, StrConn)
Dim DReader As SqlDataReader

Converter o DataReader para DataTable
Dim DTable As New DataTable([Ô]Clientes[Ô])
DReader = Cmd.ExecuteReader()
DTable.Load(DReader)
DReader.Close()

Definindo o DataSource do Relatorio
Dim NewReporDataSource As ReportDataSource = New ReportDataSource([Ô]Clientes[Ô], DTable)
ReportViewer1.LocalReport.DataSources.Clear()
ReportViewer1.RefreshReport()

NICKOSOFT 27/08/2015 19:31:30
#450576

veja esse artigo, mostra exatamente como criar um parâmetro a ser passado, no caso vc precisa de 2 parâmetros date o inicio e fim
http://www.macoratti.net/07/10/aspn_rv2.htm

GLEDSON26 30/08/2015 23:01:48
#450730

Valeu Meu grande Amigo NICKOSOFT, Crystal Reports 100mil vezes melhor que o ReportViewer, e é Claro sem os Reader, Usando os Dataset :)
ai sim eihn :) show de bola.