Afficher la date en francais sur un serveur étranger

Contenu du snippet

Afficher une date est pourtant une opération simple, mais quand on veut mettre le nom du jour (samedi par exemple) ca devient parfois moins facile, car nos sites ne sont parfois hebergés sur des serveurs francais, ce qui nous met souvent une date dans une autre langue, ce qui est pas cool pour un site francais

Donc voici comment faire pour mettre une date en francais sur n'importe quelle serveur du moment que la pris en charge de cette langue à été installé

Pour le premier parametre de Tostrging D retourne la date au format complet par exemple samedi 13 mars 2004

Voici quelques autres parametre possible (dsl j'ai trouvé la doc qu'en anglais)
'FORMAT en-US EXAMPLE
'CHAR VALUE OF ASSOCIATED PROPERTY, IF ANY
'
' d 1/3/2002
' M/d/yyyy (ShortDatePattern)
'
' D Thursday, January 03, 2002
' dddd, MMMM dd, yyyy (LongDatePattern)
'
' f Thursday, January 03, 2002 12:00 AM
'
' F Thursday, January 03, 2002 12:00:00 AM
' dddd, MMMM dd, yyyy h:mm:ss tt (FullDateTimePattern)
'
' g 1/3/2002 12:00 AM
'
' G 1/3/2002 12:00:00 AM
'
' m January 03
' MMMM dd (MonthDayPattern)
'
' M January 03
' MMMM dd (MonthDayPattern)
'
' r Thu, 03 Jan 2002 00:00:00 GMT
' ddd, dd MMM yyyy HH':'mm':'ss 'GMT' (RFC1123Pattern)
'
' R Thu, 03 Jan 2002 00:00:00 GMT
' ddd, dd MMM yyyy HH':'mm':'ss 'GMT' (RFC1123Pattern)
'
' s 2002-01-03T00:00:00
' yyyy'-'MM'-'dd'T'HH':'mm':'ss (SortableDateTimePattern)
'
' t 12:00 AM
' h:mm tt (ShortTimePattern)
'
' T 12:00:00 AM
' h:mm:ss tt (LongTimePattern)
'
' u 2002-01-03 00:00:00Z
' yyyy'-'MM'-'dd HH':'mm':'ss'Z' (UniversalSortableDateTimePattern)
'
' U Thursday, January 03, 2002 8:00:00 AM
'
' y January, 2002
' MMMM, yyyy (YearMonthPattern)
'
' Y January, 2002
' MMMM, yyyy (YearMonthPattern)
'

Mis à jour :

Domilo m'a montré comment mettre la date dans la langue du client j'ai mis le code

Merci Domilo

Source / Exemple :


'-------- En francais
Imports System.Globalization

Dim dtfFrance As DateTimeFormatInfo
Dim ci As New CultureInfo("fr-FR")
dtfFrance = ci.DateTimeFormat
LabelDate.Text = Now.ToString("D", dtfFrance)

'----------Langue du client

'Dans Global.asax.vb...

Public Class Global
    Inherits System.Web.HttpApplication

(...)

   Private Sub Global_BeginRequest(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.BeginRequest

      System.Threading.Thread.CurrentThread.CurrentCulture = _
               System.Globalization.CultureInfo.CreateSpecificCulture(Request.UserLanguages(0))
      System.Threading.Thread.CurrentThread.CurrentUICulture = _
               New System.Globalization.CultureInfo(Request.UserLanguages(0))
     
   End Sub

(...)

End Class

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.