recépéret les les nom de champs de txte d'une page web
2 réponses
virus
Bonjour,
Est que possible de récupérer les nom de tous les champs de type texte d’une page web (je parle dans le code html bien sur) si possible SVP aider moi comment faire sa avec VBNET 9 ou VB6
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
bahn po
virus avait écrit le 17/09/2008 :
Bonjour, Est que possible de récupérer les nom de tous les champs de type texte d’une page web (je parle dans le code html bien sur) si possible SVP aider moi comment faire sa avec VBNET 9 ou VB6
En VB6, je le fais avec winsock, c'est une possibilité. Voici un exemple, avec la page http://www.google.fr/intl/fr/ads/ qui se retrouve enregistrée sur le disque dur. A toi de traiter le fichier de façon à récupérer ce qui te semble nécessaire. Cela se fait avec des "instr" pour trouver les balises de début et de fin afin d'élaguer les parties inutiles.
Mettre deux boutons sur une feuille (bouton 2 = connect, 1 = charge la page) et un contrôle winsock appelé winsock2
============================================= Option Explicit Dim tableau Dim strwebpage As String Dim webdata
Bonjour,
Est que possible de récupérer les nom de tous les champs de type texte d’une
page web (je parle dans le code html bien sur) si possible SVP aider moi
comment faire sa avec VBNET 9 ou VB6
En VB6, je le fais avec winsock, c'est une possibilité. Voici un
exemple, avec la page http://www.google.fr/intl/fr/ads/ qui se retrouve
enregistrée sur le disque dur. A toi de traiter le fichier de façon à
récupérer ce qui te semble nécessaire. Cela se fait avec des "instr"
pour trouver les balises de début et de fin afin d'élaguer les parties
inutiles.
Mettre deux boutons sur une feuille (bouton 2 = connect, 1 = charge la
page) et un contrôle winsock appelé winsock2
============================================= Option Explicit
Dim tableau
Dim strwebpage As String
Dim webdata
Bonjour, Est que possible de récupérer les nom de tous les champs de type texte d’une page web (je parle dans le code html bien sur) si possible SVP aider moi comment faire sa avec VBNET 9 ou VB6
En VB6, je le fais avec winsock, c'est une possibilité. Voici un exemple, avec la page http://www.google.fr/intl/fr/ads/ qui se retrouve enregistrée sur le disque dur. A toi de traiter le fichier de façon à récupérer ce qui te semble nécessaire. Cela se fait avec des "instr" pour trouver les balises de début et de fin afin d'élaguer les parties inutiles.
Mettre deux boutons sur une feuille (bouton 2 = connect, 1 = charge la page) et un contrôle winsock appelé winsock2
============================================= Option Explicit Dim tableau Dim strwebpage As String Dim webdata
En VB6, avec le WebBrowser et la référence "Microsoft HTMLObjetLibrary"
'*** Déclaration des variables locales Dim objHtmlDocument As MSHTML.IHTMLDocument2 'Fait référence au document du WebBrowser Dim objbaliseInput As MSHTML.IHTMLInputElement 'Élement Input Dim objbalises As MSHTML.IHTMLElementCollection 'Collection d'élément (dont la nature sera définit plus tard...)
Set objHtmlDocument = WebBrowser.Document
Set objbalises = objHtmlDocument.All.tags("input") For Each objbaliseInput In objbalises
If objbaliseInput.Type = "text" Then MsgBox objbaliseInput.Name End If
Next objbaliseInput
On Wed, 17 Sep 2008 07:35:08 -0500, virus wrote:
Bonjour, Est que possible de récupérer les nom de tous les champs de type texte d’une page web (je parle dans le code html bien sur) si possible SVP aider moi comment faire sa avec VBNET 9 ou VB6
En VB6, avec le WebBrowser et la référence "Microsoft
HTMLObjetLibrary"
'*** Déclaration des variables locales
Dim objHtmlDocument As MSHTML.IHTMLDocument2
'Fait référence au document du WebBrowser
Dim objbaliseInput As MSHTML.IHTMLInputElement
'Élement Input
Dim objbalises As MSHTML.IHTMLElementCollection
'Collection d'élément (dont la nature sera définit plus tard...)
Set objHtmlDocument = WebBrowser.Document
Set objbalises = objHtmlDocument.All.tags("input")
For Each objbaliseInput In objbalises
If objbaliseInput.Type = "text" Then
MsgBox objbaliseInput.Name
End If
Next objbaliseInput
On Wed, 17 Sep 2008 07:35:08 -0500, virus <virus@domain-xyz.in> wrote:
Bonjour,
Est que possible de récupérer les nom de tous les champs de type texte d’une
page web (je parle dans le code html bien sur) si possible SVP aider moi comment
faire sa avec VBNET 9 ou VB6
En VB6, avec le WebBrowser et la référence "Microsoft HTMLObjetLibrary"
'*** Déclaration des variables locales Dim objHtmlDocument As MSHTML.IHTMLDocument2 'Fait référence au document du WebBrowser Dim objbaliseInput As MSHTML.IHTMLInputElement 'Élement Input Dim objbalises As MSHTML.IHTMLElementCollection 'Collection d'élément (dont la nature sera définit plus tard...)
Set objHtmlDocument = WebBrowser.Document
Set objbalises = objHtmlDocument.All.tags("input") For Each objbaliseInput In objbalises
If objbaliseInput.Type = "text" Then MsgBox objbaliseInput.Name End If
Next objbaliseInput
On Wed, 17 Sep 2008 07:35:08 -0500, virus wrote:
Bonjour, Est que possible de récupérer les nom de tous les champs de type texte d’une page web (je parle dans le code html bien sur) si possible SVP aider moi comment faire sa avec VBNET 9 ou VB6