スクリプト アプリケーションでのイベント ハンドラとイベントのバインド
このトピックは Windows XP にのみ適用。
Microsoft Internet Explorer の中で実行するスクリプト ベースのアプリケーションの場合、アプリケーションでイベント処理メソッドと個々のイベントを明示的に関連付ける必要がある。この目的のために MSEventBinder オブジェクトが用意されている。次のコードはこのオブジェクトの使用例を示している。
<HEAD>
<OBJECT id=Binder classid="clsid:577FAA18-4518-445E-8F70-1473F8CF4BA4"></OBJECT>
<script language="vbscript">
dim bind_1
sub window_onload
bind_1 = Binder.Bind(VidCtl, "StateChange", "handleStateChange")
end sub
sub handleStateChange(laststate, curstate)
if curstate = 0 then
StateSpan.innerHTML = "Stop"
elseif curstate = 1 then
StateSpan.innerHTML = "Pause"
elseif curstate = 2 then
StateSpan.innerHTML = "Play"
end if
end sub
sub close()
Binder.Unbind(bind_1)
end sub
</script>
</HEAD>
<BODY>
<OBJECT ID="VidCtl" DATA="tv:"></OBJECT>
<P>Current State: <SPAN style="color:red" id="StateSpan">Unknown</SPAN></P>
</BODY>
</HTML>