<% if session("DEFAULTLANGUAGE") = "English" then lang="spanish" oldlang="english" end if if session("DEFAULTLANGUAGE") = "Español" then lang="english" oldlang="spanish" end if filename = Request.ServerVariables("SCRIPT_NAME") 'response.write ("
script_name: " & filename & "
oldlang: " & oldlang & "
lang: " & lang) newfilename = changelang(filename, oldlang) 'response.write ("
" & newfilename) newfilename = "/" & lang & "/" & newfilename ' response.write ("
" & lang & "
" & filename & "
" & newfilename) Set fs = CreateObject("Scripting.FileSystemObject") if fs.FileExists(Server.MapPath (newfilename)) then response.write("
") if session("DEFAULTLANGUAGE") = "Español" then response.write("English
") else response.write("Español") end if end if 'response.write("variables - testing temporary... Jimmy
")
'for each thing in request.servervariables
' response.write(thing & ":" & request.servervariables(thing) & "
")
'next
%>
(915) 845-5950, FAX (915) 845-4361, General e-mail / correo general:
mail@fep.paho.org
Web comments / comentarios para la página electrónica:
webmaster@fep.paho.org
U.S. - Mexico Border
Field Office of the
Pan
American Health Organization,
Regional Office of the
World Health Organization.
Oficina de Campo de la
Frontera México - Estados Unidos de la
Organización Panamericana de la Salud,
Oficina Regional de la
Organización Mundial de la Salud.