Using the Window Status Bar in VBScript


This page has set the window status bar using the window onLoad event. It will also set the status bar for each link when the link is passed over.

Yahoo

Infoseek

Altavista

<HEAD>

<SCRIPT LANGUAGE="VBSCRIPT">
<!--
	Sub window_onLoad
		defaultStatus = "This is the default window status bar message"
	End Sub
-->
</SCRIPT>

<SCRIPT LANGUAGE="VBSCRIPT">
<!--
	Sub aYahoo_onMouseMove
		Window.status = "This is the Yahoo Internet search engine"
	End Sub

	Sub aInfoseek_onMouseMove
		Window.status = "This is the Infoseek Internet search engine"
	End Sub

	Sub aAltavista_onMouseMove
		Window.status = "This is the Altavista Internet search engine"
	End Sub
-->
</SCRIPT>

<STYLE TYPE="text/css">
	.lnk { border-width: 10px; border-color: red; border-style: inset; color: yellow; background-color: blue; font-size: 14pt; font-weight: bold; }
</STYLE>

</HEAD>

<BODY>

<A HREF="../vbscript.html">VBScript Index</A><BR><BR>

<P>This page has set the window status bar using the window onLoad event. It will also set the status bar for each link when the link is passed over. This mousemove event also does not seem to work.</P>

<A HREF="http://www.yahoo.com" NAME="aYahoo" TARGET="self"><DIV CLASS="lnk">Yahoo</DIV></A><BR>
<A HREF="http://www.infoseek.com" NAME="aInfoseek" TARGET="self"><DIV CLASS="lnk">Infoseek</DIV></A><BR>
<A HREF="http://www.altavista.com" NAME="aAltavista" TARGET="self"><DIV CLASS="lnk">Altavista</DIV></A>