Runtime Error '-2147417848 (80010108) Method 'MoveFirst' of object 'Recordset2' failed

[QA_Compliance_Advisor]

Access Ver: 2013 64-bit



I am getting this error for any property .movelast, .movefirst & .movenext.

Dim rsRecipeFragrance As DAO.Recordset


Set rsRecipeFragrance = Forms!sf_Product!sf_Recipe_Fragrance.Form.Recordset


With rsRecipeFragrance
If .RecordCount <> 0 Then
    
    If Not .BOF And Not .EOF Then
        
            .MoveLast
            .MoveFirst
          
            Do While Not .EOF
            .Edit
            !RecipeIngredientVolume = DLookup("ProductConcentration", "tbl_product", "ProductID = " & rsRecipeFragrance!RecipeProductID) * DLookup("ProductVolume", "tbl_product", "ProductID = " & rsRecipeFragrance!RecipeProductID)
            !RecipeIngredientUnitRatio = rsRecipeFragrance!RecipeIngredientDropUnit / DSum("RecipeIngredientDropUnit", "tbl_recipe", "RecipeProductID =" & rsRecipeFragrance!RecipeProductID)
            !RecipeIngredientQuantity = rsRecipeFragrance!RecipeIngredientUnitRatio * rsRecipeFragrance!RecipeIngredientVolume

            .Update
            
            .MoveNext
            Loop
    End If
End If
End With

I am currently trying to open a recordset for the subform only rather than opening the whole table and carrying out the calculation for the records.

any suggestions?

[June7]

You should probably use the form's RecordsetClone. That's what I do.