<SCRIPT for=window event=onload language=VBScript> window.focus() top.moveTo 0, 0 top.resizeTo screen.width, screen.height - 32 </SCRIPT>
<SCRIPT for=window event=onunload language=VBScript> if not IsEmpty( obj ) then ' オブジェクトが解放される前にしなければならない処理 end if </SCRIPT>
ウインドウが閉じられるのをキャンセルできるようにするには、以下のようにします
<SCRIPT for=window event=onbeforeunload language=VBScript> window.event.returnValue = "メッセージ" </SCRIPT>
<OBJECT name=Date classid='CLSID:20DD1B9E-87C4-11D1-8BE3-0000F8754DA1' style='width:120;height:26' > </OBJECT> <SCRIPT for=Date event=KeyDown(KeyCode,Shift) language=VBScript> alert(KeyCode & ":" & Shift) </SCRIPT>
<A id=download href='./商品分類マスタ.xls' >ダウンロード</a> <SCRIPT for=download event=onClick language=VBScript> window.event.returnValue = false alert("右クリックで、「対象をファイルに保存」でダウンロードして下さい ") </SCRIPT>