|
Amerikaanse notatie van een datum is 2008-01-31 (yyyy-mm-dd) Als je een europese datum notatie om wilt zetten naar amerikaans, bijvoorbeeld als je de datum in MySql op moet slaan, dan kan je onderstaande functie gebruiken. Onthoudt dat je een string terugkrijgt! Als je die weer zou converteren naar een datum met Cdate(date) dan staat het weer in europese notatie. | 01. |
| | 02. |
Function Usdate(ddate As Date) As String
| | 03. |
| | 04. |
| | 05. |
Dim ConvDate As String
| | 06. |
ConvDate = Format(ddate, "yyyy-mm-dd")
| | 07. |
| | 08. |
Usdate = ConvDate
| | 09. |
| | 10. |
End Function
| | 11. |
|
|
