<SCRIPT LANGUAGE="VBScript">
Sub Button1_OnClick
...
End Sub
</SCRIPT>

<FORM>
<INPUT TYPE="button" NAME=Button1">
</FORM>