Utilisation du composant INET

Question

Bonjour, j'ai trouvé sur ce site un morceau de code qui m'intterresse a cette adresse: http://www.vbfrance.com/forum.v2.aspx?id=429112

Il test l'existance d'une page internet

Malheureusement il indique une erreur lorsque l'url est fausse.

Comment connaitre les caracteristiques du composants inet1 ? Comment l'utiliser? Comment faire pour trouver la documentation?

cs_Jack · Answer

Salut
Il indique une erreur quand l'RUL est fausse --> Tant mieux, c'est normal
Quelle erreur ?
Parce que si tu lui fournit une URL qui ne r&#233;pond pas aux normes http, c'est une autre affaire ...
La documentation de iNet est dans l'aide de VB6, tape sur F1 ou sur http://msdn.microsoft.com/VBRun/
Mais rien de compliqu&#233;

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

turboturbo1 · Answer

En fait je me suis trompé dans mes explications 

J'ai placé le code dans un bouton et j'ai mis une url mais lorsque j'execute le programme et que je clique sur le bouton il m'indique "Un objet est requis", j'ai pourtant ajouté le composant "Microsoft Internet  Control" et "Microsoft Internet Transfer Control 6"

Sur le msg il est indiqué qu'il faut ajouter le composant "Microsoft Internet Transfer Control", je n'ai pas ce composants, est ce  que c'est la meme chose que "Microsoft Internet Transfer Control 6" ?


D'ou viens cette erreur?


Private Sub Command1_Click()

If Inet1.OpenURL("www.location-de-provence.com") = "" Then
Beep
MsgBox "Adresse invalide, page inconnue !!", vbCritical, "Problème adresse URL"
Else
MsgBox "Adresse OK"
End If



End Sub

turboturbo1 · Answer

Personne peux m'aider?

cs_Jack · Answer

Salut
Normalement, si tu as implant&#233; un iNet sur ta feuille (iNet1) et que tu ex&#233;cutes ta fonction, &#231;a doit fonctionner.
Fait attention : iNet n'est pas IE, il faut lui donner l'adresse enti&#232;re, avec le http:// devant !!

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

cs_Jack · Answer

Pendant que j'y pense, le composant iNet poss&#232;de un TimeOut : Si la feuille n'existe pas ou que la connexion n'est pas valide, il faudra attendre ce timeout avant de continuer.

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

turboturbo1 · Answer

Que voulez vous dire par "implanté un iNet sur ta feuille " ?

J'ai fais menu > projet > composants --> j'ai coché la case "Microsoft Internet Transfer Control"

je pense que je dois oublier un truc car ça ne fonctionne toujours pas (un objet est requis), faut t'il declarer le composants Dans le code? Si oui comment faire?

turboturbo1 · Answer

?

turboturbo1 · Answer

J'ai reussi a faire fonctionner le morceau de code qui utilise INET mais l'erreur 35761 "delai ecoule pour la demande"  apparait lorsque le temps pour acceder a la page depasse 60 secondes.

Comment faire pour intercepter cette erreur avant qu'elle se produise?

turboturbo1 · Answer

Personne peut m'aider?

Utilisation du composant INET

9 réponses

Discussions similaires