CONVERSION D'UNE DATE/HEURE STANDARD VERS DATE/HEURE CONFORME À LA NORME RFC822

Function DHToRFC822(pDate)

	Dim tblDate(5)
	Dim tblENWeekDayName
	Dim tblENMonthName
	
	If Not IsDate(pDate) Then Exit Function
	
	tblENWeekDayName = Array("Mon","Tue","Wed","Thu","Fri","Sat","Sun")
	tblENMonthName = Array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec")
	
	tblDate(0) = tblENWeekDayName(WeekDay(pDate, 2) - 1) & ","
	If (Len(Day(pDate)) = 1) Then tblDate(1) = "0" & Day(pDate) Else tblDate(1) = Day(pDate)
	tblDate(2) = tblENMonthName(Month(pDate) - 1)
	tblDate(3) = Year(pDate)
	tblDate(4) = TimeValue(pDate)
	tblDate(5) = "+0200"
	
	DHToRFC822 = Join(tblDate, Space(1))
	
	Erase tblDate
	Erase tblENWeekDayName
	Erase tblENMonthName

End Function

• IMODE_DB : VERSION ALLÉGÉ DE ADMIN_DB POUR TERMINAUX IMODE
• ADMINISTRATEUR DE BASE DE DONNÉE À DISTANCE ACCESS V1.3 (+COMPACTDATABASE)
• ADMINISTRATEUR DE BASE DE DONNÉE À DISTANCE MS ACCESS

• CALCUL DE L'AGE D'UNE PERSONNE (ASP VBSCRIPT)
• CONVERSION DE GMT À LOCAL ET DE LOCAL À GMT
• CALENDRIER DYNAMIQUE AVEC JOURS FERIES
• SAISIR DATE FR DANS MYSQL
• DATE AVEC LE DECALAGE HORAIRE,

• LECTEUR DE FLUX RSS OBJET
• UN DATAGRID COMPLET (ADD, UPDATE, DELETE, ...)
• ASP - EXEMPLE SIMPLE DE GÉNÉRATION DE FLUX RSS
• JOUR,DATE,HEURE
• AFFICHER LA DATE ET L'HEURE DANS UN PAGE ASP