PREENCHER RPTTEXTBOX VIA CODIGO

GAMISTIK 07/12/2006 19:27:53
#188674
galera... existe uma maneira de preencher um rptTextbox via codigo..??


valew...
USUARIO.EXCLUIDOS 07/12/2006 19:33:48
#188679
Resposta escolhida
Se ele estiver nos detalhes, até tem, mas só se vc for usar um único registro, pq não há como preencher em vários itens, a única forma,sem conexão com bd, é vc criando um recordset virtual, tipo:

Neste exemplo, é apenas uma contagem de 0 a 100
Dim rst As ADODB.RecordSet
Dim i As Integer
Set rst = new ADODB.Recordset

'Adiciona os campos
rst.Field.Append "NUMERO", adInteger
rst.Field.Append "NUM_ITEM", adVarChar, 50

rst.Open
For i = 0 To 100
rst.AddNew
rst("NUMERO") = i
rst("NUM_ITEM") = "Item " & i
rst.Update
Next i
rst.movefirst
Set DataReport1.datasource = rst
DataREport1.Show
Next i


Qualquer dúvida poste...flw
GAMISTIK 07/12/2006 19:39:59
#188681
eu tenho duas tabelas.. tb_venda e tb_vendaProdutos..da tb_venda quero apenas o campo codigo e da tb_vendaProdutos apenas o campo valor_total...se eu fosse usar o dataevironment como eu faria isso...
USUARIO.EXCLUIDOS 07/12/2006 19:48:43
#188686
Cara, com DataEvironment eu não sei, mas com o recordset seria +/- assim:

rst.Open "SELECT VENDA.codigo, SUM(PROD.valor_total) FROM tb_vendaProdutos PROD,  tb_venda VENDA WHERE VENDA.codigo = PROD.cod_venda"
Set DataReport1.datasource = rst
DataREport1.Show


Tente adaptar e qualquer dúvida poste...flw
Tópico encerrado , respostas não são mais permitidas