Conversion d'une date en secondes

Question

Bonjour,

Voila, je suis toujours sur mon projet destiné à la supervision de capteurs à distances (pour ceux qui me connaisse un peu à force ) et je rencontre un nouveau problème avec le code suivant, qui me permet de comparer la date à laquelle je reçoit un message avec l'information contenu dans un fichier capteur.

If Val(Format(Now, "yyyyMMddHHmmss"))-Val(sensordata.TStamp) > 3600 Then
 sensordata.cAlive = "N"


TStamp correspond à la dernière date émis par mon capteur (permet de savoir si la pile est basse ou pas), celle-ci est stockée dans un fichier capteur.
Malheuresement ce calcul ne fonctionne pas , étant donné que je ne convertis pas mon format "yyyyMMddHHmmss" en seconde avant de le comparer !

Et ma question est donc  de savoir comment  procéder pour effectuer la conversion d'une date en seconde ?(sans passer par une API, j'évite d'allourdir l'éxécutable)



Merci pour toutes vos réponses !
______________________________________________
Bouhara kamel 
Stagiaire : ESECO SYSTEMS
Web3.0 and Web4.0 appliances for videosurveillance, security and risk protection

0219fouine28 · Answer

salut,
Regarde de ce côté:http://plasserre.developpez.com/cours/vb-net/?page=langage-vb8#LV-AB.

PCPT · Answer

salut,

0219fouine28 -> VB6 :)

Makia42 -> je ne vois pas pourquoi tu cherches à convertir

tu veux faire une soustraction de date, en seconde
utilise juste DATEDIFF, avec le paramètre "s"

++
[hr]

Makia42 · Answer

Bonsoir,

Je vous remercie je vais jeter un coup d'oeil à cette fonction datadiff.
Merci!

Bouhara kamel 
Stagiaire : ESECO SYSTEMS
Web3.0 and Web4.0 appliances for videosurveillance, security and risk protection

Conversion d'une date en secondes

3 réponses

Votre réponse

Discussions similaires