Oggetti dizionario VBScript
Un oggetto Dictionary può essere paragonato a un array associativo PERL. Tutti i valori possono essere memorizzati nella matrice e ogni elemento è associato a una chiave univoca. La chiave viene utilizzata per recuperare un singolo elemento e di solito è un numero intero o una stringa, ma può essere qualsiasi cosa tranne un array.
Sintassi
Le classi VBScript sono racchiuse all'interno di Class .... End Class.
Dim variablename
Set variablename = CreateObject("Scripting.Dictionary")
variablename.Add (key, item)
Esempio
<!DOCTYPE html>
<html>
<body>
<script language = "vbscript" type = "text/vbscript">
Dim obj_datadict ' Create a variable.
Set obj_datadict = CreateObject("Scripting.Dictionary")
obj_datadict.Add "a", "Apple" ' Add some keys and items.
obj_datadict.Add "b", "Bluetooth"
obj_datadict.Add "c", "Clear"
</script>
</body>
</html>
Esistono vari metodi associati agli oggetti DataDictionary che consentono agli sviluppatori di lavorare senza problemi con gli oggetti dizionario.
Esiste il metodo
Il metodo Exist aiuta l'utente a verificare se la coppia valore-chiave esiste o meno.
object.Exists(key)
Descrizione dei parametri
Object, un parametro obbligatorio. Questo rappresenta il nome dell'oggetto Dictionary.
Key, un parametro obbligatorio. Questo rappresenta il valore dell'oggetto Dictionary.
Esempio
<!DOCTYPE html>
<html>
<body>
<script language = "vbscript" type = "text/vbscript">
Dim d, msg ' Create some variables.
Set d = CreateObject("Scripting.Dictionary")
d.Add "a", "Apple" ' Add some keys and items.
d.Add "b", "BlueTooth"
d.Add "c", "C++"
If d.Exists("c") Then
msgbox "Specified key exists."
Else
msgbox "Specified key doesn't exist."
End If
</script>
</body>
</html>
Salvare il file come .HTML e, dopo aver eseguito lo script precedente in IE, viene visualizzato il seguente messaggio in una finestra di messaggio.
Specified key exists.
Metodo degli articoli
Il metodo degli elementi ci aiuta a ottenere i valori memorizzati nella coppia chiave-valore dell'oggetto dizionario dati.
object.Items( )
Descrizione dei parametri
Object, un parametro obbligatorio. Questo rappresenta il nome dell'oggetto Dictionary.
Esempio
<!DOCTYPE html>
<html>
<body>
<script language = "vbscript" type = "text/vbscript">
Dim obj_datadict ' Create a variable.
Set obj_datadict = CreateObject("Scripting.Dictionary")
obj_datadict.Add "a", "Apple" ' Add some keys and items.
obj_datadict.Add "b", "Bluetooth"
obj_datadict.Add "c", "C++"
a = obj_datadict.items
msgbox a(0)
msgbox a(2)
</script>
</body>
</html>
Salvare il file come .HTML e, dopo aver eseguito lo script precedente in IE, viene visualizzato il seguente messaggio in una finestra di messaggio.
Apple
C++
Metodo chiavi
object.Keys( )
Descrizione dei parametri
Object, un parametro obbligatorio. Questo rappresenta il nome dell'oggetto Dictionary.
Esempio
<!DOCTYPE html>
<html>
<body>
<script language = "vbscript" type = "text/vbscript">
Dim obj_datadict ' Create a variable.
Set obj_datadict = CreateObject("Scripting.Dictionary")
obj_datadict.Add "a", "Apple" ' Add some keys and items.
obj_datadict.Add "b", "Bluetooth"
obj_datadict.Add "c", "C++"
a = obj_datadict.Keys
msgbox a(0)
msgbox a(2)
</script>
</body>
</html>
Salvare il file come .HTML e, dopo aver eseguito lo script precedente in IE, viene visualizzato il seguente messaggio in una finestra di messaggio.
a
c
Rimuovi metodo
object.Remove(key)
Descrizione dei parametri
Object, un parametro obbligatorio. Questo rappresenta il nome dell'oggetto Dictionary.
Key, un parametro obbligatorio. Questo rappresenta la coppia chiave-valore che deve essere rimossa dall'oggetto Dictionary.
Esempio
<!DOCTYPE html>
<html>
<body>
<script language = "vbscript" type = "text/vbscript">
Dim obj_datadict ' Create a variable.
Set obj_datadict = CreateObject("Scripting.Dictionary")
obj_datadict.Add "a", "Apple" ' Add some keys and items.
obj_datadict.Add "b", "Bluetooth"
obj_datadict.Add "c", "C++"
a = obj_datadict.Keys
msgbox a(0)
msgbox a(2)
obj_datadict.remove("b") 'The key value pair of "b" is removed'
</script>
</body>
</html>
Salvare il file come .HTML e, dopo aver eseguito lo script precedente in IE, viene visualizzato il seguente messaggio in una finestra di messaggio.
a
c
Rimuovi tutto il metodo
object.RemoveAll()
Descrizione dei parametri
Object, un parametro obbligatorio. Questo rappresenta il nome dell'oggetto Dictionary.
Esempio
<!DOCTYPE html>
<html>
<body>
<script language = "vbscript" type = "text/vbscript">
Dim obj_datadict ' Create a variable.
Set obj_datadict = CreateObject("Scripting.Dictionary")
obj_datadict.Add "a", "Apple" ' Add some keys and items.
obj_datadict.Add "b", "Bluetooth"
obj_datadict.Add "c", "C++"
a = obj_datadict.Keys
msgbox a(0)
msgbox a(2)
obj_datadict.removeall
</script>
</body>
</html>