VB6 EMAIL LISTBOX
Boa Tarde amigos.
Tenho uma aplicação que envia e-mail até ai tudo certo, porém o conteúdo deste email deve ser uma listbox contendo varios itens , porém ele so envia um item
da list box, ja tentei fazer um for next mas mesmo assim ele sop pega um item exemplo:
For x = 0 To List1.ListCount - 1
mail.body = List1.List(x)
Next x
So pega o primeiro item e não todos .
Agradeço desde já
Tenho uma aplicação que envia e-mail até ai tudo certo, porém o conteúdo deste email deve ser uma listbox contendo varios itens , porém ele so envia um item
da list box, ja tentei fazer um for next mas mesmo assim ele sop pega um item exemplo:
For x = 0 To List1.ListCount - 1
mail.body = List1.List(x)
Next x
So pega o primeiro item e não todos .
Agradeço desde já
Dim corpo As String
For x = 0 To List1.ListCount - 1
corpo = corpo & List1.List(x) & Chr(10)
Next x
mail.body = corpo
Obrigado Amigo, deu certo !
encerra o tópÃco brother!!
Tópico encerrado , respostas não são mais permitidas