Código PHP:
sub mail_general()
do until rs_mail_empresa.eof%><%
if rs_mail_empresa("mail_general") <>"" then
mail_general_ = rs_mail_empresa("mail_general")
mail_general_ = replace (mail_general_," ", "")
mail_general_= replace (mail_general_,"-","−")
response.write (mail_general_&";")
else
end if
rs_mail_empresa.movenext
loop
response.write("mail_general<br><br>")
end sub
sub mail_gerent()
do until rs_mail_empresa.eof%><%
if rs_mail_empresa("gerent_mail") <>"" then
mail_gerent_ = rs_mail_empresa("gerent_mail")
mail_gerent_ = replace (mail_gerent_," ", "")
mail_gerent_ = replace (mail_gerent_,"-","−")
response.write (mail_gerent_&";")
else
end if
rs_mail_empresa.movenext
loop
response.write("mail_gerent<br><br>")
end sub
sub mail_rrhh()
do until rs_mail_empresa.eof%><%
if rs_mail_empresa("resp_rrhh_mail") <>"" then
mail_rrhh_ = rs_mail_empresa("resp_rrhh_mail")
mail_rrhh_ = replace (mail_rrhh_," ", "")
mail_rrhh_ = replace (mail_rrhh_,"-","−")
response.write (mail_rrhh_&";")
else
end if
rs_mail_empresa.movenext
loop
response.write("mail_rrhh<br><br>")
end sub
sub mail_dep1()
do until rs_mail_empresa.eof%><%
if rs_mail_empresa("resp_dep1_mail") <>"" then
mail_resp1 = rs_mail_empresa("resp_dep1_mail")
mail_resp1 = replace (mail_resp1," ", "")
mail_resp1 = replace (mail_resp1,"-","−")
response.write (mail_resp1&";")
else
end if
rs_mail_empresa.movenext
loop
response.write("mail_dep1<br><br>")
end sub
sub mail_dep2()
do until rs_mail_empresa.eof%><%
if rs_mai2_empresa("resp_dep2_mail") <>"" then
mail_resp2 = rs_mail_empresa("resp_dep2_mail")
mail_resp2 = replace (mail_resp2," ", "")
mail_resp2 = replace (mail_resp2,"-","−")
response.write (mail_resp2&";")
else
end if
rs_mail_empresa.movenext
loop
response.write("mail_dep2<br><br>")
end sub
Código PHP:
<%if mostra_mail = "total" then
mail_general()
mail_gerent()
mail_rrhh()
mail_dep1()
mail_dep2()
elseif mostra_mail = "gerencia" then
mail_gerent()
elseif mostra_mail = "dep_rrhh" then
mail_rrhh()
elseif mostra_mail = "departaments" then
mail_dep1()
mail_dep2()
elseif mostra_mail = "departaments_dep_rrhh" then
mail_rrhh()
mail_dep1()
mail_dep2()
elseif mostra_mail = "general" then
mail_general()
else
end if
%>
alguna ayuda?
gracias
Mode Lineal
