Objet de dictionnaire
Dictionnaire
semblent être plus simples que les tableaux, cependant, les objets Dictionnaire sont une solution plus satisfaisante pour gérer les données associées.
Les clés sont utilisées pour identifier les éléments d'un objet Dictionnaire.
Il n'est pas nécessaire d'appeler ReDim pour modifier les dimensions de l'objet Dictionnaire.
Lorsqu'un élément est supprimé d'un objet Dictionnaire, les éléments restants sont automatiquement déplacés vers le haut
. , alors que les tableaux sont
. Dictionary a plus que les tableaux. L'objet intégré
Dictionary fonctionne mieux que les tableaux lors de l'accès fréquent à des éléments aléatoires.
Le dictionnaire fonctionne mieux que les tableaux lors de la localisation d'éléments en fonction de leur contenu.
Les propriétés et méthodes de l'objet Dictionary sont décrites comme suit :
Propriétés
CompareMode : définit ou renvoie le mode de comparaison utilisé pour comparer les clés dans les objets du dictionnaire.
Count : renvoie le nombre de paires clé/élément dans l’objet Dictionary.
Élément : définit ou renvoie la valeur d'un élément dans l'objet Dictionnaire.
Clé : définissez une nouvelle valeur de clé pour la valeur de clé existante dans l'objet Dictionnaire.
méthode
Ajouter : ajoute une nouvelle paire clé/élément à l'objet Dictionnaire.
Existe : renvoie une valeur logique qui indique si la clé spécifiée existe dans l'objet Dictionnaire.
Items : renvoie un tableau de tous les éléments de l’objet Dictionary.
Clés : renvoie un tableau de toutes les clés de l'objet Dictionnaire.
Supprimer : supprime la paire clé/élément spécifiée de l'objet Dictionnaire.
RemoveAll : supprime toutes les paires clé/élément dans l’objet Dictionnaire.
code de programme
<%
Dim oDic,aItems,aKeys
Définir oDic = Server.CreateObject("Scripting.Dictionary")
'Ajouter
oDic.Ajouter "aaa",111
oDic.Ajouter "bbb",222
oDic.Ajouter "ccc",333
oDic.Add "ddd",444
'Modifier
Si oDic.Exists("aaa") Alors
oDic.key("aaa") = "eee" 'attribut clé, en lecture seule
oDic.item("eee") = 555 'attribut d'élément, lisible et inscriptible
la liste
si
aKeys = oDic.Keys
aItems = oDic.Items
Pour i=0 À oDic.Count-1
Réponse.Write(aKeys(i) & "," & aItems(i))
Suivant
'Supprimer
Réponse.Write(oDic.Count)
oDic.Remove("eee") 'Supprimer les paires clé et élément de l'objet Dictionnaire
Réponse.Write(oDic.Count)
oDic.RemoveAll() 'Supprime toutes les paires de clés et d'éléments dans l'objet Dictionnaire
Response.Write (oDic.Count)
Définir oDic = Rien
%>