se me ocurre que podrias meter los dos correos en un arreglo
Dim correos(1)
Dim i
correos(0)="
[email protected]"
correos(1)="
[email protected]"
ahora bien metes todo tu codigo de envio de correo en un for
for i=0 to 1
Mailer.AddRecipient "", Correo(i)
Next
<embed src="http://www.autocar.com.mx/images/logo.swf" type="application/x-shockwave-flash" width="468" height="60" play="true" wmode="transparent" menu="false" loop="true">