Discussion :

[geoffrey49]

Bonjour,

je voulais savoir si il était possible d'ouvrir une fenêtre internet à partir de vba et ensuite d'agir sur cette fenêtre (ou plutôt son contenu)

ex :

- ouvrir www.developpez.net/forums/
- cliquer sur nouvelle discussion (ou alors l'équivalent comme X fois la touche TAB)
- cliquer sur le touche ENTREE ou ESPACE

donc je voulais savoir si c'était possible de le faire en vba ou si c'est impossible comment je peux (si je peux) le faire ?

merci d'avance !!

[SilkyRoad]

bonsoir

Oui c'est possible en utilisant les bibliothèques
Microsoft HTML Object Library
et
Microsoft Internet Controls

Tu trouveras des exemples sur les forums DVP.
Attention toute fois à vérifier préalablement que ce type d'action est autorisé sur la page html que tu souhaites piloter.



michel

[geoffrey49]

d'accord merci de votre réponse !

on m'a aussi dit que je pouvais le faire en c++ et que se serait plus efficace .. donc je vais maintenant chercher qqun qui sait faire du c++ plutôt que de faire qqch de banqual en vba ..

merrrrrrci

[SilkyRoad]

bonjour

plutôt que de faire qqch de banqual en vba

???


michel

[geoffrey49]

je pense que ce serait banqual dans ma situation
en effet il faudrait que j ai des actions différentes en fonction de ce que m affiche la page .. et ça je ne dois pas pouvoir le faire en vba

[SilkyRoad]

bonjour

en effet il faudrait que j ai des actions différentes en fonction de ce que m affiche la page .. et ça je ne dois pas pouvoir le faire en vba

Difficilie de répondre si tu ne donnes pas plus de détails


michel

[AlainTech]

Comme, malgré tout ce que je peux dire, je suis encore plein d'illusions, voici un (tout) petit exemple de code de lecture dans une page WEB:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Sub AfficherPseudo()
  Dim IE As InternetExplorer
  Dim iePage As HTMLDocument
  Dim colElem As IHTMLElementCollection
  Dim oElem As HTMLAnchorElement
 
  Set IE = CreateObject("InternetExplorer.Application")
  IE.Visible = True
  IE.navigate "http://www.developpez.net/forums/showthread.php?t=401924"
  Do Until IE.readyState = READYSTATE_COMPLETE
    DoEvents
  Loop
  Set iePage = IE.document
  Set colElem = iePage.getElementsByTagName("A")
  For Each oElem In colElem
    If oElem.className = "bigusername" Then
      MsgBox "Cette discussion a été ouverte par " & oElem.innerText
      Exit Sub
    End If
  Next oElem
 
End Sub

[geoffrey49]

pour information je suis complétement d'accord avec toi et je sais me servir des bases du vba .. mais je n'avais (et je n'ai) aucune base pour internet !
je me disais qu'étant en école d'ingénieur j'avais les compétences et les notions pour pouvoir comprendre ce qu'on allait m'expliquer ici ..

je vois cependant que ma question ainsi que mes capacités n'ont pas été comprises .. donc je vais vous laissez en allant voir sur un autre forum ou en demandant simplement à un programmeur ..

tout de même merci pour ta réponse qui m'a donnée une voie à suivre !

et je le répète je suis d'accord avec ton post précédent !

bonne continuation

[cafeine]

Il faut quand même préciser quelque chose, tu ne nous as pas aidé à te comprendre tant sur :

• ton problème (manque de précision)
• ton niveau (dénigrements et a priori sur VBA).

Bonne chance ailleurs

pour information je suis complétement d'accord avec toi et je sais me servir des bases du vba .. mais je n'avais (et je n'ai) aucune base pour internet !
je me disais qu'étant en école d'ingénieur j'avais les compétences et les notions pour pouvoir comprendre ce qu'on allait m'expliquer ici ..

je vois cependant que ma question ainsi que mes capacités n'ont pas été comprises .. donc je vais vous laissez en allant voir sur un autre forum ou en demandant simplement à un programmeur ..

tout de même merci pour ta réponse qui m'a donnée une voie à suivre !

et je le répète je suis d'accord avec ton post précédent !

bonne continuation