Source-Text zur Seite "Klicken!"

<body>

<h2 ID="MyHeading1">Hier klicken 1</h2>
<p><script language="vbscript">
Sub MyHeading1_onclick()
  MsgBox "Klick 1"
End Sub
</script> </p>

<h2 id="MyHeading2">Hier klicken 2</h2>
<p><script language="vbscript">
Sub ClickMyHeading2()
  MsgBox "Klick2"
End Sub

Set MyHeading2.onclick = getRef("ClickMyHeading2")
</script> </p>

<h2 language="vbscript" onclick="MyClick3">Hier klicken 3</h2>
<p><script language="vbscript">
Sub MyClick3()
  MsgBox "Klick3"
End Sub
</script> </p>

<h2 language="vbscript" onclick="MsgBox 'Klick4'">Hier klicken 4</h2>

<h2 id="MyHeading5">Hier klicken 5 </h2>
<p><script language="vbscript" for="MyHeading5" event="onclick">
MsgBox "Klick 5"
</script>

</body>