ASP Code to generate the schema of an SQL Table (field name, Data types , Size)

[Robert]

Anyone has this SQL STATEMENT to traverse the User defined tables?

I just need the Select Statement to get this info the rest I can handle.

I am not interested is revealing the system table information just my
created tables schema.

Psuedo code like as follows:

dim cn ' ADOVBS.Connection
dim rsUserTableNames ' ADOVBS.Recordset
dim vTable ' variant
dim fldUserTableFieldNames ' ADOVBS.Fields
dim vFld ' variant

Set cn =
Server.CreateObject("ADODB.Connection")
Set rsUserTableNames =
Server.CreateObject("ADODB.Recordset")

Set cn = CreateObject( I don't
need this)

Set rsUserTableNames = CreateObject( "I need this SQL
Statement") <--- SQL STATEMENT to traverse the User defined tables???

For each vTable in rsUserTableNames
Response.Write vTableName.Name & <br> & <br> & <br>
For each vFld in vTableName
Response.write vFld.Name & <br> & vFld.Type & <br> &
vFld.Size
next
next

Thank you for your assistance

Robert H. Weinstein
Associate Programmer Analyst (Specialist)
Office of Technology Resources

[Bob Barrows]

Robert wrote:

> Anyone has this SQL STATEMENT to traverse the User defined tables?
>

In SQL Server 7 and above, there are a group of Views owned by the
INFORMATION_SCHEMA login: INFORMATION_SCHEMA.Tables,
INFORMATION_SCHEMA.Columns, etc. These views contain the information you are
looking for. You can simply run a query against them to get the needed
information. See SQL Books Online (BOL) for more information.

HTH,
Bob Barrows
--
Microsoft MVP -- ASP/ASP.NET
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.

[Jeff Cochran]

On Tue, 23 Dec 2003 13:21:36 -0800, "Robert" <nospam@hotmail.com>
wrote:

>Anyone has this SQL STATEMENT to traverse the User defined tables?

Does this help?

[url]http://www.aspfaq.com/show.asp?id=2178[/url]

Jeff

>
>I just need the Select Statement to get this info the rest I can handle.
>
>I am not interested is revealing the system table information just my
>created tables schema.
>
>Psuedo code like as follows:
>
> dim cn ' ADOVBS.Connection
> dim rsUserTableNames ' ADOVBS.Recordset
> dim vTable ' variant
> dim fldUserTableFieldNames ' ADOVBS.Fields
> dim vFld ' variant
>
> Set cn =
>Server.CreateObject("ADODB.Connection")
> Set rsUserTableNames =
>Server.CreateObject("ADODB.Recordset")
>
> Set cn = CreateObject( I don't
>need this)
>
> Set rsUserTableNames = CreateObject( "I need this SQL
>Statement") <--- SQL STATEMENT to traverse the User defined tables???
>
> For each vTable in rsUserTableNames
> Response.Write vTableName.Name & <br> & <br> & <br>
> For each vFld in vTableName
> Response.write vFld.Name & <br> & vFld.Type & <br> &
>vFld.Size
> next
> next
>
>Thank you for your assistance
>
>Robert H. Weinstein
>Associate Programmer Analyst (Specialist)
>Office of Technology Resources
>