Object Reference

Classes
Command Interface
- xf_Command
External
- xf_External_VB6_32bit
- xf_External_VB7_32_64bit
General
System Core
System Library

xf_DbConnectDatabase Access Wrapper

Public Function ReadBoundControlsFromDb (
f As Form,
sqlStr As String,
Optional BindingGroupNum As Integer = 0 ,
Optional UseExtendedRSType As Boolean = False,
Optional SuppressError As Boolean = False
) As Boolean

Read data from single-record SQL result set to controls identified by tags of form "Bx:FieldName" where x is the group number Optionally "Rx:FieldName" reads the data but does not write it later (good for comparison copies of data for 'dirty' checks) Error occurs in ODBCDirect workspace connection dbOpenForwardOnly recordset where a memo column is returned In this case, call with UseExtendedRSType=true

f as Form

The target form.

sqlStr as String

The SELECT statement defining the data to be read

Optional BindingGroupNum as Integer = 0

The binding group. Multiple binding groups may be used to read several different datasets to the same form

Optional UseExtendedRSType as Boolean = False

Deal with ODBCDirect workspace connection dbOpenForwardOnly recordset where a memo column is returned

Optional SuppressError as Boolean = False

Don't display a message if an error occurs

Call Template:

Dim b As Boolean

b = xf.DbConnect.ReadBoundControlsFromDb(f, sqlStr)

b = xf.DbConnect.ReadBoundControlsFromDb(f, sqlStr, BindingGroupNum, UseExtendedRSType, SuppressError)

Example 1:

xf.Controls.ReadBoundControlsFromDb dbs, me, "SELECT * FROM Category", 3