If job.JobName="JobMeteo" And job.Success=False Then
Log("No Internet connection")
Else Dim retour_meteo As String
'-------------- save retour fichier xml ---------------------------------
retour_meteo=job.GetString
File.WriteString(File.DirDefaultExternal,"meteo.xml",retour_meteo)