Solved

Using ADO to retrieve field captions

Posted on 2001-08-21
9
354 Views
Last Modified: 2012-06-21
Some code:

<%

Dim rs, conn
Set rs = Server.CreateObject("ADODB.Recordset")
Set conn = Server.CreateObject("ADODB.Connection")

conn.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("database.mdb")

conn.Open

rs.Open "SELECT * FROM MyTable", conn, 2, 3

' If I wanted to retrieve the field NAMES I would do this

For Each fld In rs.Fields
   Response.Write fld.Name & "<br>" & vbCr
Next

' But I want to retrieve the field's
' caption or description!
%>

So in design view my database looks like this:

Field ------ Type ------ Description
Username --- Text ------ The username on this account
Password --- Text ------ The password matching username

I want my for loop to output "The username on this account" and "The password matching username" instead of Username and Password.

Thanks in advance.

Dan
0
Comment
Question by:SuperMario
  • 2
  • 2
  • 2
  • +3
9 Comments
 
LVL 3

Author Comment

by:SuperMario
ID: 6410760
I wish they had a way to include <FONT FACE="Fixedsys">fixed-width</FONT> font styles.
0
 
LVL 7

Expert Comment

by:John844
ID: 6410830
This feature in access in not supported in all other databases.  I don't think ado has any builtin capabilities to read this property of a field.  You might look into dao which is more access specific, but not optimized for web usage.

John
0
 
LVL 5

Expert Comment

by:raizon
ID: 6411130
Use this.

<%

Dim rs, conn
Set rs = Server.CreateObject("ADODB.Recordset")
Set conn = Server.CreateObject("ADODB.Connection")

conn.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("database.mdb")

conn.Open

rs.Open "SELECT * FROM MyTable", conn, 2, 3

Set Fields = rs.Fields

' If I wanted to retrieve the field NAMES I would do this

For Each fld In Fields
  Response.Write fld.Name & "<br>" & vbCr
Next

' But I want to retrieve the field's
' caption or description!
%>
0
Free Tool: Postgres Monitoring System

A PHP and Perl based system to collect and display usage statistics from PostgreSQL databases.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
LVL 20

Expert Comment

by:jitganguly
ID: 6411132
Actually it is do-able. I was answering a same question in SQLServer, but mgfranz came up with his briliant idea of using Ole db. Check this
Use COLUMN_SIZE,with COLUMN_NAME and TABLE_NAME

<%    
Set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionTimeout = 15
conn.CommandTimeout =  10
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & Server.MapPath("data/database.mdb")
   Set rstSchema1 = conn.OpenSchema(4)
   Do Until rstSchema1.EOF
   Response.Write "<BR>Table name : " & rstSchema1("TABLE_NAME") _
& vbCrLf & ", Column Name : " & rstSchema1("COLUMN_NAME") & vbCrLf
   rstSchema1.MoveNext
   Loop
   rstSchema1.Close
conn.Close
%>
0
 
LVL 2

Expert Comment

by:AccessHelpNet
ID: 6416051
jitjanguy is right and should get points, however he neglected to put in his code the statement I think you are most interested in:

Response.write rstSchema1("DESCRIPTION")

As far as I have seen this only works in Access.  Populating the DESCRIPTION is optional for OLEDB providers, however, both OLEDB for ODBC and native JETOLEDB drivers seem to support it just fine.

regards,

Dave Kawliche
http://AccessHelp.net
http://1ClickDB.com
0
 
LVL 3

Author Comment

by:SuperMario
ID: 6423610
Thanks Access...
That's precisely what I need.

Who do you guys think deserves the points?

-Dan
0
 
LVL 2

Expert Comment

by:AccessHelpNet
ID: 6423635
My vote is for jitganguly

regards,

Dave Kawliche
http://AccessHelp.net
http://1ClickDB.com
0
 
LVL 20

Accepted Solution

by:
jitganguly earned 50 total points
ID: 6423653
Yes, I deserve points here :-)
0
 
LVL 33

Expert Comment

by:hongjun
ID: 8630943
AccessHelpNet or robbert, how about the "Caption"? I can't get the caption. "COLUMN_NAME" gives me the column name and not the caption. I found this question using search.

hongjun
0

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

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

Suggested Solutions

Title # Comments Views Activity
Select distinct 25 115
Bypass cross origin issues on development site 3 86
Change visitor's REMOTE_ADDR to server's REMOTE_ADDR 2 38
Weighted Randomizing 6 29
I would like to start this tip/trick by saying Thank You, to all who said that this could not be done, as it forced me to make sure that it could be accomplished. :) To start, I want to make sure everyone understands the importance of utilizing p…
This demonstration started out as a follow up to some recently posted questions on the subject of logging in: http://www.experts-exchange.com/Programming/Languages/Scripting/JavaScript/Q_28634665.html and http://www.experts-exchange.com/Programming/…
In a recent question (https://www.experts-exchange.com/questions/29004105/Run-AutoHotkey-script-directly-from-Notepad.html) here at Experts Exchange, a member asked how to run an AutoHotkey script (.AHK) directly from Notepad++ (aka NPP). This video…

790 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