Uso di VBScript

[Microsoft Agent è deprecato a partire da Windows 7 e potrebbe non essere disponibile nelle versioni successive di Windows.]

VBScript è un linguaggio di programmazione incluso in Microsoft Internet Explorer. Per altri browser, contattare il fornitore per informazioni sul supporto tecnico. VBScript 2.0 (o versione successiva) è consigliato per l'uso con Agent. Anche se le versioni precedenti di VBScript possono funzionare con Agent, non dispongono di determinate funzioni che è possibile usare. È possibile scaricare VBScript 2.0 e ottenere ulteriori informazioni su VBScript nel sito Dei download Microsoft e nel sito Microsoft VBScript.

Per programmare Microsoft Agent da VBScript, usare i tag di <SCRIPT> HTML. Per accedere all'interfaccia di programmazione, usare il nome del controllo assegnato nel tag> OBJECT <, seguito dal sottooggetto (se presente), dal nome del metodo o della proprietà e da eventuali parametri o valori supportati dal metodo o dalla proprietà :

agent[.object].Method parameter, [parameter]
agent[.object].Property = value

Per gli eventi, includere il nome del controllo seguito dal nome dell'evento ed eventuali parametri:

Sub agent_event (ByVal parameter[,ByVal parameter])
statements
End Sub

È anche possibile specificare un gestore eventi usando l'For <SCRIPT> tag... Sintassi evento:

<SCRIPT LANGUAGE=VBScript For=agent Event=event[(parameter[,parameter])]>
statements
</SCRIPT>

Anche se Microsoft Internet Explorer supporta questa seconda sintassi, non tutti i browser lo fanno. Per la compatibilità, usare solo la sintassi precedente per gli eventi.

Con VBScript (2.0 o versione successiva), è possibile verificare se Microsoft Agent è installato provando a creare l'oggetto e controllando se esiste. Nell'esempio seguente viene illustrato come verificare la presenza del controllo Agent senza attivare un download automatico del controllo ( come avviene se è stato incluso un tag <OBJECT> per il controllo nella pagina):

<!-- WARNING - This code requires VBScript 2.0.
It will always fail to detect the Agent control
in VbScript 1.x, because CreateObject doesn't work.
-->

<SCRIPT LANGUAGE=VBSCRIPT>
If HaveAgent() Then
      'Microsoft Agent control was found.
document.write "<H2 align=center>Found</H2>"
Else
      'Microsoft Agent control was not found.
document.write "<H2 align=center>Not Found</H2>"
End If

Function HaveAgent()
' This procedure attempts to create an Agent Control object.
' If it succeeds, it returns True.
'    This means the control is available on the client.
' If it fails, it returns False.
'    This means the control hasn't been installed on the client.

   Dim agent
   HaveAgent = False
   On Error Resume Next
   Set agent = CreateObject("Agent.Control.1")
   HaveAgent = IsObject(agent)

End Function

</SCRIPT>