J
James Napolitano
I am creating a table and receive a 3219 invalid operation
error when attempting to append the following prp property.
note: the exact same code works in another routine for
another table.
dim fldSource as DAO.Field
dim prp as DAO.Property
Select Case GetSourceType
Case "Single", "Double"
Set prp = fldSource.CreateProperty("Format",
dbText, "Fixed")
fldSource.Properties.Append prp
fldSource.Properties.Refresh
Set prp = fldSource.CreateProperty("DecimalPlaces",
dbInteger, GetSourceDecimal)
fldSource.Properties.Append prp
fldSource.Properties.Refresh
End Select
Any suggestions will be greatly appreciated.
Thanks
error when attempting to append the following prp property.
note: the exact same code works in another routine for
another table.
dim fldSource as DAO.Field
dim prp as DAO.Property
Select Case GetSourceType
Case "Single", "Double"
Set prp = fldSource.CreateProperty("Format",
dbText, "Fixed")
fldSource.Properties.Append prp
fldSource.Properties.Refresh
Set prp = fldSource.CreateProperty("DecimalPlaces",
dbInteger, GetSourceDecimal)
fldSource.Properties.Append prp
fldSource.Properties.Refresh
End Select
Any suggestions will be greatly appreciated.
Thanks