I have a database that works great on my laptop where it was created.
I placed it on our server but I am the only one who can access and
work with it. Everyone else gets an error for the String.

Any suggestions? This is the actual error:

Private Sub Combo230_AfterUpdate()
   ' Find the record that matches the control.
   Dim rs As Object

   Set rs = Me.Recordset.Clone
   rs.FindFirst "[Quality Plan ID] = " & Str(Nz(Me![Combo230], 0))
   If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

where ther error is at 'Str'.

Thank you
Dyper