/* G02 T05 Aufgabe 2 */
Say "This programm will give the current link of LPIS out"

Ex=.OLEObject~new("InternetExplorer.Application")
Ex~visible=.true 
Ex~navigate("https://bach.wu.ac.at/z/start/")

call sysSleep 10


doc=Ex~document 
source=doc~body~outerhtml 
Ex~quit 
Say "The browser will be closed"

parse var source '<h2>Studierende</h2>' . '<a href="' url '">LV- und Pr&uuml;fungsanmeldung (LPIS)<'
say "Current URL of LPIS:" url