<!-- 
//  Map VB script events to the JavaScript method - Netscape will ignore this... 
//  Since FSCommand fires a VB event under ActiveX, we respond here 
Sub mapa_FSCommand(ByVal command, ByVal args)
  call mapa_DoFSCommand(command, args)
end sub

Sub vistaAerea_FSCommand(ByVal command, ByVal args)
  call vistaAerea_DoFSCommand(command, args)
end sub
-->