document.write ("<style type='text/css'><!-- .yellowBack {background-color: pink; color: red; font-style: italic} --></style>")


   'Sub procedure to detect whenever an onmouseover event occurs. 
   Sub document_onmouseover()
      'If an A tag fired this script, give it a yellow background.
      If window.event.srcElement.tagName = "A" Then
         subscript = window.event.srcElement.sourceIndex   
         document.all(subscript).className = "yellowBack"
      End If
   End Sub

   'Sub procedure to detect whenever an onmouseout event occurs. 
   Sub document_onmouseout()
      'Change A tag back to normal color when mouse pointer leaves.
      If window.event.srcElement.tagName = "A" Then
         subscript = window.event.srcElement.sourceIndex   
         document.all(subscript).className = ""
      End If
   End Sub