Treść książki

Przejdź do opcji czytnikaPrzejdź do nawigacjiPrzejdź do informacjiPrzejdź do stopki
1.2.TworzenienarzędziaGUIdowyliczaniaczłonkostwawgrupach
33
JednakdlawiększościwynikówbędziemyzwyklezmieniaćkodHTMLwyświetlanej
strony
.Naprzykładponiższyskryptwyświetlakomunikat,„Thepageloaded”(Stronazała-
dowana)wobszarze(div)stronyHTML,określonymjako„Message;ox”:
<html>
<head>
<scriptlanguage="vbscript">
SubDisplayMessage(sMessageHTML)
MessageBox.innerHTML=sMessageHTML
EndSub
</script>
</head>
<bodyonload="DisplayMessage('<h1>Thepageloaded</h1>’)">
Results:
<divid="MessageBox"name="MessageBox">&nbsp;</div>
</body>
</html>
WpokazanymwłaśniekodziezdarzeniemwywołującympodprogramDisplayMessagejest
ładowaniestronyatrybutznacznikatreścidlaproceduryobsługizdarzeniaonload.
Abyprzedstawićinnezdarzenie,dodajmyponiższywierszkodupowyżejznacznika
zamykającego</body>:
<inputtype="button"name="btnTest"id="btnTest"onclick="DisplayMessage('<i>Youjust
clickedthebutton.</i>’)"value="ClickMe"/>
Tenwierszpowodujeutworzenieprzycisku.Atrybutyprzyciskunameorazidustawione
nabtnTest.ProceduraobsługizdarzeniaonclickwywołujepodprogramDisplayMessage.
Etykietanaprzycisku,czylivalue,jestustawionatak,żewyświetlanyjestnapis„ClickMe”
(Kliknijmnie).
Tenrodzajtechnikibędziemystosowaćdotworzeniawyjść,więcsprawdźmy
,czynasz
skryptwygenerujewyniki,którebędąefektywniewyświetlanenastronieHTML,bez
instrukcjiWScript.Echo.Naszskryptdowyliczaniaczłonkostwawgrupachzawierakod,
którywyświetlalistęczłonkostwa:
WScript.Echo"MEMBERSHIPS"
ForEachsMemberOfInaMemberOfList
WScript.EchosMemberOf
Next
Możnarównieżzmienićkod,takabyutworzyćlistęczłonkostwa,anastępniewyświetlić
nastronieWWW
,takjakponiżej:
sMessageHTML="MEMBERSHIPS"
ForEachsMemberOfInaMemberOfList
sMessageHTML=sMessageHTML&"<br/>"&sMemberOf
Next
CallDisplayMessage(sMessageHTML)