以下がソースです。
<html>
<head>
<title>htmlにvbsを組み込む。</title>
<script language="vbscript">
<!--
sub submit_onclick
msgbox "押されたよー"
end sub
-->
</script>
</head>
<body>
<form name="form">
ボタンを押してみてね。
<input name="submit" type="button" value="VBSを実行" />
</form>
</body>
</html>