1.8.1 DefinedSize property

Indicates the defined size of a Field object.

object.DefinedSize

1.8.2 Name property

Returns the name of a Field object.

object.Name[=Object As String]

1.8.3 Value property

Returns the value assigned to a Field object.

object.Value

1.8.4 Sample Script for Field and Fields Objects

This sample script retrieves the information about the employees from EMP table.

The sample does the following:

• Opens a connection to Oracle database.
• Executes an SQL query to get the employee details.
• Displays the fields of the EMP table.

’Sample script for Fields collection and Fields object

On Error Resume Next

Set CN = CreateObject("UCX:NDODB.CONNECTION")
CN.Open ("DBTYPE=0;DATABASE=ORANW81.WORLD", "scott","Tiger")
Set RS = CN.Execute("Select * from emp", lRec)
Set FLDS = RS.Fields
RecValue = ""
PrintLine (25)
Print FLDS.Count

’ Print the values of the properties of the field object.
’
For FldCount = 1 To FLDS.Count
    Set FLD = FLDS.Item(FldCount)
    RecValue = RecValue & CStr(FLD.Name) & "/" &CStr(FLD.Value) & "/" & CStr(FLD.DefinedSize)
    Print RecValue
    RecValue = ""
Next
PrintLine (25)
CN.Close

’Subroutine to print a line
’
Sub PrintLine(Number)
    For PrintCount = 1 To Number
        Line = Line & "-"
    Next
    Print Line
End Sub