Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

retrieve values from queries or from obects in VBA

Status
Not open for further replies.

BeginninProgrammer

Programmer
Joined
Sep 10, 2002
Messages
3
Location
IT
I tried to retrieve a matrix of values from an object or from a query, but I failed.

Can someone help me?
Thank you very much.
 
Hello BeginninProgrammer,

You are a bit brief with the description of your problem. What are you trying to do? Do you mean recordset when you say matrix? Are you working on a universe?

Go into more detail and we'll sort it out , me thinks... T. Blom
Information analist
Shimano Europe
tbl@shimano-eu.com
 
Sorry, I hope these informations can be a bit more exhaustive:

-Retrieving a recordset could be the best solution.

-I'm working with on a universe.

-I've got BO embedded.

Thank you.

 
Okay, this makes it all clear.........

Not really. What are you trying to achieve (example) and what goes wrong? At its most basic (1 query on a universe) the result is a recordset of 1 or more rows of data. If the query retrieves no data BO gives a pop-up: "No data retrieved for query...... ". BO standard displays retrieved in a simple table as a start. Check what query retrieves through data --> view data. What do you mean when you say that you have BO embedded (such as saying where you embed it in)

Really, this forum has many members that will take the time to go over your problem if there is sufficient info to dabble with. (As not in this case..........) T. Blom
Information analist
Shimano Europe
tbl@shimano-eu.com
 
I tried this way:

Dim i as Long
Dim LOV As ListOfValues
Set LOV = Application.Universes.Item("CP - Anagraf./Listini (test)").Classes.Item("Articolo").Objects.Item("Codice Funzionale").ListOfValues


For i = 1 To UBound(LOV.Values)
me.ListBox1.AddItem LOV.Values(i)'this causes error
Next

I made me sure that Ubound(LOV.Values) is = 13
but i get error 450 (wrong number of arguments or property).

At the same way I would like to get a list of values from a query on a universe.

Maybe this is it
bye
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top