Enviar email com mais de um anexo

[kania 0]

Pessoal estou usando o objCDOSYS, e estou usando o parametro objCDOSYSMail.AddAttachment para anexar arquivos, minha dúvida e´como anexo mais de um arquivo no mesmo email, tendo em vista que eu pego o arquivo de dentro da minha pasta web da seguinte forma

 

arquivoE = path_do_arquivo & nomedoarquivoE & ".txt"

Ai eu chamo no código do email assim

 

objCDOSYSMail.AddAttachment (arquivoE)

Porem se eu fizer assim

 

objCDOSYSMail.AddAttachment (arquivoG&";"&arquivoG)

da o seguinte erro

 

CDO.Message.1 error '8007007b'

The filename, directory name, or volume label syntax is incorrect.

[xanburzum 169]

você coloca-lo dentro de um loop, mas precisa tomar cuidado para naun exceder o limite de tamanho de arquivos enviados pelo server...

[kania 0]

Entendi, porem se eu fizer dentro do loop não vai enviar 2 email's? Eu pensei em enviar um email apenas com os 2 anexos

[jrcardozo 4]

arquivos = "c:\a.txt;c:\b.txt"

arrarquivos = split(arquivos, ";")

for i = 0 to ubound(arrarquivos)

objCDOSYSMail.AddAttachment (arrarquivos(i))

next