Tester un url/une page web [Résolu]

Signaler
Messages postés
2
Date d'inscription
vendredi 8 avril 2005
Statut
Membre
Dernière intervention
11 avril 2005
-
Messages postés
37
Date d'inscription
lundi 20 septembre 2004
Statut
Membre
Dernière intervention
3 avril 2009
-
Auriez vous un exemple simple en VBS de preference, merci par avance ;o)

3 réponses

Messages postés
37
Date d'inscription
lundi 20 septembre 2004
Statut
Membre
Dernière intervention
3 avril 2009

Ajouter Microsoft Internet Transfer Control ds les composants du projet VB, puis :


If Inet1.OpenURL("MonAdresseURL) = "" Then
Beep
MsgBox "Adresse invalide, page inconnue !!", vbCritical, "Problème adresse URL"
Else
MsgBox "Adresse OK"
End If

patdan
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 152 internautes nous ont dit merci ce mois-ci

Messages postés
2
Date d'inscription
vendredi 8 avril 2005
Statut
Membre
Dernière intervention
11 avril 2005

Merci bcp mais si j'ai un timeout j'aurais une erreur ?
@+
Messages postés
37
Date d'inscription
lundi 20 septembre 2004
Statut
Membre
Dernière intervention
3 avril 2009

Bonjour
Es-tu sûr que le timeout se situe au niveau de l'appel à l'URL?? Si oui, il faudrait tester avec une adresse dont tu es sûr de l'existence et voir ce qui se passe.Souvent le timeout se produit lors d'une boucle qui ne se termine pas .Cela peut-être aussi un pb de rapidité de Web ??? Bizarre Si tu ne trouves pas envoie tes lignes de code
Bonne prog

patdan