Neuladen einer Internetseite (aktualisieren)

Dieses Thema Neuladen einer Internetseite (aktualisieren) im Forum "Windows XP Forum" wurde erstellt von Usom, 10. Apr. 2005.

Thema: Neuladen einer Internetseite (aktualisieren) Hallo, lese mit folgendem kleinem VB die Seite von einem Radiosender aus und schreibe den Titel des laufenden Liedes...

  1. Hallo, lese mit folgendem kleinem VB die Seite von einem Radiosender aus und schreibe den Titel des laufenden Liedes in eine Datei. Leider wird nicht bei allen Seiten automatisch aktualisiert. Wie kann ich es hinbekommen, das VB das für mich alle 30 Sek. erledigt. Danke im voraus

    Dim sText As String
    Dim Test_Text As String

    Private Sub Form_Load()
    Const sURL As String = _
    http://www1.ndr.de/ndr/ndr_pages_idx/0,2571,SPM854,00.html?->MV

    WebBrowser1.Visible = True
    WebBrowser1.Navigate sURL
    End Sub

    Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)

    sText = WebBrowser1.Document.body.innertext

    solltextanfang = InStr(sText, Es läuft:)
    solltextende = InStr(sText, Es lief:)
    solltext = Mid(sText, solltextanfang, solltextende - solltextanfang)
    sText = solltext
    If sText = Test_Text Then GoTo nichtschreiben
    Test_Text = sText

    Open C:\Dokumente und Einstellungen\Name\Desktop\Verknüpfungen\titel.txt For Append As #1
    Print #1, Date, Time
    Print #1, sText
    Close #1
    nichtschreiben:
    End Sub
     
  2. vielleicht hilfts weiter >>>Thema<<<
     
  3. Sollte es nicht reichen den vorhandenen Code einfach in eine Timerprocedur zu legen, die dann alle 30 sek. aufgerufen wird?
     
Die Seite wird geladen...

Neuladen einer Internetseite (aktualisieren) - Ähnliche Themen

Forum Datum
Fehlermeldung beim remote Login zu meiner IP-Cam Windows 7 Forum Heute um 12:31 Uhr
EXE-Dateien nach einer Zeit nicht mehr ausführbar Windows 8 Forum Sonntag um 21:21 Uhr
Ergebnis einer Google-suche speichern in Favoriten-liste Windows 8 Forum Samstag um 18:16 Uhr
Fehler beim Ändern der Eigenschaften einer Datei Windows 10 Forum 17. Okt. 2016
Einbau einer Grafikkarte Windows 10 Forum 8. Okt. 2016