Darren DICK
d.dick at uws.edu.au
Tue Feb 3 19:49:00 CST 2004
Hi Charlotte Many thanks for the response Sorry but I am a real luddite What does that mean ? CommandType gives me nothing in the help (Rarely ever does though) Darren ----- Original Message ----- From: "Charlotte Foust" <cfoust at infostatsystems.com> To: "Access Developers discussion and problem solving" <accessd at databaseadvisors.com> Sent: Wednesday, February 04, 2004 12:39 PM Subject: RE: [AccessD] A2K: Can't update (ADO) Recordset > Try specifying the CommandType for the Open. > > Charlotte Foust > > -----Original Message----- > From: Darren DICK [mailto:d.dick at uws.edu.au] > Sent: Tuesday, February 03, 2004 5:10 PM > To: AccessD List > Subject: [AccessD] A2K: Can't update (ADO) Recordset > > > Hello all > > Can anyone tell me why I get the following Error message when I try and > update the following record set? > ================================================= > Error Number 3251 > Current Recordset does not support updating. > This may be a limitation of the provider, or of the > selected locktype ================================================= > > Code... > Dim con As Object > Dim rs As Object > Dim sel_SQL As String > > Set con = Application.CurrentProject.Connection > > Set rs = CreateObject("ADODB.Recordset") > > > sel_SQL = "SELECT tblMyTable.*, tblMyTable.FieldToBeUpdated FROM > tblMyTable" _ > & "WHERE (((tblMyTable.FieldToBeUpdated ) Is Not Null)); > > rs.Open sel_SQL, con, 1 '<====Error line is here somewhere me thinks > > With rs > While Not .EOF > !FieldToBeUpdated = -1 > .MoveNext > Wend > End With > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com