Annonce
#1 Fri 14 January 2005 16:43
- ROBIN Thomas
- Invité
Mapbasic : date dans variable
Bonjour,
Je souhaiterais par code MapBASIC pouvoir recuperer la date du jour dans
une variable ...
Quelqu'un peut il m'aider?
Merci et bien cordialement
thomas
THOMAS ROBIN
CNASEA GUYANE
Responsable Info / SIG / SGBD
4 rue Louis Blanc
97300 CAYENNE
#2 Fri 14 January 2005 16:43
- Geo Maumet
- Invité
Re: Mapbasic : date dans variable
Bonjour
Dim d_today As Date
d_today = CurDate()
Exemple de la doc mapbasic
Voyer aussi la fonction FormatDate() pour la mise en forme de la date
Salut
Laurent
#3 Fri 14 January 2005 18:58
- Christian Venet
- Invité
Re: Mapbasic : date dans variable
Bonjour,
Ayant eu a resoudre cette question, voici la procedure que j'ai utilisee. Ce
n'est peut etre pas le plus simple mais ca marche.
A+
Christian VENET - DDE 73 - SAUE / GEO
'Date et Heure
'-------------
Dim Temp,Image,Debut,Fin,Heure,Date,JDate,MDate As string
Dim PosHREF,PosALT,Long,Jour,Mois As SmallInt
Heure=Time(24)
Heure=Left(Heure, 5)
Jour=WeekDay(CurDate())
Do Case Jour
Case 1 JDate= Dimanche
Case 2 JDate= Lundi
Case 3 JDate= Mardi
Case 4 JDate= Mercredi
Case 5 JDate= Jeudi
Case 6 JDate= Vendredi
Case 7 JDate= Samedi
End Case
Mois=Month(CurDate())
Do Case Mois
Case 1 MDate= Janvier
Case 2 MDate= Fevrier
Case 3 MDate= Mars
Case 4 MDate= Avril
Case 5 MDate= Mai
Case 6 MDate= Juin
Case 7 MDate= Juillet
Case 8 MDate= Aout
Case 9 MDate= Septembre
Case 10 MDate= Octobre
Case 11 MDate= Novembre
Case 12 MDate= Decembre
End Case
Date=JDate+Day(CurDate())+ +MDate+Year(CurDate())
'Fin date et heure
'-----------------
