Unable to Update SQL recordset: Insufficient base table information
Hey all,
I'm reposting my question after working on the suggestions...I am unable
to update my dBASE table with the following code:
Dim adoMetadata as Adodc
Dim connectString as String
connectString = "Provider=MSDASQL.1;DBQ=G:\MN1_gis\Data\Tables;
"DefaultDir=G:\MN1_gis\Data\Tables;Driver={Microsoft dBase
Driver (*.dbf)};DriverId=21;FIL=dBase III;UID=admin;Initial
Catalog=G:\MN1_gis\Data\Tables;"
With adoMetadata
.Mode = adModeReadWrite
.ConnectionString = connectString
.CommandType = adCmdText
.RecordSource = "SELECT * FROM Metadata"
.LockType = adLockOptimistic
.CursorType = adOpenDynamic
.CursorLocation = adUseClient
.Refresh
End With
With DataCombo1(0)
Set .DataSource = adoMetadata
Set .RowSource = adoMetadata
.BoundColumn = "ID"
.ListField = "ID"
.DataField = "ID"
End With
I then execute "adoMetadata.Recordset.update" from a command button
click. From this point on, I am unable move to the next or previous
record without the following error coming up:
"Insufficient base table information for updating or refreshing"
I'm going nuts here. Can I not change records on an open recordset?
With DAO, this was no problem. Any help or comments would be greatly
appreciated. Thanks in advance,
Mark
--
Mark Giesbrecht
GIS Analyst
GeoArctic International Services Ltd.
phone: (403) 290-1320 fax: (403) 264-5848
