Property Fields: IsahFields_Object (R)
Description
Retrieves column data from a result set.
Remarks
Since the Fields Property is the default property it can be left out.
Example
Sub Main()
Dim
SQL
Dim
Query
Dim
Answer
Dim
IsahFields
SQL = "
Select LangCode, Description From Language
"
Dim
Query = Application.DataBase.CreateQuery( SQL )
Query.Open
Set
IsahFields = Query.Fields
Answer = "EN"
If
Query.LookUp("
Find a language
","
Language
")
then
' Use the fact that IsahFields_Object.Fields
' and IsahField_Object.Fields are default properties
Answer = Query("
Language
").Value
' Once again but without using the default properties
Answer = Query.Fields.Fields("
Language
").Value
' Once again but this time different
Answer = IsahFields.Fields("
Language
").Value
End if
Query.Close
End Sub