listar produtos

[sp38 0]

Estou enviando atraves de um script de email CDO a compra de um usuario do siteOs itens que vao para o email do dono do site sobre o comprador sao os dados pessoais e sua compra.O problema é que ha varias compra quando o email é enviado so vai um item.exemplo:na variavel:produtos = dadoscompras.Fields.Item("Produto").ValueNa hora do envio:Msg = Msg&"Produtos: "&produtos&"<br>"no script CDOobjCDOSYSMail.HTMLBody = MsgEsta funcionando corretamente,mas ao chegar no email chega apenas um produto listado.Utilizando o for ou o for each sera que funciona?como proceder?grato a todos

[Amigo_zz 0]

Estou enviando atraves de um script de email CDO a compra de um usuario do siteOs itens que vao para o email do dono do site sobre o comprador sao os dados pessoais e sua compra.O problema é que ha varias compra quando o email é enviado so vai um item.exemplo:na variavel:produtos = dadoscompras.Fields.Item("Produto").ValueNa hora do envio:Msg = Msg&"Produtos: "&produtos&"<br>"no script CDOobjCDOSYSMail.HTMLBody = MsgEsta funcionando corretamente,mas ao chegar no email chega apenas um produto listado.Utilizando o for ou o for each sera que funciona?como proceder?grato a todos

Tens de percorrer os produtos todos...while not dadoscompra.eof produtos=produtos & dadoscompras.Fields.Item("Produto").Value dadoscompra.movenextwendtesta.Cumprimentos,Rui Costa