Calculer les périodicité (comme Outlook)

Le
olivier
bonjour,

comment faire pour calculer les périodicité d'un RDV

comment fait Outlook pour calculer toutes les variantes qu'il propose ?
c'est un mystère pour moi :-(


merci
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Gillard
Le #16329991
j'utilise pas outlook mais ça doit pas être sorcier

sachant que 1 semaine = 7jours,....

DateDiff, Date.DaysInMonth, ....

"olivier" news:
bonjour,

comment faire pour calculer les périodicité d'un RDV

comment fait Outlook pour calculer toutes les variantes qu'il propose ?
c'est un mystère pour moi :-(


merci




Gillard
Le #16369881
et en plus voici pour calculer la saison par rapport a une date

Function saison(ByVal UneDate As String) As String
Dim num As Int32 = 0
Dim z As Date
Try
If Date.TryParse(UneDate, z) Then
num = z.DayOfYear
Select Case num
Case Is < 1
Return "error"
MsgBox(num)
Case Is < 81
If num > 0 Then
Return "hiver"
End If
Case Is < 173
If num > 80 Then
Return "printemps"
End If
Case Is < 265
If num > 172 Then
Return "été"
End If
Case Is < 356
If num > 264 Then
Return "automne"
End If
Case Is < 367
If num > 355 Then
Return "hiver"
End If
Case Else
Return "error"
End Select
Else
Return "error"
End If
Catch ex As Exception
Debug.Fail(ex.Message)
End Try

End Function

"Gillard" news:OsC#
j'utilise pas outlook mais ça doit pas être sorcier

sachant que 1 semaine = 7jours,....

DateDiff, Date.DaysInMonth, ....

"olivier" news:
bonjour,

comment faire pour calculer les périodicité d'un RDV

comment fait Outlook pour calculer toutes les variantes qu'il propose ?
c'est un mystère pour moi :-(


merci






Gillard
Le #16375191
pour trouver des snippets

http://www.codyx.org





"olivier" news:
bonjour,

comment faire pour calculer les périodicité d'un RDV

comment fait Outlook pour calculer toutes les variantes qu'il propose ?
c'est un mystère pour moi :-(


merci




Publicité
Poster une réponse
Anonyme