Discussion :

[misscricri]

Bonjour !

J'aimerais savoir comment je pourrais définir une plage horaire pour un employé.
J'ai commencé avec ce bout de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
 Dim dShiftDefaultBegin As DateTime
                dShiftDefaultBegin = New DateTime(Now.Year, Now.Month, Now.Day, 7, 0, 0)
                debut = dShiftDefaultBegin
 
                Dim dShiftDefaultEnd As DateTime
                dShiftDefaultEnd = New DateTime(Now.Year, Now.Month, Now.Day, 15, 30, 0)
                Fin = dShiftDefaultEnd

Merci

[tomlev]

C'est quoi le problème au juste ? Tu as déclaré des dates de début et de fin, qu'est-ce qu'il te faut de plus ?

[misscricri]

ca ne prends pas en compte mes heures

[tomlev]

ca ne prends pas en compte mes heures

Qu'est-ce qui ne prend pas en compte tes heures ?

On est pas devins, si tu ne donnes aucun détail sur le contexte et sur comment tu utilises ces dates, on ne peut pas deviner ce qui ne va pas. Toi ça te semble peut-être évident, mais pour quelqu'un qui ne sait pas ce que tu es en train de faire c'est du charabia...

[misscricri]

Lorsque je définis ma date d'entrée ou de fin pour mon employé, ma variable n'affiche que la date et pas mes heures que j'ai définis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3

dShiftDefaultEnd = New DateTime(Now.Year, Now.Month, Now.Day, 15, 30, 0)

[tomlev]

Ça ne veut rien dire
Une variable n'affiche rien du tout, elle contient une valeur. Comment fais-tu pour l'afficher ?

[misscricri]

je l'a mets dans cette variable

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
 
Dim dShiftDefaultEnd As DateTime = New DateTime(Now.Year, Now.Month, Now.Day, 7, 0, 0)
                xEntree.dEnd = dShiftDefaultEnd

xEntree.dEnd correspond à la date d'entrée de l'employé

[olibara]

Reprenons !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

dShiftDefaultEnd = New DateTime(Now.Year, Now.Month, Now.Day, 15, 30, 0)

En faisant cela, tu cree une variable DateTime ayant pour Date la date du jour et pour heure 15h30

La variable etant créée tu peux l'utiliser de differente manieres.
Il semble que ton problème soit l'affichage de cette date avec l'heure .
Je ne pratique pas vraiment le vb mais je pense que la syntaxe est a peu pres ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim madate As String = dShiftDefaultEnd.Tostring("yyyy-MM-dd HH:mm:ss");