Глава 22. Элементы управления ActiveX

Sub mnu_Select(item)If item= 1 then

Window.location.href="http://rampages.onramp.net/~jerry"elseif item= 2 then

Window.location.href="http://www.miего soft.corn"elseif item= 3 then

Window.location.href="http://www.mcp.corn"end if end sub --></SCRIPT>

<OBJECT ID="mnu"WIDTH=83 HEIGHT=39

CLASSID="CLSID:52DFAE60-CEBF-11CF-A3A9-OOAOC9034920"><PARAM NAME="Caption"VALUE="From Here..."><PARAM NAME="Menuitem[0]"VALUE="Jerry1s Web Site"><PARAM NAME="Menuitem[l]"VALUE="Microsoft's Web Site"><PARAM NAME="Menuitem[2]"VALUE="MacMillan's Web Site">

</OBJECT>

<OBJECT ID="clk"WIDTH=39 HEIGHT=39

CLASSID="CLSID:59CCB4AO-727D-11CF-AC36-OOAAOOA47DD2"><PARAM NAME="Interval"VALUE="30000">

</OBJECT>

</BODY>

</HTML>

h05311.jpg

Рис. 22.7.Пользователь должен нажать кнопку и сделать выбор в меню