Improve company productivity with a Business Account.Sign Up

x
?
Solved

About Columns

Posted on 2004-08-02
6
Medium Priority
?
250 Views
Last Modified: 2010-04-17
Hi !

I want some function which is equivalent to SQLNumResultCols( ) in VB, since iam using ADODB.
Also i want to count the Column Length of a table, how can i do ?

Can someone help me with a piece of code please.... would be much helpful..

Regards
0
Comment
Question by:raghx_2000
  • 2
4 Comments
 
LVL 1

Expert Comment

by:bwh1te
ID: 11701562
You could put your adodb recordset results in to variant array which would give you the ability to count the rows. The method is getRows as shown below. If you stuffed this into a function then for each recordset you return you can count through the array dimension and get you column count / row count etc.

Dim objRs As New ADODB.Recordset
Dim objCmd As New ADODB.Command
Dim objConn As New ADODB.Connection
objConn.Open strDbConnectionString
objCmd.CommandText = strSQL
objCmd.CommandType = adCmdText
Set oCmd.ActiveConnection = objConn
ObjRs.Open oCmd


MethodName = objRs.GetRows
dim i as integer
for i = 0 to uBound(MethodName)
  'do what you want with your array data in here such as count the number of columns
next

objRs.Close
objConn.Close
Set objRs= Nothing
Set objCmd= Nothing
Set objConn= Nothing


 

0
 
LVL 1

Expert Comment

by:johanmulder
ID: 11715635
objRs.Fields.count is also preferable in this way.
0
 
LVL 3

Author Comment

by:raghx_2000
ID: 11750548
I think some mistake here !

I dont want to count columns, i want to count the length of each column in a table.
Ex: if i have a columns like this in table XXX then
Column name  Datatype Lenght
Name             VArchar  12
Id                   Numeric 6
Then i must count the length....
How .... ?
any code sample will do....
0
 
LVL 1

Accepted Solution

by:
johanmulder earned 80 total points
ID: 11750596
O Right, got it now :)

there is a propertie of a column, the DefinedSize propertie, which returns the defined length of your field:

 objRs.Fields(1).DefinedSize

 If this one fails VB will return the value of the ActualSize propertie instead (which is de actual size of the stored data itself).
0

Featured Post

What Kind of Coding Program is Right for You?

There are many ways to learn to code these days. From coding bootcamps like Flatiron School to online courses to totally free beginner resources. The best way to learn to code depends on many factors, but the most important one is you. See what course is best for you.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

When you see single cell contains number and text, and you have to get any date out of it seems like cracking our heads.
The SignAloud Glove is capable of translating American Sign Language signs into text and audio.
Loops Section Overview
Screencast - Getting to Know the Pipeline

606 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