Solved

tree view

Posted on 2001-06-21
6
168 Views
Last Modified: 2010-05-02
i have an access database with three tables
vehicle (vehicle no , type , etc.)
Test (Test ID, vehicle no , smoke reading, smoke result ,test date, etc.)
Brake (Test ID , Axle no, Reading, result, etc.)

1 vehicle has many tests
1 test has many brake tests

first of all will come the vehicle details above of the form
then i want to put all other information in a tree view

Test Date (1/1/1999)
---Smoke
-------smoke reading
-------smoke result
---Brake
-------Axle no -- for example this is axle one
-----------reading
-----------result
-------Axle no -- the same will be done for other axles
-----------reading
-----------result

and the above diagram will be repeated for each test date

Test Date (2/2/1999)
---Smoke
-------smoke reading
-------smoke result
---Brake
-------Axle no -- for example this is axle one
-----------reading
-----------result
-------Axle no -- the same will be done for other axles
-----------reading
-----------result

Is this possible, if yes, how can i do it
0
Comment
Question by:Brave_Heart
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
6 Comments
 
LVL 52

Expert Comment

by:Ryan Chong
ID: 6217253
Hi, is it the element "Smoke" & "Brake" come from same table?

In database, you can use the SQL "Group By" group test's date to show the results.
0
 

Author Comment

by:Brave_Heart
ID: 6217346
but how can i do the tree view ... i never used it at alll  and how can i connect it to database fields
0
 
LVL 52

Expert Comment

by:Ryan Chong
ID: 6217389
Hi, to add items in a listview:

For i = 1 To adodc1.recordset.recordcount
    LVWS.ListItems.Add i, , "" & adodc1.recordset.fields![abc]
    LVWS.ListItems(i).SubItems(1) = "" & adodc1.recordset.fields![xyz]
Next i

Useful Links:

http://abstractvb.com/code.asp?CID=90

http://www.visualasp.com/demo/source/lv4.txt

Can you post the Table design?
0
Salesforce Made Easy to Use

On-screen guidance at the moment of need enables you & your employees to focus on the core, you can now boost your adoption rates swiftly and simply with one easy tool.

 
LVL 3

Accepted Solution

by:
cmgarnett earned 200 total points
ID: 6217428
Certainly not complete and tested code but it may set you off in the right direction.

rs1 = vehicle file by vehicle ID
rs1.movefirst
while not rs1.eof
  Set nodX = tvw1.Nodes.Add(, , rs1!vehicleid, rs1!vehicleid)
  nodX.Expanded = True
  rs2 = test file by test date and test id where vehicle id = rs1!vehicle id
  rs2.movefirst
  while not rs2.eof
    Set nodX = tvw1.Nodes.Add(rs1!vehicleid, tvwChild, rs2!testdate, rs2!testdate)
    nodX.Expanded = True
    rs3 = brake file by test id and axle no
    while not rs3.eof
      Set nodX = tvw1.Nodes.Add(rs2!Testdate, tvwChild, rs3!axleid, rs3!axleid)
      nodX.Expanded = true
    wend
  wend
wend
0
 
LVL 49

Expert Comment

by:DanRollins
ID: 7139677
Hi Brave_Heart,
It appears that you have forgotten this question. I will ask Community Support to close it unless you finalize it within 7 days. I will suggest to:

    Accept cmgarnett's comment(s) as an answer.

Brave_Heart, if you think your question was not answered at all or if you need help, you can simply post a new comment here.  Community Support moderators will follow up.

EXPERTS: If you disagree with that recommendation, please post an explanatory comment.
==========
DanRollins -- EE database cleanup volunteer
0
 
LVL 1

Expert Comment

by:Computer101
ID: 7174006
Comment from expert accepted as expert

Computer101
E-E Moderator
0

Featured Post

PeopleSoft Has Never Been Easier

PeopleSoft Adoption Made Smooth & Simple!

On-The-Job Training Is made Intuitive & Easy With WalkMe's On-Screen Guidance Tool.  Claim Your Free WalkMe Account Now

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The debugging module of the VB 6 IDE can be accessed by way of the Debug menu item. That menu item can normally be found in the IDE's main menu line as shown in this picture.   There is also a companion Debug Toolbar that looks like the followin…
This article describes some techniques which will make your VBA or Visual Basic Classic code easier to understand and maintain, whether by you, your replacement, or another Experts-Exchange expert.
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

728 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question