Ouvrir votre site dans la langue du navigateur du client

Contenu du snippet

Une astuce toute simple qui permet automatiquement d'ouvrir votre site dans la langue du client.

Il faut dans mon exemple, mettre le code dans la page de demarrage (www.monsite.com/fr/default.aspx) à la racine du site www.monsite.com et mettre le site francais dans le sous dossier fr (www.monsite.com/fr/) et l'anglais dans le sous dossier en dans ses sous dossiers il faut bien sur avoir une page qui s'appelle Accueil.aspx

pour Changer la lange du navigateur et ainsi tester le code, dans IE OUtils>Options Internet>Langue
Vous voyez qu'il y a la possibilité de mettre plusieur langue dans un certains ordre

Ainsi avec mon code, si le navigateur est configuré en allemand comme langue principal et anglais comme langue secondaire, il va etre redirigé vers le site en anglais grace au deuxieme bloc select

Request.UserLanguages(0) recupere la premiere langue et
Request.UserLanguages(1) la deuxieme est ainsi de suite ...

Si toutefois, le code ne peut pas rediriger le navigateur, la page s'affichera, il faudra faire une page avec les liens et les navigateurs, (ce qui est grandement conseillé pour les moteurs de recherches ..)

Pour finir, je vous met ici : la liste des principaux EnglishName (non traduit en francais ...) attention à la casse

Czech
Danish
German
Greek
English
Spanish
Finnish
French

Source / Exemple :


Try

            Select Case New CultureInfo(Request.UserLanguages(0)).EnglishName
                Case "French"
                    Response.Redirect("fr/Accueil.aspx")

                Case "English"
                    Response.Redirect("en/Accueil.aspx")

                Case Else

                    Try

                        Select Case New CultureInfo(Request.UserLanguages(1)).EnglishName
                            Case "French"
                                Response.Redirect("fr/Accueil.aspx")

                            Case "English"
                                Response.Redirect("en/Accueil.aspx")
                        End Select

                    Catch ex As Exception
                        'Soit on met rien et il n'y aura 
                        'pas de redirection et c'est à l'utilisateur
                        'de choisir sa langue grace à la page sur lequel est ce script
                        'Soit on redirige
                        'Response.Redirect("fr/Accueil.aspx")
                    End Try

            End Select

        Catch ex As Exception
            'Soit on met rien et il n'y aura 
            'pas de redirection et c'est à l'utilisateur
            'de choisir sa langue grace à la page sur lequel est ce script
            'Soit on redirige
            'Response.Redirect("fr/Accueil.aspx")
        End Try

Conclusion :


Si vous avez des commentaires n'hésitez pas

J'ai rajouté une gestion d'erreur au cas ou l'utilisateur n'aurait pas de langue ou de deuxieme langue par défaut

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.