次の方法で共有


スクリプト アプリケーションでのイベント ハンドラとイベントのバインド

このトピックは 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>