gemma-the-husky, you are right: my records are non-updatable.
Do you have a usual way to retrieve data?
Thanks.
???
Set db = OpenDatabase("D:\Test.mdb")
strSql = "SELECT Table1.* FROM Table1 WHERE strSO = '" & vbSO & "'"
Set rs = db.OpenRecordset(strSql, dbOpenDynaset
???