T
tallestjohn
Gast
Hallo Experts,
sorry, wenn ich hier ganz falsch bin:
Ich weiß gerade mal, wie ich über eine VB-Routine Quelltext oder Klartext von einer Webseite in einen String einlese (s.u.).
Nun möchte ich aber das Ausfüllen eines Abfragefeldes (das ist ja wohl eine JAVA-Geschichte) und nachfolgendes "weiterclicken" mit VB automatisieren. Ich hielt mich für oberschlau und habe die URL der Seite nachgebildet, auf die man per Browser und Mausclick weiterkommt; den Abfragebegriff kann man darin erkennen, auch die zugeteilte Session-ID habe ich mitgenommen. Aber dann heißt es irgendwie "time out" bzw. "Verbindung unterbrochen".
Geht das überhaupt?
Wo setze ich an?
Was sollte ich mir zunächst mal aneignen?
(Es sind die Seiten von immobilienscout24.de, die ich automatisch abfragen will, möchte den Text der Exposes halt einlesen und auf Begriffe durchsuchen, ohne alles lesen zu müssen)
Dank und Gruß,
Hans
nur als Anhalt, wie ein Seitenaufruf bei mir aussieht:
Set myIE_App = CreateObject("InternetExplorer.Application")
myIE_App.Navigate adresse
Do
Sleep 10
Loop Until myIE_App.Busy = False
quelltext = myIE_App.Document.documentElement.outerHTML 'für Quellcode
klartext= myIE_App.Document.documentElement.outerTEXT 'für Klartext
sorry, wenn ich hier ganz falsch bin:
Ich weiß gerade mal, wie ich über eine VB-Routine Quelltext oder Klartext von einer Webseite in einen String einlese (s.u.).
Nun möchte ich aber das Ausfüllen eines Abfragefeldes (das ist ja wohl eine JAVA-Geschichte) und nachfolgendes "weiterclicken" mit VB automatisieren. Ich hielt mich für oberschlau und habe die URL der Seite nachgebildet, auf die man per Browser und Mausclick weiterkommt; den Abfragebegriff kann man darin erkennen, auch die zugeteilte Session-ID habe ich mitgenommen. Aber dann heißt es irgendwie "time out" bzw. "Verbindung unterbrochen".
Geht das überhaupt?
Wo setze ich an?
Was sollte ich mir zunächst mal aneignen?
(Es sind die Seiten von immobilienscout24.de, die ich automatisch abfragen will, möchte den Text der Exposes halt einlesen und auf Begriffe durchsuchen, ohne alles lesen zu müssen)
Dank und Gruß,
Hans
nur als Anhalt, wie ein Seitenaufruf bei mir aussieht:
Set myIE_App = CreateObject("InternetExplorer.Application")
myIE_App.Navigate adresse
Do
Sleep 10
Loop Until myIE_App.Busy = False
quelltext = myIE_App.Document.documentElement.outerHTML 'für Quellcode
klartext= myIE_App.Document.documentElement.outerTEXT 'für Klartext