Ver Mensaje Individual
  #5 (permalink)  
Antiguo 12/11/2004, 11:12
Avatar de Myakire
Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses
Puntos: 146
Los lenguajes que estan soportados por tu navegador estan separados por las comas.
Puedes comprobarlo corriendo este código:

Código:
<% 
vecIdiomas=split (Request.ServerVariables("HTTP_ACCEPT_LANGUAGE"),",")   

response.write("Idiomas que estan definidos en el navegador:<BR>")  
for i=0 to ubound(vecIdiomas) 
 if Instr(vecIdiomas(i),";") then  
  vecIdiomas(i)=Mid(vecIdiomas(i), 1,Instr(vecIdiomas(i),";")-1) 
  end if 
  BuscaDescripcion(vecIdiomas(i))
next 


Sub BuscaDescripcion(idioma) 
Select Case Trim(idioma)  
Case "af" 
  Response.write("Afrikaans") 
Case "sq" 
  Response.write("Albanian") 
Case "eu" 
  Response.write("Basque") 
Case "bg" 
  Response.write("Bulgarian") 
Case "be" 
  Response.write("Byelorussian") 
Case "ca" 
  Response.write("Catalan") 
Case "zh" 
  Response.write("Chinese") 
Case "zh-cn" 
  Response.write("Chinese/China") 
Case "zh-tw" 
  Response.write("Chinese/Taiwan") 
Case "zh-hk" 
  Response.write("Chinese/Hong Kong") 
Case "zh-sg" 
  Response.write("Chinese/singapore") 
Case "hr" 
  Response.write("Croatian") 
Case "cs" 
  Response.write("Czech") 
Case "da" 
  Response.write("Danish") 
Case "nl" 
  Response.write("Dutch") 
Case "nl-be" 
  Response.write("Dutch/Belgium") 
Case "en" 
  Response.write("English") 
Case "en-gb" 
  Response.write("English/United Kingdom") 
Case "en-us" 
  Response.write("English/United Satates") 
Case "en-au" 
  Response.write("English/Australian") 
Case "en-ca" 
  Response.write("English/Canada") 
Case "en-nz" 
  Response.write("English/New Zealand") 
Case "en-ie" 
  Response.write("English/Ireland") 
Case "en-za" 
  Response.write("English/South Africa") 
Case "en-jm" 
  Response.write("English/Jamaica") 
Case "en-bz" 
  Response.write("English/Belize") 
Case "en-tt" 
  Response.write("English/Trinidad") 
Case "et" 
  Response.write("Estonian") 
Case "fo" 
  Response.write("Faeroese") 
Case "fa" 
  Response.write("Farsi") 
Case "fi" 
  Response.write("Finnish") 
Case "fr" 
  Response.write("French") 
Case "fr-be" 
  Response.write("French/Belgium") 
Case "fr-fr" 
  Response.write("French/France") 
Case "fr-ch" 
  Response.write("French/Switzerland") 
Case "fr-ca" 
  Response.write("French/Canada") 
Case "fr-lu" 
  Response.write("French/Luxembourg") 
Case "gd" 
  Response.write("Gaelic") 
Case "gl" 
  Response.write("Galician") 
Case "de" 
  Response.write("German") 
Case "de-at" 
  Response.write("German/Austria") 
Case "de-de" 
  Response.write("German/Germany") 
Case "de-ch" 
  Response.write("German/Switzerland") 
Case "de-lu" 
  Response.write("German/Luxembourg") 
Case "de-li" 
  Response.write("German/Liechtenstein") 
Case "el" 
  Response.write("Greek") 
Case "hi" 
  Response.write("Hindi") 
Case "hu" 
  Response.write("Hungarian") 
Case "is" 
  Response.write("Icelandic") 
Case "id" 
  Response.write("Indonesian") 
Case "in" 
  Response.write("Indonesian") 
Case "ga" 
  Response.write("Irish") 
Case "it" 
  Response.write("Italian") 
Case "it-ch" 
  Response.write("Italian/ Switzerland") 
Case "ja" 
  Response.write("Japanese") 
Case "ko" 
  Response.write("Korean") 
Case "lv" 
  Response.write("Latvian") 
Case "lt" 
  Response.write("Lithuanian") 
Case "mk" 
  Response.write("Macedonian") 
Case "ms" 
  Response.write("Malaysian") 
Case "mt" 
  Response.write("Maltese") 
Case "no" 
  Response.write("Norwegian") 
Case "pl" 
  Response.write("Polish") 
Case "pt" 
  Response.write("Portuguese") 
Case "pt-br" 
  Response.write("Portuguese/Brazil") 
Case "rm" 
  Response.write("Rhaeto-Romanic") 
Case "ro" 
  Response.write("Romanian") 
Case "ro-mo" 
  Response.write("Romanian/Moldavia") 
Case "ru" 
  Response.write("Russian") 
Case "ru-mo" 
  Response.write("Russian /Moldavia") 
Case "gd" 
  Response.write("Scots Gaelic") 
Case "sr" 
  Response.write("Serbian") 
Case "sk" 
  Response.write("Slovack") 
Case "sl" 
  Response.write("Slovenian") 
Case "sb" 
  Response.write("Sorbian") 
Case "es" 
  Response.write("Español") 
Case "es-do" 
  Response.write("Español") 
Case "es-ar" 
  Response.write("Español/Argentina") 
Case "es-co" 
  Response.write("Español/Colombia") 
Case "es-mx" 
  Response.write("Español/Mexico") 
Case "es-es" 
  Response.write("Español/Spain") 
Case "es-gt" 
  Response.write("Español/Guatemala") 
Case "es-cr" 
  Response.write("Español/Costa Rica") 
Case "es-pa" 
  Response.write("Español/Panama") 
Case "es-ve" 
  Response.write("Español/Venezuela") 
Case "es-pe" 
  Response.write("Español/Peru") 
Case "es-ec" 
  Response.write("Español/Ecuador") 
Case "es-cl" 
  Response.write("Español/Chile") 
Case "es-uy" 
  Response.write("Español/Uruguay") 
Case "es-py" 
  Response.write("Español/Paraguay") 
Case "es-bo" 
  Response.write("Español/Bolivia") 
Case "es-sv" 
  Response.write("Español/El salvador") 
Case "es-hn" 
  Response.write("Español/Honduras") 
Case "es-ni" 
  Response.write("Español/Nicaragua") 
Case "es-pr" 
  Response.write("Español/Puerto Rico") 
Case "sx" 
  Response.write("Sutu") 
Case "sv" 
  Response.write("Swedish") 
Case "sv-fi" 
  Response.write("Swedish/Findland") 
Case "ts" 
  Response.write("Thai") 
Case "tn" 
  Response.write("Tswana") 
Case "tr" 
  Response.write("Turkish") 
Case "uk" 
  Response.write("Ukrainian") 
Case "ur" 
  Response.write("Urdu") 
Case "vi" 
  Response.write("Vietnamese") 
Case "xh" 
  Response.write("Xshosa") 
Case "ji" 
  Response.write("Yiddish") 
Case "zu" 
  Response.write("Zulu") 
Case Else  
  Response.write (Languagetowrite & ": Language not identify") 
End Select 
Response.Write "<br>"
End Sub 
%>
En Internet hay varias páginas con la lista completa de claves/País


Saludos

Última edición por Myakire; 12/11/2004 a las 11:14