<html>
<head>
<script language="vbscript">
function myclose()
dim msgvar
msgvar=msgbox("你真的要关闭吗?",vbokcancel+vbinformation+vbdedaulftbutton,"标题")
if msgvar=1 then
return true
else
return false
end if
end function
</script>
</head>
<body onbeforeunload="vbscript:return myclose()">
</body>
</html>