DataReport

[Alex Lugon]

Ola Pessoal, estou tendo um grande problema estou desenvolvendo um sistema e preciso imprimir um relatorio, porem os dados não estao em um Banco de dado.

tenho os dados em variaveis tipo

Nome = "Alex da Silva Lugon"

Idade = "27"

Telefone = "2121-2121"

Tipo o relatio vai conter apenas isso as especificasoes de apenas uma pessoa.

Como utilizo o DataReport para fazer essa impressao?

Desde já Muito obrigado.

[Macêdo]

Crie um Recordset e jogue o valor das variaveis neste recordset, depois mande para o datareport.

Dim rs As New ADODB.Recordset

rs.Fields.Append "Idade", adDouble, 5

rs.Fields.Append "Nome", adVarChar, 50

rs.Fields.Append "Telefone", adVarChar, 50

rs.Open

rs.AddNew

rs(0) = Idade

rs(1) = Nome

rs(2) = Telefone

With datareport1

Set .DataSource = rs

.DataMember = ""

.Refresh

.Show

End With