Agents Microsoft (Découverte et Contrôle)

de | 20 septembre 2009

exagent

Agents Microsoft (Découverte et Contrôle)

Vous ne savez peut être pas se que sont les agents microsoft. Vous avez du les voir surement déja
Il se trouve physiquement sur votre ordinateur C:WINDOWSmsagentchars, si vous vous trouvez sous XP merlin est disponible par défaut sur votre système.

Voici un le code vbscript pour lancer et manipuler cette agent :

 strAgentName = "Merlin"
strAgentPath = "c:windowsmsagentchars" & strAgentName & ".acs"
Set objAgent = CreateObject("Agent.Control.2")
objAgent.Connected = TRUE
objAgent.Characters.Load strAgentName, strAgentPath
Set objCharacter = objAgent.Characters.Character(strAgentName)
objCharacter.Show
objCharacter.Play "GetAttention"
objCharacter.Speak "Salut, Comment vas tu ?"
objCharacter.Play "LookDown"
objCharacter.Think "Regarde comme je vole ...."
objCharacter.MoveTo 500,400
objCharacter.Play "Pleased"
objCharacter.Play "Congratulate"
objCharacter.Play "Congratulate_2"
objCharacter.Play "Decline"
objCharacter.Play "DoMagic1"
objCharacter.Play "GetAttentionReturn"
objCharacter.Speak "Au revoir."
objCharacter.Hide
Do While objCharacter.Visible = TRUE
Wscript.Sleep 100 Loop

Après avoir testé, on peut voir les possibilités pour rendre ces scripts plus attrayant, ils peuvent servir d’aide à l’utilisateur…

Site Web officiel de Microsoft consacré aux agents

Site Microsoft regroupant les différents code correspondant au comportement de l’agent ici

Laisser un commentaire

Votre adresse de messagerie ne sera pas publiée. Les champs obligatoires sont indiqués avec *

Ce site utilise Akismet pour réduire les indésirables. En savoir plus sur comment les données de vos commentaires sont utilisées.