Salut,
Voici un exemple en VB6(je ne connais pas .net), mais je pense que tu n'auras pas de mal à transcrire ce code en .net :
Option Explicit
Private Sub Form_Load()
' Déclare une variable pour ajouter des objets ListItem
Dim itmX As ListItem
' Ajout de colonne
ListView1.ListItems.Clear
ListView1.ColumnHeaders.Clear
ListView1.ColumnHeaders.Add , , "Heure début", (ListView1.Width * (3 / 8)), lvwColumnLeft
ListView1.ColumnHeaders.Add , , "Heure fin", (ListView1.Width * (3 / 8)), lvwColumnLeft
ListView1.View = lvwReport
ListView1.Font.Size = 10
' Ajout d'élèments à listview(1 ligne)
Set itmX = ListView1.ListItems.Add(, , CStr(Format(Time, "hh:mm:ss")))
itmX.SubItems(1) = "13:48:00"
' Ajout d'élèments à listview(2 ligne)
Set itmX = ListView1.ListItems.Add(, , CStr(Format(Time, "hh:mm:ss")))
itmX.SubItems(1) = "15:00:00"
' Lancement de la vérife dans listview toutes les 2 secondes
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
' On va vérifier l'heure de fin dans la
' colonne listview par rapport à
' l'heure système
Dim NbrLine As Long
' On parcoure toute les lignes de 1 à la dernière
For NbrLine = 1 To ListView1.ListItems.Count
' On compare
If ListView1.ListItems(NbrLine).SubItems(1) = CStr(Format(Time, "hh:mm:ss")) Then
' Moi j'ai mit une message box, toi tu mets le changement de ton icone
MsgBox "Coucou c'est la fin de votre connection à internet"
End If
Next NbrLine
End Sub
A+
Exploreur
Linux a un noyau, Windows un pépin 