Ver Mensaje Individual
  #1 (permalink)  
Antiguo 04/04/2006, 13:43
luis_sanz
Usuario baneado!
 
Fecha de Ingreso: septiembre-2004
Mensajes: 40
Antigüedad: 19 años, 7 meses
Puntos: 0
traducir unas lineas d codigo ASP a PHP

Hola amigos

Alguien se anima a traduccirme este codigo asp en php
la verdad que solo tengo dudas en algunas cosas, ya que casi todo son condiciones pero bueno hay pongo todo

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim pais, idioma, pagina

pagina = request.QueryString ("pagina")
idioma = request.QueryString("idioma")

if idioma = "" then
idioma = request.cookies("idioma")
if idioma = "" then
'Detectamos el pais del usuario
pais = Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")
'A partir de los dos primeros caracteres detectamos el idioma
idioma = Left(pais, 2)
end if
else
'si el idioma llega del query escribimos cookie y seguimos
response.cookies("idioma")= idioma
response.cookies("idioma").Expires=Date+365
response.Cookies("idioma").Domain = "dominio.com"
end if

If pagina = "" then
Select Case idioma
Case "es":
server.execute ("/index_es.asp")
response.end()

Case "de":
server.execute ("/index_de.asp")
response.end()

Case Else:
server.execute ("/index_en.asp")
response.end()
End Select
Else
response.redirect (pagina&idioma&".asp")
response.end()
end If
%>

gracias