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
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.