Home Cart [Log In] About Us Contact Us

Object Reference

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

xf_ScripterSQL Script Generation and Processing

Public Function GetFieldValidDefaultVal (
FieldType As DAO.DataTypeEnum,
Attributes As Long,
FieldLength As Integer
) As String

Get a valid default value for the passed type

FieldType as DAO.DataTypeEnum

The DAO Field DataTypeEnum

Attributes as Long

The DAO Field Attributes property

FieldLength as Integer

The field length property for variable length fields

Call Template:

Dim s As String

s = xf.Scripter.GetFieldValidDefaultVal(FieldType, Attributes, FieldLength)

Example 1:

Debug.Print xf.Scripter.GetFieldValidDefaultVal(dbBoolean, 0, 0)             --> False
Debug.Print xf.Scripter.GetFieldValidDefaultVal(dbDate, 0, 0)                --> 1/01/1970
Debug.Print xf.Scripter.GetFieldValidDefaultVal(dbText, 0, 170)              --> -