Ivalid operation 3219 using CreateProperty method

[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

 

[Douglas J. Steele]

Which line is causing the error? I'm not sure that dbInteger is the correct
type for DecimalPlaces. Try dbByte.

 

[James Napolitano]

Yes, dbByte fixed the issue. Thanks a million!!!

-----Original Message-----
Which line is causing the error? I'm not sure that dbInteger is the correct
type for DecimalPlaces. Try dbByte.

--
Doug Steele, Microsoft Access MVP

(no e-mails, please!)





.