URL auslesen

Den Quelltext einer Webseite auszulesen, geht am einfachsten mit dem Objekt XML.HTTP.

  const url = "http://www.fixfoto.info/"
 
  set objXLM = CreateObject("Microsoft.XMLHTTP")
  objXLM.Open "Get",url,false 'bei false wird autom. gewartet bis url geöffnet
  objXLM.Send
 
  urlText = objXLM.responseText
 
  'hier können Informationen aus dem Text herausgefiltert werden
 
  msgbox urlText    'Anzeige nicht vollständig (nur ca. 1000 Zeichen zur Demo)

Achtung: Wird der Inhalt der Webseite geändert, muss vor dem Auslesen der editierten Seite der Rechner neu gestartet werden.