tester si une page internet fonctionne - VB/VBA/VBS - Programmation
Marsh Posté le 12-05-2003 à 19:12:58
-BigFoot- a écrit : J'ai réussi à tester des pages Internet avec le controle winsock mais par contre je n'arrive pas à tester les pages d'un intranet, j'ai l'erreur suivante 401 (non autorisé). Est ce que je peux passer en parametre un mot de pass et un login ? |
tu les testes comment par quelle méthode ? essaye sinon, avec les API windows...je crois que c'est ShellExecuteEx...
Marsh Posté le 12-05-2003 à 19:37:18
A lieu de Winsock, utilise "Internet Controls".
C'est en fait IE, qui s'intègre à ton programme, y'a donc tout ce qu'il faut : authentification sur le réseau, paramètrage à la cons du proxy, et cookies.
Tu peux même inter-agir avec le javascript depuis VB
Marsh Posté le 13-05-2003 à 09:20:45
Merci MagicBuzz pour ta réponse
j'ai en effet utilisé le controle Inet et j'arrive à tester mes pages
Pour cela j'utilise la méthode getHeader() et j'ai ainsi l'en-tête de la page.
Je récupère ceci :
Code :
|
quand je fais getHeader("Date" ) je récupère juste la date.
Sais tu comment récupérer directement que la première ligne ??
(à part les fonctions qui découpent une chaine)
Encore merci pour ta réponse
[cpp]
Marsh Posté le 13-05-2003 à 09:48:29
"protocol" peut-être.
Mais très franchement, je n'en ai aucune idée
Marsh Posté le 13-05-2003 à 16:06:59
J'ai une autre question à propos du controle inet
Lorsque je fais le code suivant :
Code :
|
(c'est une page qui est sur mon intranet et qui provoque un timeout)
J'ai une erreur d'execution suivante :
35761 Délai écoulé pour la demande
J'aimerais intercepter cette erreur et donc indiqué qu'il y a une erreur de type 505
Une petite idée sur la marche à suivre ?
merci d'avance
Marsh Posté le 13-05-2003 à 16:47:43
on error resume next
err.clear
inet1.open "..."
if err <> 0 then
msgbox("Erreur !" & vbcrlf & "Numéro : " & err.number & vbCrLf & "Description : " & err.description)
end if
on error goto 0
Marsh Posté le 12-05-2003 à 14:49:24
J'ai réussi à tester des pages Internet avec le controle winsock mais par contre je n'arrive pas à tester les pages d'un intranet, j'ai l'erreur suivante 401 (non autorisé). Est ce que je peux passer en parametre un mot de pass et un login ?