You can get what you're looking for from SQL.
Here's a rough cut:
Dim rs As rdoResultset
Dim SQLStatement As String
SQLStatement = "Select b.name, b.prec, b.scale " & _
" from sysobjects a, syscolumns b " & _
" where a.name='tPlan' and (b.id = a.id)"
Set rs = g_rdoConnection.OpenResultset(SQLStatement, rdOpenForwardOnly)
Do While Not rs.EOF
Debug.Print rs!Name, rs!prec, rs!Scale
rs.MoveNext
Loop
rs.Close
The result:
PlanNumber 6 Null
PlanName 32 Null
Administrator 30 Null
Salary 8 3
>Hi,
>If I have a column in the database defined as DECIMAL(8,3)
>[or NUMERIC(8,3)], how can I (using rdo) find out the size of the
>(8,3) part. I can easily get the fact that it's a DECIMAL data type
>via rdoColumn object, but I can't seem to get the scale and precision
>portions....
>Thanks!
>----------------------------------------------------
>Greg Strauss
>Visionary Solutions Corp.
>Victoria, BC
>(remove abc above for email address)