Scripting.Dictionary

[moke123]

I've been playing around with dictionaries trying to get a grip on how to use them and what they can do.

I've been trying to declare a public dictionary so that its members are available to other procedures within the module.
It seems to work OK if I add the keys and items using Dict.Add "SomeKey", "SomeValue"

If I try to open a recordset and use Dict.Add "SomeKey", rs!SomeField and If I try to access any member I get an error that the object no longer exists.

Am I missing something? Or is this not possible?

 

[Grumm]

From what I found, you will need to store the rs!SomeField in a variable first.
Then use the variable.
Without a data type, dictionary stores a pointer to the memory location instead of memory itself. So that may cause your problem.

 

[moke123]

As I typed my question that thought came to mind but I haven't had a chance to test it yet. Thanks for reply.
That makes sense that once the recordset is set = nothing its no longer available.
It may also explain another error message re: datatype

 

[jdraw]

Moke,

Paul Kelly has some youtube videos on various subjects. He is an Excel person(I'm not), but his vba stuff is very good (IMHO). Here's one on Dictionary.

 

[apr pillai]

An example of handling Recordset in Dictionary Object:

Dictionary

 

[moke123]

@Grumm That seems to have done the trick!

@apr pillai I bookmarked your link, will check it out tonight. thanks.
Same for @jdraw.

 

[MajP]

You may want to relook at my thread on custom collections. You can take your dictionary and wrap it in a class and make a custom "collection" using a dictionary instead of a collection for the class variable.

Advanced Class Concepts

Advanced Class Concepts I have posted several threads on using custom classes to extend the capabilities of controls and make pseudo "user controls". https://www.access-programmers.co.uk/forums/threads/developing-custom-classes-to-simulate-user-controls.309080/ This thread has additional concepts.

www.access-programmers.co.uk

This way you can make dedicated
Add
Item
Delete
etc.
Especially if this is tailored to do one thing. You can make get information out of the dictionary easier.

 

[Cronk]

Moke, you can add brackets around the recordset field
Dict.Add "SomeKey", (rs!SomeField)

 

[moke123]

@MajP I'm still looking at the challenges. Thats what got me messing around with collections and dictionaries.
@Cronk I think I had tried that but not in the add statement. I'll take another look, thanks.

 

[moke123]

Moke, you can add brackets around the recordset field
Dict.Add "SomeKey", (rs!SomeField)

The parenthesis work well. Thanks .

 

[Grumm]

There are a lot of workarounds for this I guess.
Using .value should also work