<P id=vsbclock></P>
<SCRIPT language=VBScript>


  window.setInterval "UpdateClock", 1000 

  Sub UpdateClock()
    document.all.vsbclock.innerText = Time() 
  end sub


</SCRIPT>