ACC2000: Como imprimir o valor da propriedade OrigemDosRegistos para todos os relatórios

Traduções de Artigos Traduções de Artigos
Artigo: 210293 - Ver produtos para os quais este artigo se aplica.
Este artigo foi arquivado. Este artigo é oferecido "tal como está" e deixará de ser actualizado.
Moderado: Requer básica macros, codificação e interoperabilidade competências.

Este artigo aplica-se apenas a uma base de dados do Microsoft Access (.mdb).

Expandir tudo | Reduzir tudo

Sumário

Este artigo mostra como criar um procedimento que imprime uma lista de cada relatório numa base de dados e o valor da propriedade OrigemDosRegistos para a janela Immediate.

Mais Informação

A colecção de relatórios é o conjunto de todos os relatórios. Um método para imprimir o valor da propriedade OrigemDosRegistos de cada relatório consiste através de conjunto de documentos de relatório, abra cada um na vista de estrutura e obter o valor da propriedade OrigemDosRegistos . Este artigo apresenta um procedimento que utiliza esse método. Processa automaticamente todos os relatórios definidos na base de dados. Para criar o procedimento, siga estes passos:

atenção : Se seguir os passos neste exemplo, modificará a base de dados de exemplo Adamastor.mdb. Convém cópia de segurança do ficheiro de base de dados Adamastor.mdb e siga estes passos numa cópia da base de dados.

  1. Inicie o Microsoft Access e abra a base de dados de exemplo Adamastor.mdb.
  2. Criar um novo módulo e, em seguida, escreva ou cole o seguinte código de exemplo:
    Sub ListReports()
       Dim db As DAO.Database, doc As Document, con As Container
       Set db = CurrentDb()
       Set con = db.Containers("Reports")
       Application.Echo False
       For Each doc In con.Documents
          Debug.Print "Report Name:", doc.Name
          DoCmd.OpenReport doc.Name, acViewDesign
          Debug.Print "RecordSource:", Reports(doc.Name).RecordSource
          Debug.Print
          DoCmd.Close acReport, doc.Name
       Next
       Application.Echo True
    End Sub
    
    					
  3. Para ver uma lista de relatórios e os valores de propriedade OrigemDosRegistos , escreva a seguinte linha na janela Immediate e prima ENTER:
    ListReports

Propriedades

Artigo: 210293 - Última revisão: 28 de janeiro de 2014 - Revisão: 2.0
A informação contida neste artigo aplica-se a:
  • Microsoft Access 2000 Standard Edition
Palavras-chave: 
kbnosurvey kbarchive kbmt kbhowto kbinfo kbprogramming KB210293 KbMtpt
Tradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine translation ou MT), não tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática? erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 210293

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com