François Breizh a écrit : > Pour ma part je me suis écrit une fonction : > '************************************************************************** > FormatDate > Function FormatDate(DateFournie As String) As String > '------------------------------------------------------------------------- > > ' Retourne une date au format "AAAA-MM-DD" > ' Le paramètre DateFournie doit correspondre à une date > '------------------------------------------------------------------------- > > Dim Reponse As String > Dim Donnee As Date > > If IsDate (DateFournie) Then > Donnee = CDate(DateFournie) > Reponse = Year(Donnee) & "-" & Month(Donnee) & "-" & Day(Donnee) > Else > Reponse = "0000-00-00" > End If FormatDate = Reponse > End Function > > Merci pour l'aide,
effectivement en relisant la doc sur SQL le format des dates j'aurais pu y arriver, mais je me suis pris la tête toute la journée sur ce programme et là je callais merci Gérard --------------------------------------------------------------------- To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org For additional commands, e-mail: prog-h...@fr.openoffice.org
