<script language=vbscript>

Sub ShowActions(strTableName)
  ' Toggle the display of the Action list.
  If document.all(strTableName).style.display = "block" Then
    document.all(strTableName).style.display = "none"
  Else
    document.all(strTableName).style.display = "block"
  End If
End Sub

Sub InvokeURLAction(strURL, strTableName)
  ' Open the URL in a new window and hide the Action table.
  window.open(strURL)
    document.all(strTableName).style.display = "none"
End Sub

</script>