[VB] format date

format date [VB] - Programmation

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...

Reply

Marsh Posté le 20-04-2001 à 11:14:07   

Reply

Marsh Posté le 20-04-2001 à 11:16:59    

Fonction IsDate

Reply

Marsh Posté le 20-04-2001 à 11:22:35    

ca pit paraitre tout con, mais j'ai pas trouve ca sur MSDN.. merci bien

Reply

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

Reply

Marsh Posté le 20-04-2001 à 13:59:08    

Ca apporte koi par rapport a la fonction isdate??

Reply

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]

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed