Object Reference
- Classes
- Command Interface
- External
- General
- System Core
- System Library
xf_DataList
xf_Scripterxf_ScripterSQL Script Generation and Processing
Public Function CreateBinaryUpdateStatement (
dbs As DAO.Database,
TableName As String,
BinaryFieldName As String,
KeyFieldList As String,
Optional WhereOrOrderByClause As String = ""
) As String
Generate enhanced BINARY_UPDATE statement to update data in binary fields of table TableName using text-encoded hex values. Only one field may be scripted at a time because of possible script size issues (the hex-formatted binary block can be very large).
dbs as DAO.Database
The database object to generate the script against
TableName as String
The name of the table to create
BinaryFieldName as String
Generate SET clauses for this binary field/column
KeyFieldList as String
Generare WHERE clause for these key columns
Optional WhereOrOrderByClause as String = ""
A full SQL WHERE and/or ORDER BY clause restricting or ordering the dataset used to generate the UPDATE statements
Call Template:
Dim s As String
s = xf.Scripter.CreateBinaryUpdateStatement(dbs, TableName, BinaryFieldName, KeyFieldList)
s = xf.Scripter.CreateBinaryUpdateStatement(dbs, TableName, BinaryFieldName, KeyFieldList, WhereOrOrderByClause)
See Also:
Example 1:
Debug.Print CreateBinaryUpdateStatement("xf_tblDocStore", "DocImage", "Doc_ID")
returning three rows as an INSERT statements ...
UPDATE tblKeyNames SET KeyValDesc='Unmatched',KeyValDescShort='Unmatched'
WHERE KeyName='ReconStatusStr' AND KeyVal='U'