Bonjour à tous,
J'essai d'utiliser un timer dans un service windows. Le problème que le timer n'a pas l'air de se déclancher.
Je joint mon code si une bonne âme aurait la solution à mon problème.
Merci d'avance.
Imports System.Net.Mail.SmtpClient
Public Class ControleEdi
Protected Overrides Sub OnStart(ByVal args() As String)
' Ajoutez ici le code pour démarrer votre service. Cette méthode doit
' démarrer votre service.
Timer.Enabled = True
Timer.Start()
End Sub
Protected Overrides Sub OnStop()
' Ajoutez ici le code pour effectuer les destructions nécessaires à l'arrêt de votre service.
End Sub
Private Sub Timer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer.Tick
Dim client As Net.Mail.SmtpClient
Dim message As Net.Mail.MailMessage
client = New Net.Mail.SmtpClient("xxx.xxx.xxx.xxx", "xx")
message = New Net.Mail.MailMessage("gdt@xxx.fr", "gdt@xxx.fr")
message.Subject = "EnvoiTestService"
message.Body = "Attention ça marche pas"
client.Send(message)
End Sub
End Class
Youpitralalalalere