Q1622 How can i print the active document using Internet Explorer?

<object id="WBControl" width="0" height="0" classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"></object>

<script language="VBScript"><!--
Sub VBPrint() On Error Resume Next
  WBControl.ExecWB 6,1
End Sub
//--></script>

<script language=JavaScript><!--
if (self.print)
  document.write('<A HREF="javascript:;" language="JavaScript" onClick="self.print(); return false;">print</a>');
else if (navigator.appName.indexOf('Microsoft') != -1)
  document.write('<a href="javascript:;" language="JavaScript" onClick="VBPrint(); return false;">print</a>');
//--></script>