Hi,
One of our clients is getting that error when they are trying to save
a record but I can not duplicate it here. The data is on another PC
and is linked to two workstations.
The code (listed below) is just saving interests selected from a
multi-list list box.
I've never seen that error message before. Any ideas? What does it
mean by "temporary disk"?
-paulw
*----
Set db = CurrentDb
Set rs = db.OpenRecordset("tblClientInterests")
Set ctl = Me.[lstSelected]
' First delete any records that might exist for the client:
db.Execute "DELETE * FROM " _
& "[tblClientInterests] WHERE ClientID = " &
Forms![frmClientEntry]![ClientID] & ";"
' Write the selections to the table:
For i = 0 To ctl.ListCount - 1
varItem = ctl.ItemData(i)
rs.addnew
rs![interest] = varItem
rs![ClientID] = Forms![frmClientEntry]![ClientID]
rs.Update
Next
rs.Close
Set rs = Nothing
Set db = Nothing
Set ctl = Nothing