I need to remove/replace a few troublesome characters in an imported table. The following is my current approach; fine for <5K record sets, but painfully slow on larger sets >20K records.

I'm guessing there are better ways to accomplish than stepping thru each record and performing a Replace:

```
    Set rs = db.OpenRecordset("TblMatch")
    Do While Not rs.EOF
        strDesc = Replace(Nz(rs!DESC), Chr(39), Chr(39) & Chr(39))
        strDesc = Replace(Nz(rs!DESC), Chr(34), "")
        strDesc = Replace(Nz(rs!Validated_DESC), Chr(39), Chr(39) & Chr(39))
        strDesc = Replace(Nz(rs!Validated_DESC), Chr(34), "")
        rs.MoveNext
    Loop

```

Would the following be more efficient?

```
    db.Execute "UPDATE TblMatch SET TblMatch.Desc = Replace([Desc],Chr(39),Chr(39) & Chr(39));"

```

Any suggestions or pointers?

Thank you!