y por que no lo conviertes a funcion parametrizada, y en ves de IF, utilizar el select case
por ejemplo, tus IF anidados, en select
Código PHP:
for contador = 1 To 3 Step 1
select case contador
case 1
sRecipient = "[email protected]"
sAsunto = "Registro # " & nregistro & " " & NEmpresa & "-" & sNdistrib
cuerpo = "<html><body><strong>Usted acaba de registrar:</strong> <br /><br /> "
cuerpo = cuerpo ....
case 2
sRecipient = correo1
sAsunto = "Oportunidad de Negocio # " & nregistro & " " & NEmpresa
case 3
sRecipient = Email
end select
next
ya que puede ser que no nomas sean 3, a lo mejor 4 o 6... etc, respecto a la funcion, algo asi
Código PHP:
Function SendMails(para,asunto,mensaje)
Set objMail = Server.CreateOBject("JMail.Message")
with objMail
.Logging = true
.silent = true
.From = "Correo-Generado-por-Website@asacom"
.FromName = "Correo generado por Website"
.AddRecipient para
.Subject = asunto
.HTMLBody = mensaje
.Send("usuario")
end with
Set objMail = Nothing
End Function
y lo mandarias llamar cada ves que salga de la evaluacion del SELECT
Código PHP:
for vueltas = 0 to 10 step 1
select case vueltas
case 1
....
case 2
.
.
.
end select
call SendMails(parametro1,parametro2,parametro3)
next
bueno, algo asi seria mas rapido
saludos