format date [VB] - Programmation
Marsh Posté le 20-04-2001 à 11:22:35
ca pit paraitre tout con, mais j'ai pas trouve ca sur MSDN.. merci bien
Marsh Posté le 20-04-2001 à 13:27:17
Function est_date(s As String) As Boolean
Dim La_date As Date
On Error Resume Next
If Len(Trim(s & "" )) > 0 Then
La_date = CVDate(s)
If Err <> 0 Then
est_date = False
Else
est_date = True
End If
Else
est_date = False
End If
On Error GoTo 0
End Function
Marsh Posté le 20-04-2001 à 14:03:53
salut
en fait moi j'ai créé une fonction qui gère la saisie car par car !
par ex : à la saise du séparateur, si c'est le premier je teste le nbre de car du jour et je rajoute le '0' devant éventuellement
idem pour le mois
l'anneé je m'en fou
Un problème non résolu :
le nbre de jour maxi en fonction du mois et de l'année !!!
petite solution partielle :
- en enregistrant dans SQL 7, une erreur peut être détectée et donc RESaisie
- si je saisie un mois supérieur à 12, je remarque que SQL7 inverse le moi et l'année automatiquement !!!
si en plus, le jour dépasse 31, alors message d'erreur et RESaisie
Autre solution ?
[edit]--Message édité par Hepil--[/edit]
Marsh Posté le 20-04-2001 à 11:14:07
Question toute con: comment verifier qu'un champ texte est bien au format date, pour s'ssurer que SQLServer ne va pas gueuler, ca lui est au format date...