Hi
I have a really weird problem and any assistance would be welcome.
I have developed an app in Access 2002. The app runs perfectly on the
development machine. I have packaged the app
using the Microsoft XP Developer Packaging Wizard (Service Pack 1). The 1st
3 releases of the app ran perfectly on
site.
On Friday the 4th release of the app went out to a customer. The app opened
perfectly but on clicking OK on my login form
I get the error : 3220 - The functiom is not available in expression in
table level validation expression.
I took the 2 main files one mde file containing the application and an mdb
file containing the data which is linked into the
mde file from the support directory on the installation CD and copied them
to a machine which has Office XP Professional
loaded (as I can not simulate the error on the box used for development). I
found that when I went into a table that when
manually entering a record I got the same error, the weird part is neither
the table nor the code populating the table
has changed since the 1st release of the app (In fact it is code I use for a
table and module that I use in many other
applications).
The table layout is as follows :
Key AutoNumber Primary Key
UserName Text(15) Mandatory
No Default Value
SecurityLevel Long Integer Mandatory
Default Value 0
DBChanged Text(20) Mandatory
No Default Value
RecordChanged Text(100) Mandatory
No Default Value
DBAction Text(100) Mandatory
No Default Value
DateChanged Date/Time Mandatory
Default Value Date()
TimeChanged Date/Time Mandatory
Default Value Time()
TillNo Integer
Default Value 0
The code used to populate the table is as follows :
Sub logchg(tbl As String, rec As Variant, action As String)
Dim srec As String
Dim logrs As Recordset
srec = CStr(rec)
Set logrs = db.OpenRecordse t("tblLog")
logrs.AddNew
logrs![UserName] = modGlobals.user
logrs![SecurityLevel] = modGlobals.Secu rityLevel
logrs![DbChanged] = tbl
logrs![RecordChanged] = srec
logrs![DBAction] = action
logrs![TillNo] = modGlobals.Till No
logrs.Update
logrs.Close
End Sub
The call that causes the error is :
Call modSecurity.log chg("N/A", "N/A", "LOGON")
Can anyone explain why I get the error ?
TIA
Steve
I have a really weird problem and any assistance would be welcome.
I have developed an app in Access 2002. The app runs perfectly on the
development machine. I have packaged the app
using the Microsoft XP Developer Packaging Wizard (Service Pack 1). The 1st
3 releases of the app ran perfectly on
site.
On Friday the 4th release of the app went out to a customer. The app opened
perfectly but on clicking OK on my login form
I get the error : 3220 - The functiom is not available in expression in
table level validation expression.
I took the 2 main files one mde file containing the application and an mdb
file containing the data which is linked into the
mde file from the support directory on the installation CD and copied them
to a machine which has Office XP Professional
loaded (as I can not simulate the error on the box used for development). I
found that when I went into a table that when
manually entering a record I got the same error, the weird part is neither
the table nor the code populating the table
has changed since the 1st release of the app (In fact it is code I use for a
table and module that I use in many other
applications).
The table layout is as follows :
Key AutoNumber Primary Key
UserName Text(15) Mandatory
No Default Value
SecurityLevel Long Integer Mandatory
Default Value 0
DBChanged Text(20) Mandatory
No Default Value
RecordChanged Text(100) Mandatory
No Default Value
DBAction Text(100) Mandatory
No Default Value
DateChanged Date/Time Mandatory
Default Value Date()
TimeChanged Date/Time Mandatory
Default Value Time()
TillNo Integer
Default Value 0
The code used to populate the table is as follows :
Sub logchg(tbl As String, rec As Variant, action As String)
Dim srec As String
Dim logrs As Recordset
srec = CStr(rec)
Set logrs = db.OpenRecordse t("tblLog")
logrs.AddNew
logrs![UserName] = modGlobals.user
logrs![SecurityLevel] = modGlobals.Secu rityLevel
logrs![DbChanged] = tbl
logrs![RecordChanged] = srec
logrs![DBAction] = action
logrs![TillNo] = modGlobals.Till No
logrs.Update
logrs.Close
End Sub
The call that causes the error is :
Call modSecurity.log chg("N/A", "N/A", "LOGON")
Can anyone explain why I get the error ?
TIA
Steve
Comment