Problema ao preencher o relatorio

#1

O relatorio no qual eu estou preenchendo ele faz uma consulta no banco de dados e preenche um campo com base no nome, eu estou conseguindo preencher ele certo mais sempre quando chega uma certa quantidade de linha ele dá esse erro
Erro
Para preencher os campos eu usei esse metodo nesse caso eu to usando o script para preencher cada campo

Set consulta = Application.GetObject("Dados.Consulta1")
Set rec = consulta.GetADORecordset()
set pgdetail = Report.Sections("Detail")
pgdetail.Controls("HoraStamp19").text = rec.Fields.Item("DateStamp").Value
#2

Leonardo,

Tem certeza que o “HorStamp19” é um Campo de Dados (objeto Field)?

Experimenta mover o script para o evento OnFormat.

#3

Sim, eu repeti esse codigo algumas vezes so que ele deu erro na 4 vez que eu coloquei ele tipo tem o horastamp 16,17,18 ai quando eu criei o 19 deu esse erro

#4

Leonardo,

O nome do objeto está correto?

Se não conseguir descobrir pode enviar o PRJ para o meu e-mail.

#5

Pronto o arquivo foi enviado

#6

Sobre o que foi comentado no e-mail ele ta retornando o valor sim como segue na imagem

datestamp
datestamp.PNG297×552 5.09 KB

#7

Bom, vou precisar que envie o banco de dados para reproduzir o problema aqui.

#8

Leonardo,

O erro está ocorrendo na linha abaixo porque o objeto “AguaPeso21” não é um “Field” e portanto não possui a propriedade “text”.

pgdetail.Controls("AguaPeso21").text = rec.Fields.Item("Agua_Peso").Value

Basta deletar o objeto Label e criar um objeto Field com o mesmo nome para corrigir o problema.

#9

Muito obrigado por ter me ajudado nisso agradeço mesmo

1 Like