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.

Set oAppIE = CreateObject("InternetExplorer.Application")
Dim objWshShell
Set objWshShell = CreateObject("WScript.Shell")
Dim varSleep
varSleep = 10000
oAppIE.Visible = True
' Bei arrLine(), den Wert der letzten Line eintragen
Dim arrLine(5),x
arrLine(0) = "http://www.phw-jendreck.de/"
arrLine(1) = "http://www.phw-jendreck.de/seo_suchmaschinenoptimierung/"
arrLine(2) = "http://www.phw-jendreck.de/testberichte/"
arrLine(3) = "http://www.phw-jendreck.de/ventil/"
arrLine(4) = "http://www.phw-jendreck.de/contact/"
arrLine(5) = "http://www.phw-jendreck.de/macrocenter/"
For x=0 to UBound (arrLine)
oAppIE.Navigate2 arrLine(i)
i=i+1
WScript.Sleep varSleep
Next
oAppIE.Quit

page 1 of 1
Welcome , today is Donnerstag, 27. Juni 2019