Utilisation de VBScript

[Microsoft Agent est déconseillé à partir de Windows 7 et peut être indisponible dans les versions ultérieures de Windows.]

VBScript est un langage de programmation inclus dans Microsoft Internet Explorer. Pour d’autres navigateurs, contactez votre fournisseur au sujet du support. VBScript 2.0 (ou version ultérieure) est recommandé pour une utilisation avec Agent. Bien que les versions antérieures de VBScript puissent fonctionner avec Agent, elles ne disposent pas de certaines fonctions que vous souhaiterez peut-être utiliser. Vous pouvez télécharger VBScript 2.0 et obtenir des informations supplémentaires sur VBScript sur le site Microsoft Downloads et le site Microsoft VBScript.

Pour programmer Microsoft Agent à partir de VBScript, utilisez les balises HTML <SCRIPT> . Pour accéder à l’interface de programmation, utilisez le nom du contrôle que vous affectez dans la <balise OBJECT> , suivi du sous-objet (le cas échéant), du nom de la méthode ou de la propriété et des paramètres ou valeurs pris en charge par la méthode ou la propriété :

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

Pour les événements, incluez le nom du contrôle suivi du nom de l’événement et de tous les paramètres :

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

Vous pouvez également spécifier un gestionnaire d’événements à l’aide de la <balise SCRIPT>pour... Syntaxe d’événement :

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

Bien que Microsoft Internet Explorer prenne en charge cette dernière syntaxe, tous les navigateurs ne le font pas. Pour la compatibilité, utilisez uniquement la syntaxe précédente pour les événements.

Avec VBScript (2.0 ou version ultérieure), vous pouvez vérifier si Microsoft Agent est installé en essayant de créer l’objet et en vérifiant s’il existe. L’exemple suivant montre comment case activée pour le contrôle Agent sans déclencher de téléchargement automatique du contrôle (comme ce serait le cas si vous incluiez une <balise OBJECT> pour le contrôle sur la page) :

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