Listing 3

Procédures ShowActions et InvokeURLAction côté client

<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.