MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    Alterar Fonte de Registro Relatorio

    lbatalha
    avatar
    lbatalha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 29
    Registrado : 13/02/2014
    • Mensagem nº1

    Alterar Fonte de Registro Relatorio Empty Alterar Fonte de Registro Relatorio

    Mensagem  lbatalha 17/2/2014, 08:38

    Bom Dia!

    Estou desenvolvendo uma aplicação em C# e utilizo relatórios em Access. Tenho 2 consultas a mesma tabela porem com condições diferentes e gostaria de alterar a fonte de registro do meu relatório escolhendo qual consulta irei usar dependendo da opção escolhida pelo usuário na minha aplicação .

    Aguem sabe como altero manualmente essa fonte de registro do meu relatório ?
    • Ir para o topo
    Avelino Sampaio
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010
    • Mensagem nº2

    Alterar Fonte de Registro Relatorio Empty Re: Alterar Fonte de Registro Relatorio

    Mensagem  Avelino Sampaio 17/2/2014, 09:12

    Seja benvindo!

    você pode utilizar o evento "ao abrir" do relatório para determinar qual consulta utilizar.

    Algo assim:

    Private Sub Report_Open(Cancel As Integer)
    if suaCondição Then
       Me.RecordSource = "NomeDaConsulta"
    else
       Me.RecordSource = "NomeDeOutraConsulta"
    end if
    End Sub


    Aguardamos


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    • Ir para o topo
    lbatalha
    avatar
    lbatalha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 29
    Registrado : 13/02/2014
    • Mensagem nº3

    Alterar Fonte de Registro Relatorio Empty Re: Alterar Fonte de Registro Relatorio

    Mensagem  lbatalha 17/2/2014, 11:08

    Private Sub Report_Open(Cancel As Integer)
    If (PassaParametroLC.NCidade Is Null) Then
    Rel_Almoxerifado.RecordSource = "Consulta_RelAlmoxerifado2"
    Else
    Rel_Almoxerifado.RecordSource = "Consulta_RelAlmoxerifado"
    End If

    End Sub

    Fiz dessa forma pq se a minha variavel for nula tem q usar a Consulta_RelAlmoxerifado2 mas quando ocorre isso o relatorio não abre. Só abre se ela não estiver nula.
    • Ir para o topo
    Avelino Sampaio
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010
    • Mensagem nº4

    Alterar Fonte de Registro Relatorio Empty Re: Alterar Fonte de Registro Relatorio

    Mensagem  Avelino Sampaio 17/2/2014, 11:20

    Experimente:

    If isnull(PassaParametroLC.NCidade) Then

    ou

    If len(PassaParametroLC.NCidade & "")=0 Then

    Aguardamos


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    • Ir para o topo
    lbatalha
    avatar
    lbatalha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 29
    Registrado : 13/02/2014
    • Mensagem nº5

    Alterar Fonte de Registro Relatorio Empty Re: Alterar Fonte de Registro Relatorio

    Mensagem  lbatalha 17/2/2014, 11:30

    Não funcionou.

    Tem alguma propriedade que preciso mudar no relatorio?

    Pq está selecionado padão uma consulta. Tem alguma coisa haver?

    • Ir para o topo
    Avelino Sampaio
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010
    • Mensagem nº6

    Alterar Fonte de Registro Relatorio Empty Re: Alterar Fonte de Registro Relatorio

    Mensagem  Avelino Sampaio 17/2/2014, 13:03

    Use o código abaixo:

    Private Sub Report_Open(Cancel As Integer)
    If len(PassaParametroLC.NCidade & "")=0 Then
        msgbox "Variável nula..."
        Rel_Almoxerifado.RecordSource = "Consulta_RelAlmoxerifado2"
    Else
        msgbox "Variável não nula..."
        Rel_Almoxerifado.RecordSource = "Consulta_RelAlmoxerifado"
    End If


    Teste o relatório com as duas condições possíveis para a variável e me diga se carrega as mensagens.

    No aguardo


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    • Ir para o topo
    Conteúdo patrocinado

    Conteúdo patrocinado


    • Mensagem nº7

    Alterar Fonte de Registro Relatorio Empty Re: Alterar Fonte de Registro Relatorio

    Mensagem  Conteúdo patrocinado

    • Ir para o topo
      Data/hora atual: 21/11/2024, 19:35