Alguém sabe como adicionar dados no Activer Report sem base de dados??

adicionar? c diz assim: num textbox digitar: "OI MUNDO" e acionar o AR e aparecer a frase digitada no textbox? é isso?

Via código que eu quero e vários registros.

varios registros? entao vc tem um BD mais nao quer é vincular ao relatorio é  isso?

c quer passar os registros via codigo, sem vincula-los diretamente no relatorio, certo?

é porque no banco de dados está assim:

 

Na tabela tenho o campo aluno:

Aluno

Eduardo

 

E na tabela Nota tenho:

Matéria     Prova1 Prova2 Média

Português 4,5      6,7      5,6

Matemática 6,7    4,5      5,6

 

 

E eu quero colocar assim

Aluno          Matéria Prova 1 Português Matéria Prova 2 Português

Eduardo       4,5                                6,7 

 

É mais ou menos dessa forma que eu quero colocar mas no Active Report não pega, só vai pegar se eu jogar os dados do jeito que está dessa forma vou ter que organizar via código e jogar no Active Report sem ligar o relatório ao banco de dados.

entao pelo q pude observar vc tem duas tabelas certo? entao no seu programa vc faz uma consulta nas duas tabelas onde numa TABELA tem  os ALUNOS e na outra tem  as MATERIAs e as NOTAS, obtendo assim um Recordset com os dados do ALUNOS, MATERIA E AS NOTAS,  e vc quer mostra isso no relatório, certo? entao vc faz desenha o seu relatorio do jeito q vc quer, e no botao impreimir vc poe o codigo:

 

OBS: no seu relatorio poe um objeto ADO e nomeia ele para ADO...

 

290      With Relatorio

300           .ADO.ConnectionString = CNN_string 'string de conexao do BD
310           .ADO.Recordset = RS 'e a consulta q vc fez  no seu programa com as duas tabelas
320           .FieldALUNO.DataField = "NOME" 'nome do texbox no relatorio e campo da tabela
330           .FieldMATERIA.DataField = "MATERIA" IDEM ACIMA
340           .FieldNOTA.DataField = "NOTA" 'IDEM ACIMA
350           .......
360           ..........
370           .............

380           ...............
390       .Caption = "relatorio de notas do aluno " & RS.FIEDS("aluno").value
410       .Show 1

420    End With

vc ainda pode criar uma tabela com os dados q vc quer e liga-la ao seu relatorio.

 

espero q ajude.............