Texte aus Webseiten auslesen

Usom · 12.07.2004

Hallo,
ich möchte gerne zum Erstellen einer Liste Titel und Interpreten, die auf der Webseite des entsprechenden Senders angezeigt werden, in eine Textdatei schreiben, um sie nachher den entsprechenden Songs zuordnen zu können. Weiss jemand, wie ich mit VB auf die entsprechenden Texte zugreifen kann? Vieleicht ein kleines Beispiel? Bin noch neu auf dem Gebiet. Vielen Dank!

Alexander16 · 12.07.2004

Hi

Kannst du mal die Website nennen, auf der sich die Titels und die Interpreters aufgelistet sind?

Mfg Alexander

Usom · 12.07.2004

Hallo!
Hier die Seite und ein Beispiel

http://www.br-online.de/bayern1/

Jetzt läuft:
[keine Titelinformation vorhanden]

Alexander16 · 12.07.2004

Hi

Okay, geh als erstes auf [Projekt > Komponenten]. Hier suchst du die Komponente Microsoft Internet Controls und setzt ein Häkchen dran.
So, nun hast du links ein neues Symbol, das sich Webbrowser nennt. Setzte dieses mit einem Doppelklick auf die Form. Anschließend klickst du doppelt auf die Form und fügst folgenden Code ein:

Code:

Private Sub Form_Load()
    Const sURL As String = _
    [url]http://reload.br-online.de/bayern1/playlists/radiomaxteaser.html[/url]
    
   -> WebBrowser ausblenden
    WebBrowser1.Visible = False
    
   -> Internetseite aufrufen
    WebBrowser1.Navigate sURL
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Dim sText As String
    
   -> Nach dem Downloaden der Seite, wird der Text ausgelesen
    sText = WebBrowser1.Document.body.innertext
   -> Anschließend in einer MessageBox ausgegeben
    MsgBox sText
End Sub

Ich hoffe, du kommst damit klar

Mfg Alexander

Usom · 13.07.2004

War genau das Richtige. Danke!!!
Lief aber nur mit WebBrowser1.Visible = True

Texte aus Webseiten auslesen

Usom

Alexander16

Usom

Alexander16

Usom

Texte aus Webseiten auslesen

ANGEBOTE & SPONSOREN

Neueste Themen

Statistik des Forums