<head>
<script language="javascript">
<!--
DA = (document.all) ? 1 : 0
window.onerror=handle_error
function handle_error()
{
msg="\n没有东东打印. \n\n如果你想要打印这页,"
msg+="然后\n单击工具栏上的打印按钮."
alert(msg)
return true;
}
//-->
</script>
<SCRIPT LANGUAGE="VBScript">
sub print
olecmd = 6 ' 打印命令
oleparam = 1
on error resume next
Printit.ExecWB olecmd, oleparam
if err.number <> 0 then
if DA then ' ie4的用户将退出打印
alert "打印不成功."
else ' ie3的用户将执行handle_error错误处理
handle_error
end if
end if
end sub
</SCRIPT>
</head>
<body>
<form>
<Input type=button value="打印" onclick="window.print();">
</form>
<OBJECT ID="Printit"
WIDTH=0 HEIGHT=0
CLASSID="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2">
</OBJECT>
</BODY>
</HTML>
]]>
