Hyper-Link aus HTML Quelltext mittels VB-Script auslesen

Categories: VBS
Comments: No Comments
Published on: 31. Oktober 2011

Der derzeitige Seo-Contest OnkelSeosErbe verlangt viel Phantasie. Dabei kam die Frage auf, ob es nicht möglich sei, einen Hyperlink mittels VBS aus dem HTML-Quelltext auszulesen. (more...)

Webseite präsentieren

Categories: VBS
Comments: No Comments
Published on: 22. November 2010

Wer seine Webseite automatisch ablaufen lassen will, zum Beispiel bei einer Präsentation, für den ist folgendes Makro geeignet. Es dient zur Fernsteuerung des Internet-Explorer und lässt vordefinierte Webseiten automatisch ablaufen.

  1. Set oAppIE = CreateObject("InternetExplorer.Application")
  2. Dim objWshShell
  3. Set objWshShell = CreateObject("WScript.Shell")
  4. Dim varSleep
  5. varSleep = 10000
  6. oAppIE.Visible = True
  7. ' Bei arrLine(), den Wert der letzten Line eintragen
  8. Dim arrLine(5),x
  9. arrLine(0) = "http://www.phw-jendreck.de/"
  10. arrLine(1) = "http://www.phw-jendreck.de/seo_suchmaschinenoptimierung/"
  11. arrLine(2) = "http://www.phw-jendreck.de/testberichte/"
  12. arrLine(3) = "http://www.phw-jendreck.de/ventil/"
  13. arrLine(4) = "http://www.phw-jendreck.de/contact/"
  14. arrLine(5) = "http://www.phw-jendreck.de/macrocenter/"
  15. For x=0 to UBound (arrLine)
  16. oAppIE.Navigate2 arrLine(i)
  17. i=i+1
  18. WScript.Sleep varSleep
  19. Next
  20. oAppIE.Quit

page 1 of 1
Welcome , today is Dienstag, 23. Oktober 2018