Solved

Finding the list of available databases and tables in a database

Posted on 2000-03-29
4
145 Views
Last Modified: 2010-04-04
Does anyone have some code on how to get a list of available databases and then a list of the available tables in each database?
0
Comment
Question by:phillip1
4 Comments
 
LVL 2

Expert Comment

by:NetoMan
ID: 2666578
what kind of databases are you using (Oracle / MSAcces / SQLServer ) ?


0
 
LVL 6

Expert Comment

by:DrDelphi
ID: 2666627
You mean other than Database Explorer?
0
 
LVL 13

Accepted Solution

by:
Epsylon earned 200 total points
ID: 2667093
Use a TSession component:

  Session1.SessionName := 'somename';
  Session1.GetAliasNames(ListBox1.Items);
  Session1.GetTableNames('DBDEMOS', '*.db',False, False, ListBox2.Items);


Cheers,

Epsylon.
0
 

Author Comment

by:phillip1
ID: 2669746
Works perfectly.  You're a genius.  Thanks,
Phil
0

Featured Post

Why You Should Analyze Threat Actor TTPs

After years of analyzing threat actor behavior, it’s become clear that at any given time there are specific tactics, techniques, and procedures (TTPs) that are particularly prevalent. By analyzing and understanding these TTPs, you can dramatically enhance your security program.

Join & Write a Comment

Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
Get a first impression of how PRTG looks and learn how it works.   This video is a short introduction to PRTG, as an initial overview or as a quick start for new PRTG users.
When you create an app prototype with Adobe XD, you can insert system screens -- sharing or Control Center, for example -- with just a few clicks. This video shows you how. You can take the full course on Experts Exchange at http://bit.ly/XDcourse.

707 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

Need Help in Real-Time?

Connect with top rated Experts

16 Experts available now in Live!

Get 1:1 Help Now