recherche de fonction

Question

Bonjour,
Voila je cherche plusieur fonction la premiere c'est la commande permettant d'afficher le programme dans la barre d'icone en bas a droite.
La seconde chose c'est une commande du style : Si l'heure est 9:00:00 alors excute la copy des fichiers sinon attends. A savoir que cette copy des fichiers se ferait plusieurs fois dans la journ&#233;e
Donc pour ce dernier probleme je pensais faire:
    If time = "9:00:00" Then
        Dim Nom_Fichier As String
        Nom_Fichier = Dir("destination")
        Do While Nom_Fichier <> ""
        FileCopy "source" & Nom_Fichier, "destination" & Nom_Fichier
        Nom_Fichier = Dir
        DoEvents '(pour rendre la main &#224; windows)
        Loop
     else attendre l'heure suivante
etc...
Bon maintenant je suis un debutant donc ce que j ai mis peut etre et meme surment une betise donc je vous laisse me guider.
Merci d'avance

cqui789 · Answer

Tu peux utiliser un timer. 

L'evenement .timer du timer s'executera a intervals reguliers.

L'interval max etant de quelques minutes, il faudras quand meme avoir un test sur l'heure.

cs_ITALIA · Answer

Pour la barre  en bas &#224; droite recherche sur ce site le mot : Systray es tu trouveras &#224; coup s&#251;r ton bonheur.

It@li@

cs_ITALIA · Answer

Effectivement avec un timer 

Interval=1000
Enabled=True

Private Sub Timer1_Timer()


If  Time$="9:00:00" then
     ' Ton Action
End if


End Sub

It@li@

cqui789 · Answer

Juste un detail, si ton programme fait quelquechose au moment ou Time$="9:00:00" ,
 le timer  se declanche plus tard et  Time$n'est plus = "9:00:00" 






Private Sub Timer1_Timer()


If  Time > prochainDelanchement then


    prochainDeclanchement = prochainDeclanchement + interval   
'calcule le tout de suite pour que le test ne marche qu'une fois 



     ' Ton Action


End if



End Sub

ecarlate · Answer

Merci je vais essayer tous ca et je vous previens d&#232;s que possible

Recherche de fonction

5 réponses

Discussions similaires