создаю соединение
obj_RDS =CREATEOBJECT("ADODB.Connection")
rs=CREATEOBJECT("ADODB.Recordset")
obj_RDS.Open('Provider=VFPOLEDB.1;Data Source=C:\dan_dogovor\contrag\conosn.dbf;Persist Security Info=False')
или так
obj_RDS.Open('Provider=VFPOLEDB.1;Data Source=C:\dan_dogovor\contrag\conosn.dbf;User Id=sa;Mode=ReadWrite;Password="";Collating Sequence=MACHINE')

чтение данных - нормально
запись:

rs.Close
rs.Open ("Select * from conosn", obj_RDS, 1, 3)
rs.AddNew
rs.Fields("osnnd").value=thisform.combo1.Value
.........................................
rs.Update
при записи возникает сообщение:
recordset не поддерживает обновление. это связано с ограничением поставщика или выбранным типом блоктровки.
В чем дело?