Microsoft® Visual Basic® Scripting Edition Utilisation de VBScript avec les objets |
Didacticiel VBScript Précédent |
Utilisation d'objets
Que vous utilisiez un contrôle ActiveX™ (anciennement nommé contrôle OLE) ou un objet Java™, Microsoft Visual Basic Scripting Edition et Microsoft® Internet Explorer le gèrent de la même façon. Si vous utilisez Internet Explorer et avez installé le contrôle Label, vous pouvez observer la page produite par le code ci-dessous.Vous incorporez un objet avec des balises <OBJECT> et définissez ses valeurs de propriétés initiales avec des balises <PARAM>. Si vous êtes un programmeur Visual Basic, vous constaterez que l'utilisation des balises <PARAM> correspond à la définition des propriétés initiales d'un contrôle sur une feuille. Par exemple, l'ensemble de balises <OBJECT> et <PARAM> ajoute le contrôle Label ActiveX à une page :
Vous pouvez lire et définir des propriétés et appeler des méthodes comme pour tout contrôle de la feuille. Le code ci-dessous, par exemple, comprend des contrôles <FORM> que vous pouvez utiliser pour manipuler deux propriétés du contrôle Label :<OBJECT classid="clsid:99B42120-6EC7-11CF-A6C7-00AA00A47DD2" id=lblActiveLbl width=250 height=250 align=left hspace=20 vspace=0 > <PARAM NAME="Angle" VALUE="90"> <PARAM NAME="Alignment" VALUE="4"> <PARAM NAME="BackStyle" VALUE="0"> <PARAM NAME="Caption" VALUE="Une simple étiquette décousue"> <PARAM NAME="FontName" VALUE="Verdana, Arial, Helvetica"> <PARAM NAME="FontSize" VALUE="20"> <PARAM NAME="FontBold" VALUE="1"> <PARAM NAME="FrColor" VALUE="0"> </OBJECT>
Lors de la définition de la feuille, une procédure d'événement pour le bouton cmdChanger change le texte de l'étiquette :<FORM NAME="LabelControls"> <INPUT TYPE="TEXT" NAME="txtNewText" SIZE=25> <INPUT TYPE="BUTTON" NAME="cmdChanger" VALUE="Changer le texte"> <INPUT TYPE="BUTTON" NAME="cmdPivoter" VALUE="Pivoter l'étiquette"> </FORM>
Le code qualifie les références aux contrôles et valeurs à l'intérieur des feuilles comme dans l'exemple Validation Simple.<SCRIPT LANGUAGE="VBScript"> <!-- Sub cmdChanger_onClick Dim LaFeuille Set LaFeuille = Document.LabelControls lblActiveLbl.Caption = LaFeuille.txtNewText.Value End Sub --> </SCRIPT>
Plusieurs contrôles ActiveX™ sont disponibles pour utilisation avec Internet Explorer. Vous trouverez des informations complètes sur les propriétés, méthodes et événements, ainsi que sur les identificateurs de classe (CLSID) pour les contrôles sur le site Web de Microsoft (http://www.microsoft.com) ou sur le site européen (http://www.eu.microsoft.com). Vous trouverez d'autres informations sur la balise <OBJECT> dans la page Internet Explorer 4.0 Author's Guide and HTML Reference.
Remarque Les versions précédentes d'Internet Explorer exigeaient des accolades ({}) autour de l'attribut d'identificateur de classe et n'étaient pas conformes à la norme W3C. L'utilisation d'accolades avec la version actuelle génère le message "This page uses an outdated version of the <OBJECT> tag".